View source: R/prices_scores.R
chips_avail | R Documentation |
This function takes in the number of varieties of lowfat chips and returns the NEMS-S points associated with availability.
chips_avail(lowfat_chips_varieties)
lowfat_chips_varieties |
The number of varieties of lowfat chips offered. |
This function implements the scoring method described in Measure 10 of the NEMS-S Protocol. "Lowfat chips" are chips with less than or equal to 3g of fat per one ounce serving.
The NEMS-S points associated with lowfat chips availability.
lowfat_chips_varieties <- sample(1:10, 10) chips_avail(lowfat_chips_varieties)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.