Päivien lukumäärä

Tutkittavia pyydetään tavallisesti pitämään ruokapäiväkirjaa tietyn ajanjakson, esimerkiksi kolmen päivän ajan. On kuitenkin tavallista, että osa tutkittavista pitää sitä vain yhden tai kaksi päivää. Tutkittava on myös saattanut kirjata osan päivistä niin puutteellisesti, että ne päätetään jättää tallentamatta.

Kullekin tutkittavalle aineistosta löytyvien päivien lukumäärän voi poimia AivoDiet:n outputista erilliseksi muuttujaksi alla kuvatulla tavalla. Mikä tahansa päivämäärä, jolle on tallennettu edes yksi tuote, tulee tässä huomioiduksi. (Jos puutteellisesti kirjattuja päiviä on tallennettu AivoDiet-ohjelmaan ja ne halutaan poistaa, se pitää siis tehdä erikseen.)

#poimitaan muuttujat ID_child ja DaDate
myvars <- c("ID_child", "DaDate")
daydata <- rldata[myvars]

# lasketaan montako uniikkia päivämäärää kullakin henkilöllä on
numdays <-with(daydata, tapply(DaDate, ID_child, FUN = function(x) length(unique(x))))

# ja muutetaan edellisen tulos data-muotoon
rldatanumdays <- data.frame(ID_child=names(numdays),n_days=numdays)

head(rldatanumdays, n=10)

#tehdään tiedostosta .txt-muotoinen.
write.table(rldatanumdays, "Z:/MyDocuments/blogi/ruokalaji/rldatanumdays.txt", sep="\t", col.names=NA)

Vastaa

Täytä tietosi alle tai klikkaa kuvaketta kirjautuaksesi sisään:

WordPress.com-logo

Olet kommentoimassa WordPress.com -tilin nimissä. Log Out /  Muuta )

Google photo

Olet kommentoimassa Google -tilin nimissä. Log Out /  Muuta )

Twitter-kuva

Olet kommentoimassa Twitter -tilin nimissä. Log Out /  Muuta )

Facebook-kuva

Olet kommentoimassa Facebook -tilin nimissä. Log Out /  Muuta )

Muodostetaan yhteyttä palveluun %s