Grafiğine renk ekle: radyo düğmeleri
Radyo düğmeleri, kullanıcıya birkaç seçenek sunup birini seçmesini istediğinde kullanılır. Kullanıcının seçebileceği farklı seçenekleri tanımlayan bir choices parametresi ve başlangıçta hangi seçeneğin seçili olacağını belirleyen bir selected argümanı vardır. value parametresi olmadığını unutma; ancak selectedın benzer bir role sahip olduğunu düşünebilirsin.
Bu egzersiz
Vaka Çalışmaları: R ile Shiny Kullanarak Web Uygulamaları Geliştirme
kursunun bir parçasıdırEgzersiz talimatları
Son egzersizdeki Shiny uygulamasının kodu verilmiştir. Görevin, kullanıcıya grafikte kullanılacak rengi seçtiren radyo düğmeleri eklemek. Özellikle:
- Arayüze kimliği "color" olan, etiketi "Point color" ve dört seçeneği olan radyo düğmeleri ekle: "blue", "red", "green", "black".
- Sunucuya, grafikteki noktaların radyo düğmelerinde seçilen renge sahip olmasını sağlayacak kodu ekle (satır 22).
Uygulamalı interaktif egzersiz
Bu örnek kodu tamamlayarak bu egzersizi bitirin.
# Define UI for the application
ui <- fluidPage(
sidebarLayout(
sidebarPanel(
textInput("title", "Title", "GDP vs life exp"),
numericInput("size", "Point size", 1, 1),
checkboxInput("fit", "Add line of best fit", FALSE),
# Add radio buttons for colour
___("color", ___, ___)
),
mainPanel(
plotOutput("plot")
)
)
)
# Define the server logic
server <- function(input, output) {
output$plot <- renderPlot({
p <- ggplot(gapminder, aes(gdpPercap, lifeExp)) +
# Use the value of the color input as the point colour
geom_point(size = input$size, col = input$___) +
scale_x_log10() +
ggtitle(input$title)
if (input$fit) {
p <- p + geom_smooth(method = "lm")
}
p
})
}
# Run the application
shinyApp(ui = ui, server = server)