#' Convert to dataframe
#'
#' Can be applied to both groupcheck definitions or check results
#'
#' @export
#'
#' @param x data to be converted
convert_to_df <- function(x) {
df <- Reduce(f = rbind, x = x)
rownames(df) <- NULL
as.data.frame(df, stringsAsFactors = FALSE)
}
#' Convert group of checks into dataframe
#'
#' @export
#'
#' @param group group of checks to be converted
convert_checks_to_df <- function(group) {
df <- Reduce(f = rbind, x = group)
rownames(df) <- NULL
as.data.frame(df, stringsAsFactors = FALSE)
}
#' Convert check results into data frame
#'
#' @export
#'
#' @param check_results list of check results produced by \code{run_checks}
#' function
convert_run_results_to_df <- function(check_results) {
df <- Reduce(f = rbind, x = check_results)
rownames(df) <- NULL
as.data.frame(df, stringsAsFactors = FALSE)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.