View source: R/prices_scores.R
baked_goods_avail | R Documentation |
This function takes in the number of varieties of low-fat baked goods and returns the NEMS-S points associated with availability.
baked_goods_avail(lowfat_baked_goods)
lowfat_baked_goods |
The number of low-fat baked goods. |
This function implements the scoring method described in Measure 7 of the NEMS-S Protocol. "Low-fat baked goods" are baked goods with less than or equal to 3 grams of fat per serving.
The NEMS-S points associated with availability of low-fat baked goods.
lowfat_baked_goods <- sample(0:3, 10) baked_goods_avail(lowfat_baked_goods)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.