Simple Multiplication Calculator

Bhavna Gandhi

Introduction

  • Multiplies numbers from 0 to 100
  • Gives the answer instantly

Code for ui.R

library(shiny)

shinyUI(fluidPage(

titlePanel(“Simple Multiplication Calculator”),

sidebarLayout(

sidebarPanel(

  numericInput("numeric1","Enter first number", value=0, min = 0, max = 100,step=1),

  numericInput("numeric2","Enter second number",value = 0, min=0, max = 100,step= 1)
),

    mainPanel(

  textOutput("multi")
)

) ))

Code for server.R

library(shiny)

shinyServer(function(input, output) {

model <- reactive({

X <- input$numeric1
Y <- input$numeric2

multi <- X*Y

})

output$multi <- renderText({ model()

} ) })

Thank You