How to get data without index number in shiny

Question

I am getting the value [1] 0.7976529 by using verbatimTextOutput(\"oaccura\") on ui.r and output$oaccura<-renderPrint({a3}) on server.r but i want

Answer 1

Maybe you can use renderText instead

library(shiny)
a3 <- 0.7976529
ui  <- fluidPage(verbatimTextOutput("oaccura"))
server <- function(input, output, session) {
  output$oaccura <- renderText({a3})
}
runApp(list(ui = ui, server = server))