From 4079a2c496aa4e8c6dc2a93afedcbedbf7a852b5 Mon Sep 17 00:00:00 2001
From: Johannes Ranke
FOCUS (2014) Generic Guidance for Tier 1 FOCUS Ground Water Assessments. - Version 2.2, May 2014 +Version 2.2, May 2014 Dettenmaier EM, Doucette WJ and Bugbee B (2009) Chemical hydrophobicity and uptake by plant roots. Environ. Sci. Technol 43, 324 - 329
plot(TSCF, -1, 5, xlab = "log Kow", ylab = "TSCF", ylim = c(0, 1.1))
-
TSCF_2 <- function(x) TSCF(x, method = "dettenmaier09")
curve(TSCF_2, -1, 5, add = TRUE, lty = 2)
-#> Error in curve(TSCF_2, -1, 5, add = TRUE, lty = 2): could not find function "curve"
legend("topright", lty = 1:2, bty = "n",
legend = c("Briggs et al. (1982)", "Dettenmaier et al. (2009)"))
-#> Error in legend("topright", lty = 1:2, bty = "n", legend = c("Briggs et al. (1982)", "Dettenmaier et al. (2009)")): could not find function "legend"
+