เริ่มต้นใช้งานเริ่มต้นใช้งานได้ฟรี

textOutput กับการโต้ตอบ

สมมติว่าคุณทำงานให้กับคลินิกด้านการนอนหลับแห่งหนึ่งในสหรัฐอเมริกา เพื่อศึกษาพฤติกรรมการนอนหลับของคนอเมริกัน คุณได้ทำการสำรวจข้อมูลและต้องการนำเสนอผลการค้นพบนั้น

แทนที่จะส่งรายงานแบบคงที่ คุณตัดสินใจสร้างแอปพลิเคชันแบบโต้ตอบเพื่อให้ผู้ชมมีส่วนร่วมมากขึ้น

ในขั้นแรก คุณต้องการให้ผู้ใช้กรอกชื่อเมืองที่พักอาศัย โดยผลลัพธ์ข้อความจะอัปเดตตามสิ่งที่ผู้ใช้พิมพ์เข้ามา

สำหรับงานนี้ คุณจะใช้ฟังก์ชัน textInput()

แบบฝึกหัดนี้เป็นส่วนหนึ่งของหลักสูตร

การสร้างแดชบอร์ดด้วย shinydashboard

ดูคอร์ส

แบบฝึกหัดเชิงโต้ตอบแบบลงมือทำ

ลองทำแบบฝึกหัดนี้โดยเติมโค้ดตัวอย่างนี้ให้สมบูรณ์

ui <- fluidPage(
  titlePanel("Sleeping habits in America"), 
  # Add textInput and label it as "city label"
  ___(___,
            "Which city do you live in?",
            # Leave the value blank and set the placeholder as "Singapore"
            value = ___, placeholder = ___))

server <- function(input, output) {
}

shinyApp(ui, server)
แก้ไขและรันโค้ด