पॉइंट साइज़ बदलें: numeric input
Numeric inputs में कुछ अतिरिक्त आर्ग्युमेंट होते हैं जो text inputs में नहीं होते, जैसे min और max, जो चुने जा सकने वाले न्यूनतम और अधिकतम नंबर तय करते हैं.
ध्यान दें कि जब सर्वर कोड में किसी इनपुट का मान एक्सेस किया जाता है, तो Shiny इनपुट के प्रकार को पहचान लेता है और उसी के अनुरूप ऑब्जेक्ट लौटाता है. इसका मतलब है कि अगर आपके पास ID "foo" वाला एक numeric input है, तो input$foo एक संख्यात्मक मान लौटाएगा.
यह अभ्यास पाठ्यक्रम का हिस्सा है
केस स्टडीज़: R में Shiny के साथ वेब एप्लिकेशन बनाना
अभ्यास निर्देश
पिछले अभ्यास की Shiny ऐप का कोड दिया गया है. आपका काम एक numeric input जोड़ना है, जिसका उपयोगकर्ता प्लॉट पर पॉइंट्स का साइज़ बदलने के लिए कर सके. विशेष रूप से:
- UI में ID "size", लेबल "Point size", डिफ़ॉल्ट मान 1, और न्यूनतम मान 1 के साथ एक numeric input जोड़ें.
- सर्वर में ऐसा कोड जोड़ें ताकि यह numeric input प्लॉट में पॉइंट साइज़ निर्धारित करे (लाइन 20).
इंटरैक्टिव व्यावहारिक अभ्यास
इस अभ्यास को इस नमूना कोड को पूरा करके आज़माएँ।
# Define UI for the application
ui <- fluidPage(
sidebarLayout(
sidebarPanel(
textInput("title", "Title", "GDP vs life exp"),
# Add a size numeric input
___
),
mainPanel(
plotOutput("plot")
)
)
)
# Define the server logic
server <- function(input, output) {
output$plot <- renderPlot({
ggplot(gapminder, aes(gdpPercap, lifeExp)) +
# Use the size input as the plot point size
geom_point(size = ___) +
scale_x_log10() +
ggtitle(input$title)
})
}
# Run the application
shinyApp(ui = ui, server = server)