Fallstudier: Bygg webbapplikationer med Shiny i R
Dean Attali
Shiny Consultant
x ändras, utvärderas allt som beror på x på nyttJämför med vanlig R:
x <- 5
y <- x + 1
x <- 10
Vad är värdet på y? 6 eller 11?
input$<inputId> inuti en renderfunktion gör att utdata återrenderas
output$my_plot <- renderPlot({
plot(rnorm( input$num ))
})
output$my_plot beror på input$num
input$num ändras ⇒
output$my_plot reagerar
render*()-funktioner är reaktiva kontexterserver <- function(input, output) {
print(input$num)
}
ERROR: Operation not allowed without an active reactive context.
observe({ ... }) för att komma åt en reaktiv variabel
server <- function(input, output) {
observe({
print( input$num )
})
}
Användbart för felsökning och att spåra reaktiva variabler
observe({
print( input$num1 )
print( input$num2 )
})
reactive({ ... }) för att skapa en reaktiv variabel
Fel:
server <- function(input, output) {
x <- input$num + 1
}
ERROR: Operation not allowed without an active reactive context.
Rätt:
server <- function(input, output) {
x <- reactive({
input$num + 1
})
}
()server <- function(input, output){
x <- reactive({
input$num + 1
})
observe({
print( input$num )
print( x() )
})
}
Fallstudier: Bygg webbapplikationer med Shiny i R