Eliminar un print
This commit is contained in:
@@ -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)
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user