การเพิ่มแหล่งข้อความ

กรณีศึกษา: การสร้างเว็บแอปพลิเคชันด้วย Shiny ใน R

Dean Attali

Shiny Consultant

อินพุตแบบ Textarea

  • อาร์กิวเมนต์ data เป็นข้อความ ใช้ textInput()?

    chapter4_2_adding_word_sources.004.png

  • textAreaInput() คล้ายกัน แต่แสดงหลายแถว

    textAreaInput(inputId, label, value, rows, ...)

chapter4_2_adding_word_sources.005_b.png

กรณีศึกษา: การสร้างเว็บแอปพลิเคชันด้วย Shiny ใน R

File inputs - UI

  • File inputs สำหรับอัปโหลดไฟล์ (ข้อความ) ไปยัง Shiny app
fileInput(inputId, label, ...)

chapter4_2_adding_word_sources.011.png

กรณีศึกษา: การสร้างเว็บแอปพลิเคชันด้วย Shiny ใน R

File inputs - UI

chapter4_2_adding_word_sources.013.png

  • ดูตัวเลือกเพิ่มเติมได้ที่ ?fileInput()
กรณีศึกษา: การสร้างเว็บแอปพลิเคชันด้วย Shiny ใน R

File inputs - server

  • เมื่อเลือกไฟล์แล้ว ไฟล์จะถูกอัปโหลดและพร้อมใช้งานใน Shiny
  • Text inputs: input$<inputId> คือข้อความ
  • Numeric inputs: input$<inputId> คือตัวเลข
  • File inputs: input$<inputId> ไม่ใช่ไฟล์
กรณีศึกษา: การสร้างเว็บแอปพลิเคชันด้วย Shiny ใน R

File inputs - server

  • File inputs: input$<inputId> คือ dataframe ที่มี 1 แถวต่อไฟล์

    • ตัวแปร: name, size, type, datapath
       name        size   type         datapath
1  myfile.txt  6000   text/plain   C:/path/to/temporary/file/0.txt
    • datapath สำคัญที่สุด: เส้นทางของไฟล์

  • อ่านไฟล์ที่เลือก:

      input$<inputId>$datapath

    • ไฟล์ข้อความ:

      readLines(input$<inputId>$datapath)
กรณีศึกษา: การสร้างเว็บแอปพลิเคชันด้วย Shiny ใน R

มาฝึกกันเถอะ!

กรณีศึกษา: การสร้างเว็บแอปพลิเคชันด้วย Shiny ใน R

Preparing Video For Download...