Assignment of variable using web app and performing operations on it

Question

I am newbie to the r shiny and I am developing a web app that takes input as text and numeric. Next, the numeric value should be assigned to the declared text as a variable.

I have tried this

library(shiny)

ui<-fluidPage(    


  titlePanel("test"),

  numericInput("num", label = h3("Numeric input"), value = 1),

  hr(),
  fluidRow(column(3, verbatimTextOutput("value"))),

  textInput("text", label = h3("Text input"), value = "Enter text..."),

  hr(),
  fluidRow(column(3, verbatimTextOutput("value")))




)




server<-  function(input, output) {

  output$value <- renderPrint({ input$num })
  output$value <- renderPrint({ input$text })

}
shinyApp(ui = ui, server = server)

Now after this where is the value assigned? How can I extract the value of this assignment?

DSGym · Accepted Answer · 2019-04-30 12:35:32Z

1

Your errors: It is called renderText, not renderPrint. You can only assign one value to one output. However, if you want to output them togeher, you could do:

textoutput <- paste0(input$text, "," input$num)

Here you find a working example of your app. Next time, please format the text as code :-).

library(shiny)

ui<-fluidPage(

    titlePanel("test"),
    numericInput("num", label = h3("Numeric input"), value = 1),
    hr(), fluidRow(column(3, verbatimTextOutput("value"))),
    textInput("text", label = h3("Text input"), value = "Enter text..."),
    hr(), fluidRow(column(3, verbatimTextOutput("value1"),
                          verbatimTextOutput("value2")
                          ))

)

server<- function(input, output) {

    # value <- reactive({input$num})
    # valu2 <- reactive({input$text})

    output$value1 <- renderText({
        input$num
    })

    value <- reactive({input$num})

    output$value2 <- renderText({
        input$text
    })



} 

shinyApp(ui = ui, server = server)

answered Apr 30, 2019 at 12:35

DSGym

2,8671 gold badge9 silver badges23 bronze badges

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

2 Comments

mohitji Over a year ago

Thank you :) Now what to do if i have to use the entered numeric value as input for another operation. For Example, say value 2 is entered as input..now after entering, i want to display the square of 2 is 4.

DSGym Over a year ago

input$num * 2 or if is has to be text: paste0("The square of ", input$num", " is ", input$num * 2)

Collectives™ on Stack Overflow

Assignment of variable using web app and performing operations on it

1 Answer 1

2 Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

2 Comments

Your Answer

Sign up or log in

Post as a guest

Related