Girdi türleri

shinydashboard ile Panolar Oluşturma

Png Kee Seng

Researcher

Girdi fonksiyonları

Kullanıcılar arayüzde girdi sağlar
- Garsona verilen talimatlar gibidir
shinyApp’te bu talimatlar sunucu üzerinden iletilir
Bunun için UI’a girdi fonksiyonları eklenir
<type>input(<kimlik etiketi>, <görünen etiket>, ...)
- İlk argüman kimlik etiketidir
- İkinci argüman görünen etikettir
- Diğer argümanlar girdi türüne özeldir

Örnek: uyku çalışması

Bir uyku çalışması yaptığımızı ve veri topladığımızı varsayalım
Bir shinyApp kullanıcısı hangi girdileri verebilir?

Bir uyku çalışmasının görseli

¹ Freepik’te storyset’in görseli

selectInput

Yaygın bir girdi selectInput()’tır
Çoklu seçenekli bir açılır menü oluşturur
Üçüncü argüman, olası seçenekleri içeren bir vektördür
Bu örnekte dört seçenek var
Şimdilik sunucuyu boş bırakalım
shinyApp() çalıştırarak uygulamayı oluşturalım

ui <- fluidPage(
  titlePanel("Sleeping habits in America"), 
    selectInput("selectlabel", 
                "Select an option",

                choices = c("Option 1", "Option 2", 
                            "Option 3", "Option 4"))

server <- function(input, output, session) {
}

shinyApp(ui, server)

selectInput

Tek seçimli selectInput.

Birden çok seçimli selectInput

multiple adlı bir argüman da ekleyebiliriz

ui <- fluidPage(
titlePanel("Sleeping habits in America"), 
  selectInput("selectlabel", 
              "Select an option",
              choices = c("Option 1", "Option 2", "Option 3", "Option 4"),
              multiple = TRUE))
server <- function(input, output, session) {
}
shinyApp(ui, server)

Birden çok seçimli selectInput

textInput

İki önemli argüman daha vardır
- value: metin kutusunun başlangıç değeri
- placeholder: ne girileceğine dair ipucu

ui <- fluidPage(
  titlePanel("Sleeping habits in America"), 
  textInput("textlabel", 
            "Tell me your name", 

            value = "Birdie",

            placeholder = "Don"))

server <- function(input, output, session) {
}
shinyApp(ui, server)

textInput

textInput demosu

checkboxInput

Uygulamada tek bir onay kutusu sağlar
value: başlangıç durumunu ayarlar; TRUE veya FALSE
checkboxInput’ın checkboxGroupInput adlı bir varyasyonu da vardır

ui <- fluidPage(
  titlePanel("Sleeping habits in America"), 
  checkboxInput("checkboxlabel",
                "65 years and over",

                value = FALSE))


server <- function(input, output, session) {
}

shinyApp(ui, server)

checkboxInput

checkboxInput demosu

sliderInput

Bu, kullanıcıya iki seçeneği olan bir kaydırıcı üretir
- Bir aralıktan tek bir sayısal değer seçmek
- Bir aralıktan iki sayısal değer seçmek
Tek değer için min ve max ayarlanır
Başlangıç değeri value ile belirlenir
Adım boyutu step ile belirlenir

ui <- fluidPage(
  titlePanel("Sleeping habits in America"), 
  sliderInput("sliderlabel",
              "Average hours of sleep",

              min = 7.5,
              max = 11,

              value = 9,

              step = 0.02))

server <- function(input, output, session) {
}

shinyApp(ui, server)

sliderInput

sliderInput demosu. Kullanıcı tek bir değer seçebilir.

Aralıklı sliderInput

value uzunluğu 2 bir vektörse kaydırıcı çift uçlu olur

ui <- fluidPage(
  titlePanel("Sleeping habits in America"), 
  sliderInput("sliderlabel",
              "Average hours of sleep",
              min = 7.5,
              max = 11,

              value = c(8, 10),

              step = 0.02))
server <- function(input, output, session) {
}

shinyApp(ui, server)

Aralıklı sliderInput

Aralıklı kaydırıcı

Ayo berlatih!

shinydashboard ile Panolar Oluşturma