Reaktivite 101

R ile Shiny Kullanarak Web Uygulamaları Geliştirme

Ramnath Vaidyanathan

VP of Product Research

Kullanıcının adını girdiği ve kişiselleştirilmiş bir selamlama aldığı bir uygulama

Reaktif kaynak

Genellikle tarayıcı arayüzü üzerinden gelen kullanıcı girdisi

ui <- fluidPage(
  titlePanel('Greeting'),

  textInput('name', 'Enter Name')

)
server <- function(input, output, session){

}

shinyApp(ui = ui, server = server)

Reaktif uç nokta

Tarayıcıda görünen çıktı; örn. bir grafik veya tablo `r

ui <- fluidPage( titlePanel('Greeting'), textInput('name', 'Enter Name'), textOutput('greeting') )


----CODE_GLUE----
```r
server <- function(input, output, session){

  output$greeting <- renderText({
    paste("Hello", input$name)
  })

}

Reaktif iletken

Reaktif kaynaklara bağlı olan ve/veya reaktif uç noktaları güncelleyen ara katman.

server <- function(input, output, session){
  output$plot_trendy_names <- plotly::renderPlotly({
    babynames %>% 
      filter(name == input$name) %>%
      ggplot(val_bnames, aes(x = year, y = n)) +
      geom_col() 
  })
  output$table_trendy_names <- DT::renderDT({
     babynames %>% 
      filter(name == input$name)
  })
}

Reaktif ifadeler

Reaktif ifadeler tembel (lazy) ve önbelleklidir (cached).

server <- function(input, output, session){
  rval_babynames <- reactive({
    babynames %>% 
      filter(name == input$name)
  })
  output$plot_trendy_names <- plotly::renderPlotly({
     rval_babynames() %>%
      ggplot(val_bnames, aes(x = year, y = n)) +
      geom_col() 
  })
  output$table_trendy_names <- DT::renderDT({
     rval_babynames()
  })
}

Haydi pratik yapalım!

R ile Shiny Kullanarak Web Uygulamaları Geliştirme