Otro as.numeric(input$ntumors)
This commit is contained in:
+1
-1
@@ -290,7 +290,7 @@ server <- function(input, output) {
|
|||||||
content = function(file){
|
content = function(file){
|
||||||
ncages<-input$ncages
|
ncages<-input$ncages
|
||||||
nrat_cage<-5
|
nrat_cage<-5
|
||||||
id_tumors<-c("L","R")[input$ntumors]
|
id_tumors<-c("L","R")[as.numeric(input$ntumors)]
|
||||||
# timepoint<-c(7,10,13,16,19,22,25)
|
# timepoint<-c(7,10,13,16,19,22,25)
|
||||||
|
|
||||||
if (!is.null(input$file_sizes)){
|
if (!is.null(input$file_sizes)){
|
||||||
|
|||||||
Reference in New Issue
Block a user