fork download 
  1. library(shiny)
  2. library(jsonlite)
  3. library(reshape2)
  4. options(shiny.maxRequestSize=30*1024^2)
  5. shinyServer(
  6.  
  7.   function(input, output){
  8.      src <- renderText({paste0(readLines(input$file1),collapse = ',')})
  9.      x <- renderText({jsonlite::fromJSON(src,flatten = TRUE)})
  10.      output$contents <- renderTable({as.data.frame(x)})
  11.   }
  12. )
Success #stdin #stdout #stderr 0.4s 79168KB
comments (?)
stdin 
Standard input is empty
stdout 
Standard output is empty
stderr 
Error in library(shiny) : there is no package called ‘shiny’
Execution halted
https://ideone.com/D2seDo
language:
R (R 3.5.2)
created:
9 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!