Last updated on 2025-09-05 01:49:52 CEST.
| Flavor | Version | Tinstall | Tcheck | Ttotal | Status | Flags |
|---|---|---|---|---|---|---|
| r-devel-linux-x86_64-debian-clang | 1.3.0 | 11.41 | 505.92 | 517.33 | OK | |
| r-devel-linux-x86_64-debian-gcc | 1.3.0 | 6.48 | 103.94 | 110.42 | ERROR | |
| r-devel-linux-x86_64-fedora-clang | 1.3.0 | 828.81 | OK | |||
| r-devel-linux-x86_64-fedora-gcc | 1.3.0 | 804.93 | OK | |||
| r-devel-windows-x86_64 | 1.3.0 | 14.00 | 420.00 | 434.00 | OK | |
| r-patched-linux-x86_64 | 1.3.0 | 12.22 | 494.57 | 506.79 | OK | |
| r-release-linux-x86_64 | 1.3.0 | 10.46 | 495.57 | 506.03 | OK | |
| r-release-macos-arm64 | 1.3.0 | 164.00 | OK | |||
| r-release-macos-x86_64 | 1.3.0 | 319.00 | OK | |||
| r-release-windows-x86_64 | 1.3.0 | 15.00 | 424.00 | 439.00 | OK | |
| r-oldrel-macos-arm64 | 1.3.0 | 171.00 | OK | |||
| r-oldrel-macos-x86_64 | 1.3.0 | 442.00 | OK | |||
| r-oldrel-windows-x86_64 | 1.3.0 | 18.00 | 612.00 | 630.00 | OK |
Version: 1.3.0
Check: examples
Result: ERROR
Running examples in ‘fluxible-Ex.R’ failed
The error most likely occurred in:
> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### 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
Flavor: r-devel-linux-x86_64-debian-gcc
Version: 1.3.0
Check: tests
Result: ERROR
Running ‘testthat.R’ [29s/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 ─────────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ────────────────────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──────────────────────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ─────────────────────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ─────────────────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ───────────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──
<dplyr:::mutate_error/rlang_error/error/condition>
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 ─────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ───
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──
<dplyr:::mutate_error/rlang_error/error/condition>
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 ─────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ────────────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──────────────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ─────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ────────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ─────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──
<dplyr:::mutate_error/rlang_error/error/condition>
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 ───────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ───
<dplyr:::mutate_error/rlang_error/error/condition>
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 ───────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──
<dplyr:::mutate_error/rlang_error/error/condition>
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 ───────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ───
<dplyr:::mutate_error/rlang_error/error/condition>
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 ───
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──────────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ─────────────────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ────────────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ───
<dplyr:::mutate_error/rlang_error/error/condition>
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 ───
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──────────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ─────────────────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ───────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ─────────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ─────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──
<dplyr:::mutate_error/rlang_error/error/condition>
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 ────────────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ────────────────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──────────────────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ─────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ───────────────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──
<dplyr:::mutate_error/rlang_error/error/condition>
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 ───────────────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ─────────────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ─────────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ─────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ─────────────────────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ─────────────────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ────────────────────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ────────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ─────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──────────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ──────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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 ────────────────────
<dplyr:::mutate_error/rlang_error/error/condition>
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) ────────
<dplyr:::mutate_error/rlang_error/error/condition>
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) ────
<dplyr:::mutate_error/rlang_error/error/condition>
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
Flavor: r-devel-linux-x86_64-debian-gcc
Version: 1.3.0
Check: re-building of vignette outputs
Result: 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
Flavor: r-devel-linux-x86_64-debian-gcc