R błyszczący: jak zapisać dane wejściowe na serwerze lub uzyskać dostęp do zmiennych wejściowych na całym świecie?

Tworzę aplikację, która prosi użytkownika o kilka podstawowych pytań ankietowych. Po wykonaniu tej czynności proszeni są o podanie danych liczbowych za pomocą suwaka, naciśnięcie kontynuuj, a następnie wygeneruj wykres, ponownie prosi użytkownika o wprowadzenie danych, aktualizuje wykres itp. Pierwsze wejście powinno być y1 na wykresie, a drugie wejście powinno być y2 na wykresie, ect. Ale na dodatek chciałbym zapisać dane wprowadzane przez użytkownika, dzięki czemu mogę uzyskać do niego dostęp w moim skrypcie R globalnie, aby mógł zostać wysłany do mnie za pomocą sendmailR lub aby mógł zostać pobrany na mój komputer jako plik tekstowy . Ale mam problem z ustaleniem, jak to zrobić. Oto, co mam do tej pory.

n=10 #number of times to ask the user for input which will be stored in harv[i]
Time = seq(n)
harv = rep(0,n) #initializing vector for storage of user input at time 1 through n

############### define server logic

shinyServer(function(input, output){

  # Compute the forumla text in a reactive expression since it is 
  # shared by the output$caption and output$mpgPlot expressions
  for(i in Time){

  # generate a plot
  output$yieldplot <- renderPlot({
   harv[i] = input$harvest
   plot(Time, harv, type='p', ylim=c(0,1))
  })

 }#for

})

Oto plik ui.R.

###########################################
#####   User Interface  ###################
###########################################

library(shiny)

#Define UI for app
shinyUI(pageWithSidebar(

  #title  
  headerPanel("Game"),
  mainPanel(   selectInput("workexp", "Have you ever been employed:",
                            list("No"="no", "Yes" = "yes")),    
               sliderInput("push", "Choose a number", 
                           min = 0, max = 1, value = 0.5, step= 0.01),
               submitButton("Enter"),
               plotOutput("yieldplot")                                                  
  )#mainpanel

))#shinyUI  

Również moja pętla for do próbowania generowania wykresu w kółko nie będzie działać, zakładam, że muszę zrobić coś reaktywnego, ale muszę wymyślić sposób wykreślania wpisów zdefiniowanych wcześniej przez użytkownika wszystkich zapisanych w harv. Zajrzałem do downloadHanlder, ale to pobiera dane i wykresy na komputerze użytkownika.

questionAnswers(1)

yourAnswerToTheQuestion