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