View source: R/prices_scores.R
hot_dog_avail | R Documentation |
This function takes in the number of varieties of fat free and light hot dogs and returns the NEMS-S points associated with availability.
hot_dog_avail(fat_free_hot_dogs, light_hot_dogs)
fat_free_hot_dogs |
The number of varieties of fat free hot dogs (0g fat per serving). |
light_hot_dogs |
The number of varieties of light hot dogs (<=7g fat per serving). |
This function implements the scoring method described in Measure 5 of the NEMS-S Protocol. "Fat free hot dogs" have 0 grams of fat per serving, and "light hot dogs" have less than or equal to 7 grams of fat per serving.
the NEMS-S points associated with availability of fat free and light fat hot dogs.
fat_free_hot_dogs <- sample() light_hot_dogs <- sample() hot_dog_avail(fat_free_hot_dogs, light_hot_dogs)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.