* using log directory 'd:/Rcompile/CRANpkg/local/4.6/fluxible.Rcheck' * using R Under development (unstable) (2025-09-03 r88788 ucrt) * using platform: x86_64-w64-mingw32 * R was compiled by gcc.exe (GCC) 14.2.0 GNU Fortran (GCC) 14.2.0 * running under: Windows Server 2022 x64 (build 20348) * using session charset: UTF-8 * checking for file 'fluxible/DESCRIPTION' ... OK * this is package 'fluxible' version '1.3.0' * package encoding: UTF-8 * checking package namespace information ... OK * checking package dependencies ... OK * checking if this is a source package ... OK * checking if there is a namespace ... OK * checking for hidden files and directories ... OK * checking for portable file names ... OK * checking whether package 'fluxible' can be installed ... OK * checking installed package size ... OK * checking package directory ... OK * checking 'build' directory ... OK * checking DESCRIPTION meta-information ... OK * checking top-level files ... OK * checking for left-over files ... OK * checking index information ... OK * checking package subdirectories ... OK * checking code files for non-ASCII characters ... OK * checking R files for syntax errors ... OK * checking whether the package can be loaded ... [2s] OK * checking whether the package can be loaded with stated dependencies ... [2s] OK * checking whether the package can be unloaded cleanly ... [2s] OK * checking whether the namespace can be loaded with stated dependencies ... [2s] OK * checking whether the namespace can be unloaded cleanly ... [2s] OK * checking loading without being on the library search path ... [2s] OK * checking use of S3 registration ... OK * checking dependencies in R code ... OK * checking S3 generic/method consistency ... OK * checking replacement functions ... OK * checking foreign function calls ... OK * checking R code for possible problems ... [7s] OK * checking Rd files ... [1s] OK * checking Rd metadata ... OK * checking Rd cross-references ... OK * checking for missing documentation entries ... OK * checking for code/documentation mismatches ... OK * checking Rd \usage sections ... OK * checking Rd contents ... OK * checking for unstated dependencies in examples ... OK * checking contents of 'data' directory ... OK * checking data for non-ASCII characters ... [1s] OK * checking LazyData ... OK * checking data for ASCII and uncompressed saves ... OK * checking R/sysdata.rda ... OK * checking installed files from 'inst/doc' ... OK * checking files in 'vignettes' ... OK * checking examples ... [4s] ERROR Running examples in 'fluxible-Ex.R' failed The error most likely occurred in: > ### Name: flux_calc > ### Title: Calculates ecosystem gas fluxes > ### Aliases: flux_calc > > ### ** Examples > > data(co2_conc) > slopes <- flux_fitting(co2_conc, conc, datetime, fit_type = "exp_zhao18") Error in `mutate()`: ℹ In argument: `glance = map(.data$model, glance)`. ℹ In group 1: `f_fluxid = 1`. Caused by error in `map()`: ℹ In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. ├─fluxible::flux_fitting(co2_conc, conc, datetime, fit_type = "exp_zhao18") 2. │ └─fluxible:::flux_fitting_lm(...) 3. │ ├─dplyr::ungroup(...) 4. │ ├─dplyr::select(...) 5. │ ├─dplyr::rename(...) 6. │ ├─tidyr::unnest(...) 7. │ ├─tidyr::pivot_wider(...) 8. │ ├─dplyr::select(...) 9. │ ├─tidyr::unnest(...) 10. │ ├─dplyr::select(...) 11. │ ├─dplyr::mutate(...) 12. │ └─dplyr:::mutate.data.frame(...) 13. │ └─dplyr:::mutate_cols(.data, dplyr_quosures(...), by) 14. │ ├─base::withCallingHandlers(...) 15. │ └─dplyr:::mutate_col(dots[[i]], data, mask, new_columns) 16. │ └─mask$eval_all_mutate(quo) 17. │ └─dplyr (local) eval() 18. ├─purrr::map(.data$model, glance) 19. │ └─purrr:::map_("list", .x, .f, ..., .progress = .progress) 20. │ ├─purrr:::with_indexed_errors(...) 21. │ │ └─base::withCallingHandlers(...) 22. │ ├─purrr:::call_with_cleanup(...) 23. │ ├─generics (local) .f(.x[[i]], ...) 24. │ └─broom:::glance.lm(.x[[i]], ...) 25. │ ├─base::with(...) 26. │ └─base::with.default(...) 27. │ └─base::eval(substitute(expr), data, enclos = parent.frame()) 28. │ └─base::eval(substitute(expr), data, enclos = parent.frame()) 29. │ └─tibble::tibble(...) 30. │ └─tibble:::tibble_quos(xs, .rows, .name_repair) 31. │ └─rlang::eval_tidy(xs[[j]], mask) 32. ├─stats::AIC(x) 33. ├─stats:::AIC.default(x) 34. └─base::.handleSimpleError(...) 35. └─purrr (local) h(simpleError(msg, call)) 36. └─cli::cli_abort(...) 37. └─rlang::abort(...) Execution halted * checking for unstated dependencies in 'tests' ... OK * checking tests ... [36s] ERROR Running 'testthat.R' [36s] Running the tests in 'tests/testthat.R' failed. Complete output: > # This file is part of the standard setup for testthat. > # It is recommended that you do not modify it. > # > # Where should you do additional test configuration? > # Learn more about the roles of various files in: > # * https://r-pkgs.org/testing-design.html#sec-tests-files-overview > # * https://testthat.r-lib.org/articles/special-files.html > > library(testthat) > library(fluxible) > > test_check("fluxible") Column flux of data frame fluxes has to be numeric Argument start_cut has to be numeric Argument start_cut has to be numeric Column flux of data frame fluxes has to be numeric Joining with `by = join_by(warming)` Argument par_er has to be numeric Column warming of data frame co2_fluxes_lrc has to be numeric Column datetime of data frame co2_df_short has to be POSIXct Column start of data frame record_short has to be POSIXct Argument measurement_length has to be numeric Argument time_diff has to be numeric Column turfID of data frame record_short has to be POSIXct [ FAIL 80 | WARN 0 | SKIP 34 | PASS 30 ] ══ Skipped tests (34) ══════════════════════════════════════════════════════════ • On CRAN (34): 'test-flux_calc.R:190:3', 'test-flux_calc.R:207:3', 'test-flux_diff.R:2:3', 'test-flux_diff.R:16:3', 'test-flux_diff.R:30:3', 'test-flux_diff.R:68:3', 'test-flux_diff.R:108:3', 'test-flux_diff.R:164:3', 'test-flux_diff.R:188:3', 'test-flux_diff.R:226:3', 'test-flux_diff.R:281:3', 'test-flux_drygas.R:2:3', 'test-flux_drygas.R:8:3', 'test-flux_gep.R:2:3', 'test-flux_gep.R:14:3', 'test-flux_gep.R:50:3', 'test-flux_gep.R:87:3', 'test-flux_gep.R:104:3', 'test-flux_gep.R:126:3', 'test-flux_gep.R:162:3', 'test-flux_gpp.R:2:3', 'test-flux_gpp.R:14:3', 'test-flux_gpp.R:50:3', 'test-flux_gpp.R:87:3', 'test-flux_gpp.R:137:3', 'test-flux_gpp.R:159:3', 'test-flux_gpp.R:195:3', 'test-flux_lrc.R:15:3', 'test-flux_lrc.R:31:3', 'test-flux_match.R:2:3', 'test-flux_match.R:22:3', 'test-flux_match.R:46:3', 'test-flux_match.R:60:3', 'test-flux_match.R:153:3' ══ Failed tests ════════════════════════════════════════════════════════════════ ── Error ('test-flux_calc.R:2:3'): flux calculation is correct ───────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_calc.R:33:3'): averaging works ──────────────────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_calc.R:65:3'): keeping works ────────────────────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_calc.R:92:3'): keeping and averaging work together ──────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_calc.R:122:3'): nesting works ───────────────────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_calc.R:156:3'): nesting all works ───────────────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_calc.R:228:3'): error on air temp units ─────────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_calc.R:269:3'): error that slope column is missing ──────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_calc.R:296:3'): error slope_col cannot be found in slopes_df ── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_calc.R:325:3'): error some cols_keep do not exist ───────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_calc.R:358:3'): calculating fluxes on dataset with cuts ─── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_calc.R:386:3'): volume can be a variable instead of a constant ── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_calc.R:424:3'): pressure can be a variable instead of a constant ── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_calc.R:469:3'): Fluxible workflow works from start to finish ── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_calc.R:506:3'): Stupeflux returns the same as step by step workflow ── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_calc.R:555:3'): Stupeflux works with slope_correction = FALSE ── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_calc.R:555:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_calc.R:584:3'): Fluxible workflow works with kappamax ───── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_calc.R:628:3'): Working with two gases ──────────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_calc.R:712:3'): sum and median works ────────────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_calc.R:745:3'): sum and average works on same variable ──── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_fit_type.R:2:3'): extracts the fit correclty ────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_fit_type.R:19:3'): fit transfer from flux_fitting ───────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_fitting.R:2:3'): works for exponential fitting ──────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_fitting.R:2:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_fitting.R:15:3'): works for linear fitting ──────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_fitting.R:15:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_fitting.R:28:3'): works for quadratic fitting ───────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_fitting.R:28:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_fitting.R:41:3'): works for exponential fitting with cut ── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_fitting.R:41:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_fitting.R:55:3'): works for linear fitting with cut ─────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_fitting.R:55:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_fitting.R:77:3'): removing duplicated datetime ──────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_fitting.R:77:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_fitting.R:97:3'): correct flux with duplicated datetime ─── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_fitting.R:114:3'): works for exp_tz fitting ─────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_fitting.R:114:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_fitting.R:128:3'): works for exp_zhao18 with missing data ── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_fitting.R:128:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_fitting.R:143:3'): works for exp_zhao18 with mid missing data ── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_fitting.R:143:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_fitting.R:158:3'): works for exp_tz with mid missing data ── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_fitting.R:158:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_fitting.R:173:3'): works for quadratic with mid missing data ── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_fitting.R:173:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_fitting.R:199:3'): exp_tz: optim produces non-finite values ── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_fitting.R:199:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_fitting.R:224:3'): exp_zhao18: optim produces non-finite values ── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_fitting.R:224:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_fitting.R:239:3'): works for exp_hm fitting ─────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_fitting.R:239:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_fitting.R:252:3'): fitting works with 0 second end cut ──── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_fitting.R:263:3'): fitting works with 30 second end cut ─── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_fitting.R:263:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_fitting.R:273:3'): fitting works with 60 second end cut ─── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_fitting.R:273:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_fitting.R:286:3'): warnings when NAs are dropped in conc ── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_fitting.R:303:3'): warnings when there is no data in conc ── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_fitting.R:315:3'): warnings with cutting ────────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_fitting.R:370:3'): renaming works ───────────────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_fitting.R:370:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_fitting.R:383:3'): quadratic fit works ──────────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_fitting.R:383:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_fitting.R:399:3'): fitting works with 0 second end cut ──── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_fitting.R:399:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_fitting.R:410:3'): fitting works with 30 second end cut ─── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_fitting.R:410:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_fitting.R:422:3'): fitting works with 60 second end cut ─── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_fitting.R:422:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_fitting.R:437:3'): warnings when NAs are dropped in conc ── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_fitting.R:453:3'): warnings when there is no data in conc ── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_fitting.R:464:3'): warnings with cutting ────────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_fitting.R:518:3'): renaming works ───────────────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_fitting.R:518:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_fitting.R:531:3'): cut direction from start ─────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_fitting.R:531:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_fitting.R:547:3'): cut direction from end ───────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_fitting.R:547:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_flag_count.R:2:3'): quality flags count works ───────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_flag_count.R:18:3'): quality flags count works after calculating fluxes ── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_plot.R:2:3'): plot for exponential fit ──────────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_plot.R:29:3'): plot for linear fit ──────────────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_plot.R:49:3'): plot for linear fit with jpg extension works ── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_plot.R:75:3'): ggssave and print ────────────────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_plot.R:104:3'): plot can be exported as an object ───────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_plot.R:120:3'): plot for exp_tz fit ─────────────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_plot.R:120:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_plot.R:139:3'): plot for exp_tz fit with mid missing data ── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_plot.R:139:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_plot.R:157:3'): plot for exp_zhao18 fit with mid missing data ── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_plot.R:157:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_plot.R:175:3'): plot for quadratic fit with mid missing data ── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_plot.R:175:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_plot.R:193:3'): plot for exp_hm fit ─────────────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_plot.R:193:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_plot.R:211:3'): plot for kappamax fit ───────────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_plot.R:211:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_plot.R:234:3'): plot with custom facet id ───────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_plot.R:259:3'): error with custom facet id not unique ───── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_plot.R:282:3'): longpdf works ───────────────────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_plot.R:307:3'): longpdf and print ───────────────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_plot.R:335:3'): argument error ──────────────────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_quality.R:2:3'): works for exponential fitting ──────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_quality.R:20:3'): works for linear fitting ──────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_quality.R:38:3'): works for quadratic fitting ───────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_quality.R:61:3'): kappamax with HM model ────────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_quality.R:83:3'): kappamax with zhao18 model ────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_quality.R:107:3'): works in a pipeline ──────────────────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" Backtrace: ▆ 1. └─testthat::expect_snapshot(...) at test-flux_quality.R:107:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-flux_units.R:38:3'): superseeded but still works (mmol) ──────── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" ── Error ('test-flux_units.R:69:3'): superseeded but still works (micromol) ──── Error in `mutate(nest(group_by(conc_df_cut, { { f_fluxid } })), model = map(.x = data, function(.x) lm(.x[[name_conc]] ~ f_time_cut, data = .x)), tidy = map(.data$model, tidy), glance = map(.data$model, glance))`: i In argument: `glance = map(.data$model, glance)`. i In group 1: `f_fluxid = 1`. Caused by error in `map()`: i In index: 1. Caused by error in `ll()`: ! could not find function "ll" [ FAIL 80 | WARN 0 | SKIP 34 | PASS 30 ] Deleting unused snapshots: • flux_plot/ggssave-and-print.svg • flux_plot/longpdf-and-print.svg • flux_plot/plot-as-an-object.svg • flux_plot/plot-for-linear-fit.svg • flux_plot/plot-with-custom-facet-id.svg Error: Test failures Execution halted * checking for unstated dependencies in vignettes ... OK * checking package vignettes ... OK * checking re-building of vignette outputs ... [20s] ERROR Error(s) in re-building vignettes: --- re-building 'data-prep.Rmd' using rmarkdown --- finished re-building 'data-prep.Rmd' --- re-building 'fluxible.Rmd' using rmarkdown Quitting from fluxible.Rmd:92-104 [fitting_exp] ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ NULL ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Error: processing vignette 'fluxible.Rmd' failed with diagnostics: ℹ In argument: `glance = map(.data$model, glance)`. ℹ In group 1: `f_fluxid = 1`. Caused by error in `map()`: ℹ In index: 1. Caused by error in `ll()`: ! could not find function "ll" --- failed re-building 'fluxible.Rmd' --- re-building 'li7500.Rmd' using rmarkdown Quitting from li7500.Rmd:85-89 [fitting_co2] ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ NULL ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Error: processing vignette 'li7500.Rmd' failed with diagnostics: ℹ In argument: `glance = map(.data$model, glance)`. ℹ In group 1: `f_fluxid = "ACJ_C_10apr2019_plot1_p.txt"`. Caused by error in `map()`: ℹ In index: 1. Caused by error in `ll()`: ! could not find function "ll" --- failed re-building 'li7500.Rmd' --- re-building 'two-gases.Rmd' using rmarkdown Quitting from two-gases.Rmd:43-59 [fitting-twogases] ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ NULL ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Error: processing vignette 'two-gases.Rmd' failed with diagnostics: ℹ In argument: `glance = map(.data$model, glance)`. ℹ In group 1: `f_fluxid = 1`. Caused by error in `map()`: ℹ In index: 1. Caused by error in `ll()`: ! could not find function "ll" --- failed re-building 'two-gases.Rmd' SUMMARY: processing the following files failed: 'fluxible.Rmd' 'li7500.Rmd' 'two-gases.Rmd' Error: Vignette re-building failed. Execution halted * checking PDF version of manual ... [22s] OK * checking HTML version of manual ... [10s] OK * DONE Status: 3 ERRORs