res=infoBox(h6(strong("Phylogenetic tree")),subtitle=h6(strong("Load the phylogenetic tree (optional)")),color="light-blue",width=NULL,fill=TRUE,icon=icon("upload"))
if(!is.null(tree)){
if(!is.null(isolate(input$fileTree))){
#if(!is.null(isolate(input$fileTree))){
res=infoBox(h6(strong("Phylogenetic tree")),subtitle=h6("The phylogenetic has been loaded"),color="green",width=NULL,fill=TRUE,icon=icon("thumbs-o-up"))