
Last chance! 50% off unlimited learning
Sale ends in
This function takes coagulant doses in mg/L as chemical, removed turbidity, and plant flow as MGD to determine solids production.
solvemass_solids(
alum = 0,
ferricchloride = 0,
ferricsulfate = 0,
flow,
turb,
b = 1.5
)
A numeric value for solids mass in lb/day.
Amount of hydrated aluminum sulfate added in mg/L as chemical: Al2(SO4)3*14H2O + 6HCO3 -> 2Al(OH)3(am) +3SO4 + 14H2O + 6CO2
Amount of ferric chloride added in mg/L as chemical: FeCl3 + 3HCO3 -> Fe(OH)3(am) + 3Cl + 3CO2
Amount of ferric sulfate added in mg/L as chemical: Fe2(SO4)3*8.8H2O + 6HCO3 -> 2Fe(OH)3(am) + 3SO4 + 8.8H2O + 6CO2
Plant flow in MGD
Turbidity removed in NTU
Correlation factor from turbidity to suspended solids. Defaults to 1.5.
solids_mass <- solvemass_solids(alum = 50, flow = 10, turb = 20)
library(dplyr)
mass_data <- tibble(
alum = seq(10, 50, 10),
flow = 10
) %>%
mutate(mass = solvemass_solids(alum = alum, flow = flow, turb = 20))
#'
Run the code above in your browser using DataLab