Bug anterior en sección Exportar.
This commit is contained in:
@@ -784,7 +784,9 @@ server <- function(input, output) {
|
||||
Volume=0,
|
||||
Observations=""
|
||||
)
|
||||
if (!(0 %in% table$DayPostInoc) | sum(table[table$DayPostInoc == 0,"Volume"],na.rm = T) == 0){
|
||||
table<-rbind(table, basal)
|
||||
}
|
||||
if (input$fig_id %in% c("Cinética Grupo", "Cinética Individual")){
|
||||
if (input$fig_id == "Cinética Grupo"){
|
||||
if (input$vacc == "Sí"){
|
||||
|
||||
Reference in New Issue
Block a user