ground_beef_cost: Compute ground beef cost points

In byu-transpolab/nemsr: Process NEMS Datasets in R

Compute ground beef cost points

Description

This function takes in the cost of lean and regular ground beef and compares them to return a NEMS-S score for the cost.

Usage

ground_beef_cost(lean_beef_price, regular_beef_price)

Arguments

lean_beef_price	The price of lean ground beef.
regular_beef_price	The price of normal fat ground beef.

Details

This function implements the scoring method described in Table 4.1 of Lundsford (2016). "Standard ground beef" is 80 percent lean and 20 percent fat by weight. "Lean ground beef" is 90 percent lean and 10 percent fat (or less fat percentage) by weight.

Value

the NEMS-S points associated with beef price

Examples

lean_beef_price <- rnorm(10,5.8,.5)
regular_beef_price <- rnorm(10,5.5,.3)
ground_beef_cost(lean_beef_price, regular_beef_price)

byu-transpolab/nemsr documentation built on Feb. 10, 2023, 11:24 p.m.