solvecost_chem {tidywater} | R Documentation |
Determine chemical cost
Description
This function takes a chemical dose in mg/L, plant flow, chemical strength, and $/lb and calculates cost.
Usage
solvecost_chem(dose, flow, strength = 100, cost, time = "day")
Arguments
dose |
Chemical dose in mg/L as chemical |
flow |
Plant flow in MGD |
strength |
Chemical product strength in percent. Defaults to 100 percent. |
cost |
Chemical product cost in $/lb |
time |
Desired output units, one of c("day", "month", "year"). Defaults to "day". |
Value
A numeric value for chemical cost, $/time.
Examples
alum_cost <- solvecost_chem(dose = 20, flow = 10, strength = 49, cost = .22)
library(dplyr)
cost_data <- tibble(
dose = seq(10, 50, 10),
flow = 10
) %>%
mutate(costs = solvecost_chem(dose = dose, flow = flow, strength = 49, cost = .22))
[Package tidywater version 0.8.2 Index]