f3a565aa98
Can't reference legderr files unless they are within the Shiny app folder. This project gets weirder and weirder, will probably need to be split eventually.
34 lines
743 B
R
34 lines
743 B
R
#
|
|
# This is the user-interface definition of a Shiny web application. You can
|
|
# run the application by clicking 'Run App' above.
|
|
#
|
|
# Find out more about building applications with Shiny here:
|
|
#
|
|
# http://shiny.rstudio.com/
|
|
#
|
|
|
|
library(shiny)
|
|
|
|
# Define UI for application that draws a histogram
|
|
shinyUI(fluidPage(
|
|
|
|
# Application title
|
|
titlePanel("Old Faithful Geyser Data"),
|
|
|
|
# Sidebar with a slider input for number of bins
|
|
sidebarLayout(
|
|
sidebarPanel(
|
|
sliderInput("bins",
|
|
"Number of bins:",
|
|
min = 1,
|
|
max = 50,
|
|
value = 30)
|
|
),
|
|
|
|
# Show a plot of the generated distribution
|
|
mainPanel(
|
|
plotOutput("distPlot")
|
|
)
|
|
)
|
|
))
|