inst/example/app/ui.R

In Vinay-b-a/Lab05: Lab 5 for Advanced R programming

#' The Shiny app that plots the map of Sweden.
#' 
#' This app pinpoints a location in Sweden.
#' 
#' @import shiny 
#' @import plotly
#' 




ui <- fluidPage(
  
  textInput("text", label = h3("Text input"), value = "Linkoping"),
  
   hr(),
   fluidRow(column(3, verbatimTextOutput("value"))),
   plotly::plotlyOutput("mPlot")
  
)