Eliminar un print

This commit is contained in:
marcelcosta
2020-12-04 17:40:49 +01:00
parent 3c4dfdc9ee
commit 4500068b85
-1
View File
@@ -243,7 +243,6 @@ server <- function(input, output) {
output$cutoffUI<-renderUI({
if (!is.null(analysis$taula_def)){
observeEvent(analysis$taula_def, {})
print(analysis$taula_def)
max_val<-max(analysis$taula_def$Volume, na.rm = T)
sliderInput("cutoff", "Cutoff para Survival", min=0, max=round(max_val), step=round(max_val)/200, value=max_val)
}