library(tbltools)

Fetch evaluations

pe_data <- tbl_fetch_peer_evaluation_data(data_gs_title = "${data_gs_title}")
pe_data

Check for missing evaluations

# check which ones are not yet started or submitted
pe_data %>% 
  dplyr::filter(!started | !submitted) %>% 
  dplyr::select(started, submitted, dplyr::everything())

Summarize evaluations

pe_data %>% tbl_summarize_peer_evaluation_data(submitted_only = FALSE)

Export to Excel

# exports both summary and raw data
pe_data %>% tbl_export_peer_evaluation_data(submitted_only = FALSE)


KopfLab/tbltools documentation built on July 30, 2023, 11:16 p.m.