alum_mass <- solvemass_chem(dose = 20, flow = 10, strength = 49)
library(dplyr)
mass_data <- tibble(
dose = seq(10, 50, 10),
flow = 10
) %>%
mutate(mass = solvemass_chem(dose = dose, flow = flow, strength = 49))
Run the code above in your browser using DataLab