and the next save!!!
This commit is contained in:
1 parent
9025e57e35
commit
2fb2080d85
1 file changed
+1
-1
@@ -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
|
||||||
|
|||||||
Reference in new issue
Block a user