water1 <- define_water(ph = 7, alk = 100, tds = 100, toc = 5) %>%
modify_water(slot = "toc", value = 4, units = "mg/L")
water2 <- define_water(ph = 7, alk = 100, tds = 100, toc = 5, ca = 10) %>%
modify_water(slot = c("ca", "toc"), value = c(20, 10), units = c("mg/L", "mg/L"))
example_df <- water_df %>%
define_water_df() %>%
dplyr::mutate(bromide = 50) %>%
modify_water_df(slot = "br", value = bromide, units = "ug/L")
example_df <- water_df %>%
define_water_df() %>%
modify_water_df(
slot = c("br", "na"),
value = c(50, 60),
units = c("ug/L", "mg/L")
)
Run the code above in your browser using DataLab