Studi Kasus: Membangun Aplikasi Web dengan Shiny di R
Dean Attali
Shiny Consultant
x berubah, apa pun yang bergantung pada x dihitung ulangBandingkan dengan R biasa:
x <- 5
y <- x + 1
x <- 10
Berapa nilai y? 6 atau 11?
input$<inputId> di dalam fungsi render akan memicu output untuk dirender ulang
output$my_plot <- renderPlot({
plot(rnorm( input$num ))
})
output$my_plot bergantung pada input$num
input$num berubah ⇒
output$my_plot bereaksi
render*() apa pun adalah konteks reaktifserver <- function(input, output) {
print(input$num)
}
ERROR: Operation not allowed without an active reactive context.
observe({ ... }) untuk mengakses variabel reaktif
server <- function(input, output) {
observe({
print( input$num )
})
}
Berguna untuk debugging, melacak variabel reaktif
observe({
print( input$num1 )
print( input$num2 )
})
reactive({ ... }) untuk membuat variabel reaktif
Salah:
server <- function(input, output) {
x <- input$num + 1
}
ERROR: Operation not allowed without an active reactive context.
Benar:
server <- function(input, output) {
x <- reactive({
input$num + 1
})
}
()server <- function(input, output){
x <- reactive({
input$num + 1
})
observe({
print( input$num )
print( x() )
})
}
Studi Kasus: Membangun Aplikasi Web dengan Shiny di R