From 8e199905821a85fca921a6ebd6716d620749021f Mon Sep 17 00:00:00 2001 From: mrustl Date: Wed, 13 Mar 2024 13:15:40 +0100 Subject: [PATCH] test cloud file listing --- vignettes/measurement-chains.Rmd | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/vignettes/measurement-chains.Rmd b/vignettes/measurement-chains.Rmd index 1cdf986..83b5429 100644 --- a/vignettes/measurement-chains.Rmd +++ b/vignettes/measurement-chains.Rmd @@ -389,11 +389,10 @@ mc_dat <- mc_data %>% well_op_file <- kwb.nextcloud::list_files(path = paths$well_operation, - full_info = TRUE, - ) %>% + full_info = TRUE) %>% dplyr::filter(lastmodified == max(lastmodified)) - +if (FALSE) { file <- well_op_file$file[1] tdir <- fs::path_norm(paths$download_dir) @@ -430,6 +429,7 @@ tibble::tibble( well_op_data_meta <- well_op_data %>% dplyr::bind_cols(separate_name_der_messstelle_gms(well_op_data$name_der_messstelle_gms)) +} ``` @@ -438,7 +438,7 @@ well_op_data_meta <- well_op_data %>% and upload on cloud. -```{r make_combined_plot} +```{r make_combined_plot,eval = FALSE} well_ids <- c(9,10,13) pdf_names <- sprintf("mc_and_q_well-%02d.pdf", well_ids)