บทนำสู่แอป Shiny

Shiny เป็นแพ็กเกจ R ที่ช่วยให้คุณสร้างเว็บแอปพลิเคชันแบบโต้ตอบได้โดยตรงจาก R นิยมใช้อย่างแพร่หลายสำหรับการแสดงภาพข้อมูลและการจัดทำรายงาน

การติดตั้งและโหลด Shiny

ก่อนใช้ Shiny ให้ติดตั้งและโหลดแพ็กเกจก่อน

install.packages('shiny')
library(shiny)

โครงสร้างพื้นฐานของแอป Shiny

แอป Shiny ประกอบด้วยสองส่วนหลัก:

• UI (ส่วนติดต่อผู้ใช้): กำหนดเค้าโครงและลักษณะที่ปรากฏ
• เซิร์ฟเวอร์: ประกอบด้วยตรรกะและการคำนวณ

การสร้างแอป Shiny อย่างง่าย

ใช้ shinyApp() เพื่อสร้างแอปพลิเคชันแบบโต้ตอบพื้นฐาน

library(shiny)
ui <- fluidPage(
  titlePanel('Hello Shiny!'),
  sidebarLayout(
    sidebarPanel(sliderInput('num', 'Choose a number:', 1, 100, 50)),
    mainPanel(textOutput('value'))
  )
)
server <- function(input, output) {
  output$value <- renderText({ paste('You selected:', input$num) })
}
shinyApp(ui = ui, server = server)

การเพิ่มองค์ประกอบแบบตอบสนอง

นิพจน์แบบตอบสนองจะอัปเดตโดยอัตโนมัติเมื่ออินพุตเปลี่ยนแปลง

server <- function(input, output) {
  reactive_text <- reactive({ paste('Your number squared is:', input$num^2) })
  output$value <- renderText({ reactive_text() })
}

การสร้างกราฟแบบโต้ตอบ

ใช้ renderPlot() เพื่อแสดงกราฟแบบโต้ตอบ

server <- function(input, output) {
  output$plot <- renderPlot({
    hist(rnorm(input$num), col='blue', main='Random Histogram')
  })
}

การเรียกใช้แอป Shiny

บันทึกสคริปต์เป็น app.R แล้วเรียกใช้ด้วย shiny::runApp()

การนำแอป Shiny ไปใช้งาน

คุณสามารถนำแอป Shiny ไปใช้งานออนไลน์ได้โดยใช้ shinyapps.io หรือโฮสต์บนเซิร์ฟเวอร์ Shiny

สรุป

ในบทเรียนนี้ คุณได้เรียนรู้เกี่ยวกับ:

• วิธีสร้างและจัดโครงสร้างแอป Shiny
• วิธีใช้องค์ประกอบแบบตอบสนองเพื่อสร้างการโต้ตอบ
• วิธีนำแอป Shiny ไปใช้งานออนไลน์