Cómo centrar la alineación de los contenidos de la tabla en la aplicación R shiny - r, shiny, shinyapps

Tengo lo siguiente

output$view <- renderTable({
tmp <- as.data.frame(matrix(data=NA,nrow=1,ncol=2))
tmp[1,1] <- "1"
tmp[1,2] <- "2"
head(tmp,n=nrow(tmp))
})

El contenido del marco de datos no está centrado. ¿Cómo podría centrarlo?

Respuestas

usa CSS, haz esto.

library(shiny)

ui <- shinyUI(
fluidPage(
tags$head(
tags$style(
HTML(
"
#view{
text-align:center;
}
"
)
)
),
tableOutput("view")
)
)

server <- shinyServer(function(input,output,session){
output$view <- renderTable({
tmp <- as.data.frame(matrix(data=NA,nrow=1,ncol=2))
tmp[1,1] <- "1"
tmp[1,2] <- "2"
head(tmp,n=nrow(tmp))
})
})

shinyApp(ui=ui,server=server)