Misma bug que anterior.
This commit is contained in:
+2
-2
@@ -464,7 +464,7 @@ server <- function(input, output) {
|
|||||||
Volume=0,
|
Volume=0,
|
||||||
Observations=""
|
Observations=""
|
||||||
)
|
)
|
||||||
if (!(0 %in% table$DayPostInoc) | sum(table[test$DayPostInoc == 0,"Volume"],na.rm = T) == 0){
|
if (!(0 %in% table$DayPostInoc) | sum(table[table$DayPostInoc == 0,"Volume"],na.rm = T) == 0){
|
||||||
table<-rbind(table, basal)
|
table<-rbind(table, basal)
|
||||||
}
|
}
|
||||||
|
|
||||||
@@ -542,7 +542,7 @@ server <- function(input, output) {
|
|||||||
Volume=0,
|
Volume=0,
|
||||||
Observations=""
|
Observations=""
|
||||||
)
|
)
|
||||||
if (!(0 %in% table$DayPostInoc) | sum(test[table$DayPostInoc == 0,"Volume"],na.rm = T) == 0){
|
if (!(0 %in% table$DayPostInoc) | sum(table[table$DayPostInoc == 0,"Volume"],na.rm = T) == 0){
|
||||||
table<-rbind(table, basal)
|
table<-rbind(table, basal)
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user