skorpph {ddp} | R Documentation |
Desirable dietary pattern calculation
Description
This function calculates the desirable dietary pattern (DDP).
Usage
skorpph(data, wilayah = "Indonesia", baseline = 2000)
Arguments
data |
A data set of (n x 218) (see Details). |
wilayah |
An origin of the responden residence. (see Details). |
baseline |
A baseline value of personal calory required. |
Details
The data set is an n x 218 data frame. The first column is
the name of the respondent. wilayah
argument has "Indonesia" as the
default, meaning that the DPP are calculated based on the national (Indonesia)
baseline. The other possible inputs for wilayah
are "Aceh", "Sumut",
"Sumbar", "Riau", "KepRiau", "Jambi", "Sumsel", "Babel", "Bengkulu",
"Lampung", "Jakarta", "Jabar", "Banten", "Jateng", "DIY", "Jatim", "Bali",
"NTB", "NTT", "Kalbar", "Kalteng", "Kalsel", "Kaltim", "Kalut", "Sulut",
"Sulteng", "Sultra", "Sulsel", "Gorontalo", "Sulbar", "Maluku", "Malut",
"Papua", "Papbar". For baseline
argument, it is 2000 as the default
value because the minimal calory required in Indonesia is 2000 calory.
Value
Function returns a vector with n length indicates the index/ indices of the DDP per peson.
Author(s)
Weksi Budiaji
Contact: budiaji@untirta.ac.id
References
BKP, Kementan. 2017. Aplikasi Harmonisasi Analisis PPH Data Susenas 2017. Badan Ketahanan Pangan Kementrian Pertanian.
Examples
#data simulation of 10 person
set.seed(2020)
n <- 10
matsim <- matrix(0, n, 218)
datsim <- as.data.frame(matsim)
datsim$V1 <- LETTERS[1:n]
#calory for boiled rice
datsim$V2 <- rnorm(n, 200, 50)
#calory for boiled egg
datsim$V73 <- rnorm(n, 60, 5)
#calory for fresh milk
datsim$V79 <- rnorm(n, 100, 10)
#calory for tomato
datsim$V93 <- rnorm(n, 19, 2)
#caloty for pineapple
datsim$V134 <- rnorm(n, 20, 2)
skorpph(datsim)