Outputting multiple lines of text with renderText() in R shiny

by

You can use renderUI and htmlOutput instead of renderText and textOutput.

require(shiny)
runApp(list(ui = pageWithSidebar(
  headerPanel("censusVis"),
  sidebarPanel(
    helpText("Create demographic maps with 
      information from the 2010 US Census."),
    selectInput("var", 
                label = "Choose a variable to display",
                choices = c("Percent White", "Percent Black",
                            "Percent Hispanic", "Percent Asian"),
                selected = "Percent White"),
    sliderInput("range", 
                label = "Range of interest:",
                min = 0, max = 100, value = c(0, 100))
  ),
  mainPanel(textOutput("text1"),
            textOutput("text2"),
            htmlOutput("text")
  )
),
server = function(input, output) {
  output$text1 <- renderText({paste("You have selected", input$var)})
  output$text2 <- renderText({paste("You have chosen a range that goes from",
                                    input$range[1], "to", input$range[2])})
  output$text <- renderUI({
    str1 <- paste("You have selected", input$var)
    str2 <- paste("You have chosen a range that goes from",
                  input$range[1], "to", input$range[2])
    HTML(paste(str1, str2, sep = '<br/>'))

  })
}
)
)

Note you need to use <br/> as a line break. Also the text you wish to display needs to be HTML escaped so use the HTML function.

More Related Contents:

  1. Starting Shiny app after password input
  2. How to save plots that are made in a shiny app
  3. R shiny: display “loading…” message while function is running
  4. Make conditionalPanel depend on files uploaded with fileInput
  5. drop-down checkbox input in shiny
  6. ‘Reset inputs’ button in shiny app
  7. How to change ‘Maximum upload size exceeded’ restriction in Shiny and save user file inputs?
  8. Subset based on variable column name
  9. Favicon in Shiny
  10. Shiny: Dynamic Number of Output Elements/Plots
  11. Control the height in fluidRow in R shiny
  12. How to color sliderbar (sliderInput)?
  13. Update handsontable by editing table and/or eventReactive
  14. R Shiny set DataTable column width
  15. Shiny app: downloadHandler does not produce a file
  16. DT: Dynamically change column values based on selectinput from another column in R shiny app
  17. Get the event which is fired in Shiny?
  18. Remove ‘search’ option but leave ‘search columns’ option
  19. How to implement a cleanup routine in R Shiny?
  20. dplyr – groupby on multiple columns using variable names
  21. Add values to a reactive table in shiny
  22. r shiny table not rendering html
  23. How to add Rtools\bin to the system path in R
  24. Reading in a file in R Shiny
  25. Scale and size of plot in RStudio shiny
  26. Add data to ggvis tooltip that’s contained in the input dataset but not directly in the vis
  27. displaying TRUE when shiny files are split into different folders
  28. R shiny sliderInput with restricted range
  29. Display HTML file in Shiny App
  30. Possible to show console messages (written with `message`) in a shiny ui?

Leave a Comment