Renk göstergeleri
Diyelim ki bisiklet paylaşım şirketi, bisiklet erişilebilirliğini en üst düzeye çıkarmak için yolculuklarının üçte ikisinin 10 dakikanın altında olmasını hedefliyor. Başarılarını, gösterge rengini temel alarak belirtebiliriz.
Bu egzersiz
flexdashboard ile Panolar Oluşturma
kursunun bir parçasıdırEgzersiz talimatları
- "% Kısa Yolculuk" göstergesine sektörler ekle: 67 ve üzeri success, 32 ve altı danger, aradaki değerler ise warning olsun.
Uygulamalı interaktif egzersiz
Bu örnek kodu tamamlayarak bu egzersizi bitirin.
{"my_document.Rmd":"---\ntitle: \"Bike Shares Daily\"\noutput: \n flexdashboard::flex_dashboard:\n orientation: columns\n vertical_layout: fill\n---\n\n```{r setup, include=FALSE}\nlibrary(flexdashboard)\nlibrary(readr)\nlibrary(tidyverse)\nlibrary(lubridate)\n\ntrips_df <- read_csv('https://assets.datacamp.com/production/course_6355/datasets/sanfran_bikeshare_joined_oneday.csv')\n```\n\nColumn {data-width=650}\n-----------------------------------------------------------------------\n\n### Origins\n\n\nColumn {data-width=350}\n-----------------------------------------------------------------------\n\n### Median Trip Length\n\n\n### % Short Trips\n\n```{r}\n\nnum_trips <- nrow(trips_df)\nshort_trips <- sum(trips_df$duration_sec < 600) # under 10 min\npct_short_trips <- round(100 * short_trips / num_trips, 0)\n\ngauge(value = pct_short_trips,\n min = 0,\n max = 100)\n\n```\n\n### Trips by Start Time\n\n\n"}