R/report_pipeline.R

In debruine/pipeline: Machine-Readable Studies

#' Generate automatic annalysis report
#'
#' Creates a word document with standardized analyses. Currently only exists for t-tests.
#'
#' @param json_file_name	a character vector specifying the file name (and path).
#' @param data_file_name	a character vector specifying the file name (and path).
#' @param report_type a character vector specifying the report type (FIX: give defaults)
#'
report_pipeline <- function(json_file_name, data_file_name, report_type) {
  study_json <- pipeline(json_file_name)

  rmarkdown::render(paste(report_type,".Rmd", sep = ""),
                    output_file =  paste("report_", study_json$name, '_', Sys.Date(), ".doc", sep=''),
                    output_dir = NULL)
}