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.