Commit 00ef3626 authored by dmattek's avatar dmattek

Allow upload of compressed files

parent f544f945
...@@ -140,7 +140,10 @@ shinyServer(function(input, output, session) { ...@@ -140,7 +140,10 @@ shinyServer(function(input, output, session) {
fileInput( fileInput(
'inFileLoadTrajRem', 'inFileLoadTrajRem',
"Select file and click Load Data", "Select file and click Load Data",
accept = c('text/csv', 'text/comma-separated-values,text/plain') accept = c("text/csv",
"text/comma-separated-values,text/plain",
"application/gzip",
"application/bz2"),
) )
}) })
...@@ -161,7 +164,10 @@ shinyServer(function(input, output, session) { ...@@ -161,7 +164,10 @@ shinyServer(function(input, output, session) {
fileInput( fileInput(
'inFileLoadStim', 'inFileLoadStim',
"Select file and click Load Data", "Select file and click Load Data",
accept = c('text/csv', 'text/comma-separated-values,text/plain') accept = c("text/csv",
"text/comma-separated-values,text/plain",
"application/gzip",
"application/bz2"),
) )
}) })
......
...@@ -24,7 +24,10 @@ shinyUI(fluidPage( ...@@ -24,7 +24,10 @@ shinyUI(fluidPage(
fileInput( fileInput(
'inFileLoadNuc', 'inFileLoadNuc',
"Select data file and click Load Data", "Select data file and click Load Data",
accept = c('text/csv', 'text/comma-separated-values,text/plain', "application/gzip", "application/bz2"), accept = c("text/csv",
"text/comma-separated-values,text/plain",
"application/gzip",
"application/bz2"),
), ),
radioButtons("inRbutLongWide", actionLink("alDataFormat", "Data Format:"), c("Long" = 0, "Wide" = 1), inline = T), radioButtons("inRbutLongWide", actionLink("alDataFormat", "Data Format:"), c("Long" = 0, "Wide" = 1), inline = T),
......
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