JNCC/MESO
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

and the next save!!!

Browse Source
This commit is contained in:
Steve Pegg
2019-04-10 11:37:38 +01:00
parent 9025e57e35
commit 2fb2080d85
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
app.R
View File

@@ -493,7 +493,7 @@ server <- function(input, output, session) {
nodeNet <- nodes[(nodes$code %in% .selections$pressStatus$code[.selections$pressStatus$status %in% c('On')]),] nodeNet <- nodes[(nodes$code %in% .selections$pressStatus$code[.selections$pressStatus$status %in% c('On')]),]
save(nodes, edges, nodeNet, file = 'tmp.RData') #save(nodes, edges, nodeNet, file = 'tmp.RData')
if (nrow(nodeNet)>0) { if (nrow(nodeNet)>0) {
#do pressures #do pressures