How to format reactive text output in R-Markdown?

Question

In my Markdown file I use Shiny widgets to set some parameter. Add the end of the document some reactive text should be shown, depending on the choosen parameter, changing when a parameter is changed. This text should be formatted with linebreaks. Output format is HTML. The following minimal example shows my approach, the screenshot below the outcome. Unfortunatelly without linebreaks.

How can I archieve linebreaks in reactive textoutput in R-Markdown?

---
title: 'Minimal example'
runtime: shiny
output: 
  html_document

---


```{r setup, include=FALSE}
library(knitr)
library(shiny)
knitr::opts_chunk$set(echo = F)
```


```{r}
selectInput("input1", label = "Input1",
              choices = 1:5, selected = 1)

selectInput("input2", label = "Input2",
              choices = 1:5, selected = 1)

```

```{r}
### Generate Parameter for report
renderText({
        HTML(paste('Input1:', input$input1, '<br> Input2:', input$input2))
})

renderText({
        paste('Input1:', input$input1, ' \\n Input2:', input$input2)
})

renderText({
        paste('Input1:', input$input1, '  \n Input2:', input$input2)
})

renderText({
        cat(paste('Input1:', input$input1, '  \n Input2:', input$input2))
})
```

Martin Schmelzer · Accepted Answer · 2019-01-30 13:22:23Z

2

Use renderUI in combination with HTML() instead:

renderUI({
        HTML(paste('Input1:', input$input1, '<br> Input2:', input$input2))
})

answered Jan 30, 2019 at 13:22

Martin Schmelzer

24k8 gold badges80 silver badges108 bronze badges

Sign up to request clarification or add additional context in comments.

1 Comment

NashVio Over a year ago

Thank you. Are you aware of a way to have sequences like '\n' considered?

Collectives™ on Stack Overflow

How to format reactive text output in R-Markdown?

1 Answer 1

1 Comment

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

1 Comment

Your Answer

Sign up or log in

Post as a guest

Related