diff --git a/R/empirical_transfer_function.R b/R/empirical_transfer_function.R index ba3ce3f..da1387a 100644 --- a/R/empirical_transfer_function.R +++ b/R/empirical_transfer_function.R @@ -23,7 +23,7 @@ empirical_transfer_function <- function(.data, ..., # columns for append_expected_values std_names = paste0("ETH-", 1:3), - std_values = c(0.258, 0.256, 0.691) - 0.062, #0.507), + std_values = c(0.2052, 0.2085, 0.6132), ## outlier = outlier, raw = D47_raw, exp = expected_D47, diff --git a/man/empirical_transfer_function.Rd b/man/empirical_transfer_function.Rd index 2cb7790..6b8f4ad 100644 --- a/man/empirical_transfer_function.Rd +++ b/man/empirical_transfer_function.Rd @@ -8,7 +8,7 @@ empirical_transfer_function( .data, ..., std_names = paste0("ETH-", 1:3), - std_values = c(0.258, 0.256, 0.691) - 0.062, + std_values = c(0.2052, 0.2085, 0.6132), raw = D47_raw, exp = expected_D47, session = Preparation,