Hi there,
I have built an app which outputs a diffobj into a shiny app... Like this:
The diffobj can be seen down. I uploaded just an example. It works perfectly.
But I built a dockerfile out of rocker/shiny, everything works well excepting this diffobj part, this is what I try to explain, it has just the exact same code:
I've tried changing some parameters... Really this is the part of server.R that is acting:
output$diff <- renderUI({
if((!input$drp1 == "Select") & (!input$drp2 == "Select")){
HTML(
as.character(
diffCsv(paste0(getwd(),"/Samples/",input$drp1),
paste0(getwd(),"/Samples/",input$drp2), mode="sidebyside", format="html")
)
)
}
})
Do you know what could be happening?