solvecost_chem: Determine chemical cost

In tidywater: Water Quality Models for Drinking Water Treatment Processes

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))

tidywater documentation built on Aug. 8, 2025, 7:15 p.m.