Skip to content

Shiny App Ready for Initial Deploy#168

Merged
dlebauer merged 41 commits intomasterfrom
feature
Aug 16, 2017
Merged

Shiny App Ready for Initial Deploy#168
dlebauer merged 41 commits intomasterfrom
feature

Conversation

@nheyek
Copy link
Copy Markdown

@nheyek nheyek commented Aug 1, 2017

No description provided.

Nick Heyek added 28 commits July 7, 2017 14:27
…efresh code, reconfigure plot generation to display cultivar-specific data as superimposed points
@nheyek nheyek requested a review from dlebauer August 1, 2017 21:44
@dlebauer
Copy link
Copy Markdown
Member

dlebauer commented Aug 1, 2017

Do you have a demo?

@nheyek
Copy link
Copy Markdown
Author

nheyek commented Aug 1, 2017

Unfortunately I cannot set up an SSH tunnel on Shinyapps.io, but @robkooper set up a VM for me to deploy it to, and I will do my best to make that happen tomorrow.

library(lubridate)
options(scipen=999)

# set up remote connection to BETYdb
Copy link
Copy Markdown
Member

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

@nickheyek it wasn't clear from the README how to set these up. is it just putting

export bety_user=bety
export bety_password=...
...

in .bashrc?

Since access is restricted by ssh, I just hard coded the values. (see below). Does that make sense?

Copy link
Copy Markdown
Author

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Sorry. Export works in bash, or Sys.setenv() in R. Hard coding it in is also okay, I used environment variables out of concern for leaving passwords in Github.

)
timevis(timelineData)
# load 'full_cache_data' object from cache file
load('cache.RData')
Copy link
Copy Markdown
Member

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

This file does not exist. Simple solution would be to add (at least a small sample one) to the repository.

Copy link
Copy Markdown
Author

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

A better solution would be to check if the file exists and if not, to run the script to generate it.

Copy link
Copy Markdown
Author

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Pushed this.

Comment thread experiment-trait-data-visualizer/app.R Outdated
rownames(seasons) <- paste0('[', seasons$start_date, ']', ' - ', '[', seasons$end_date, ']')
# schedule daily execution of cache refresh
cache_update_cmd <- cron_rscript('cache-refresh.R')
try(cron_add(command = cache_update_cmd, frequency = 'daily',
Copy link
Copy Markdown
Member

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Would it make sense to replace this with:

if(!grepl('cache-update', cronR::cron_ls())){
  cron_add(command = cache_update_cmd, frequency = 'daily', 
           id = 'cache-update', description = 'daily update of BETYdb cache')
}

Copy link
Copy Markdown
Author

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Yes it would.

Nick Heyek and others added 9 commits August 9, 2017 12:34
- use geom_violin under boxplot
- add points to lines for specific cultivar
- change figure title
… bety6

- refactored dplyr code to use lazy eval and semi-joins instead of filter
- removed outline from plot colors
- changed basemap to semi-useful default
Copy link
Copy Markdown
Member

@dlebauer dlebauer left a comment

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

looks great! I've updated the code and figs some in #170

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment

Labels

None yet

Projects

None yet

Development

Successfully merging this pull request may close these issues.

2 participants