Yıllık ilaç dozajı görselleştirme – kod dizel

In: Genel


Son birkaç yıldır asit reflümü kontrol etmek için bir proton pompası inhibitörü (PPI) olan Pantoprazol’ü düzenli olarak tükettim. Ancak bilindiği gibi düzenli ÜFE kullanımı çeşitli sebeplere yol açmaktadır. sağlık sorunları. Bunları burada saymayacağım ama sayılarının çok olduğunu söylediğimde bana güvenin. Geçen yıl, herhangi bir günde yalnızca 20 mg’lık bir dozla sınırlayarak ve bazı günleri değiştirerek veya tamamen bırakarak, ÜFE’leri yavaş yavaş bırakmaya karar verdim. Dozaj bilgilerimi daha sonra işleyebilmek için cep telefonumda Google takvimine kaydettim. Artık bir yıldan fazla bir veriye sahip olduğum için, dozaj alışkanlıklarımı anlamak için onu görselleştirmeyi düşündüm.

Google takvim verilerini kullanılabilir bir biçimde elde etmek ilk zorluktu. Neyse ki, verileri CSV biçiminde kolayca indirmeme izin veren bir çevrimiçi hizmet – Calendarlabs.com – buldum.

Aklımdaki görselleştirme türü aşağıdaki ısı haritası gibiydi. Her ne kadar görselleştirmem sadece günü ÜFE aldığım dolu bir kare ile gösterecekti.

Verileri görselleştirmek için R kullanmak istediğim için bulduğum en yakın paket Paul Bleicher’ın Takvim Isı Haritası koduydu.

Grafiğin oluşturulmasındaki ilk adım, günlük dozaj verilerini içeren CSV dosyasını okumaktı.

> pan.data <- read.csv("gcal-p.csv")

# A few sample rows from the data file
> head(pan.data)
  dosage      date
1      1  2018-1-1
2      1  2018-1-4
3      1  2018-1-7
4      1  2018-1-8
5      1  2018-1-9
6      1 2018-1-10

Grafiği oluşturmak için Takvim koduna ihtiyacımız var. Mevcut dizinimize indirebilir ve kullanabiliriz veya sadece çevrimiçi sürümünü kullanabiliriz.

> source("https://raw.githubusercontent.com/iascchen/VisHealth/master/R/calendarHeat.R")

Kod, kafes, ızgara ve kron gibi ek kitaplıklar yükleyecektir, bu nedenle bunların kurulu olduğundan emin olun.

Şimdi yüklenen verilerle, aşağıda gösterildiği gibi yıllık grafiği oluşturmak için takvim kodunu çalıştırıyoruz.

> calendarHeat(pan.data$date, pan.data$dosage, varname="Pan 20 dosage",color = "w2b")

CalendarHeat() işlevi aşağıdaki seçenekleri alır.

tarih: Verilerin çizilmesi gereken tarihler.
değerler: Bu tarihlerle ilişkili değerler.
renk: Renk paleti. Varsayılan r2g’dir (kırmızıdan yeşile). Diğer önceden tanımlanmış seçenekler r2b (kırmızıdan maviye) ve w2b’dir (beyazdan maviye). Aşağıda gösterildiği gibi bir vektör tanımlayarak kendi paletinizi oluşturabilirsiniz.
ncolors: Isı haritası için renk sayısı
varname: Grafiğin başlığı

 calendarHeat(pan.data$date, pan.data$dosage, varname="Pan 20 dosage",color = "r2g")

Izgaranın renkleri verilen üç stilden değiştirilebilir –

r2b #kırmızıdan maviye
r2g #kırmızıdan yeşile
w2b #beyazdan maviye
g2r #yeşilden kırmızıya

Bir cevap yazın

Ready to Grow Your Business?

We Serve our Clients’ Best Interests with the Best Marketing Solutions. Find out More

How Can We Help You?

Need to bounce off ideas for an upcoming project or digital campaign? Looking to transform your business with the implementation of full potential digital marketing?

For any career inquiries, please visit our careers page here.
[contact-form-7 404 "Bulunamadı"]