Unverified Commit 90d3a872 authored by Severine Martini's avatar Severine Martini Committed by GitHub
Browse files

Add files via upload

parent 55029c20
#
#
library(shiny)
shinyUI(fluidPage(
headerPanel("Welcome on a growth curve app"),
# load dataset
titlePanel("Upload file"),
sidebarLayout(
sidebarPanel(
fileInput('file1', 'Choose CSV File',
accept=c('text/csv',
'text/comma-separated-values,text/plain',
'.csv', '.txt')),
tags$hr(),
checkboxInput('header', 'Header', TRUE),
radioButtons('sep', 'Separator',
c(Comma=',',
Semicolon=';',
Tab='\t'),
','),
radioButtons('quote', 'Quote',
c(None='',
'Double Quote'='"',
'Single Quote'="'"),
'"')
),
mainPanel(tableOutput('contents'),
plotOutput('plot')
)
)
))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment