View source: R/identify_newfiles.R
match_ignoredfiles | R Documentation |
Identify S3 file names matching Ignored files
match_ignoredfiles(file_name, df_ref, ref_name = "name")
file_name |
Filename to be used as look up |
df_ref |
Reference data frame, Recommend using files present in S3 but not in gdrive, Eg: |
ref_name |
Column name to be used for lookup |
## Not run:
library(tidyverse)
library(Wavelength)
library(googlesheets4)
ss_sbm <- as_sheets_id("<xyz>")
df_ignore_files <- read_sheet(ss = ss_sbm, "ignore_files")
df_new <- identify_newfiles() # this will also generate df_submissions & df_archive
# Ghost files
df_ghosts <- df_submissions %>%
full_join(df_archive, by = c("name" = "sys_data_object")) %>%
filter(is.na(exists_gdrive))
# Match ignored files
df_ignore_files <- df_ignore_files %>%
mutate(names_s3 = match_ignoredfiles(name_googledrive, df_ghosts, "name")
# Update ignore files table
range_write(ss = sbm_form,
data = df_ignore_files,
sheet = "ignore_files",
col_names = TRUE)
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.