R/FOOOF_summaries.R

In JasonDude16/FOOOFAnalysis: What the Package Does (One Line, Title Case)

#' Summary function implementing FOOOF module in Python
#'
#'
#' @param data_list data_list
#' @param append append
#' @param img_path img_path
#' @param data_path data_path
#' @param freq_range freq_range
#' @export
#' @example

FOOOF_summaries <- function(data_list, append = NULL, img_path = NULL, data_path = NULL, freq_range = c(1L, 50L)) {

    if (!require(reticulate))
        stop("`reticulate` is required to use the FOOOF_summaries function")

    reticulate::py_run_file(system.file("python", "FOOOF_summaries.py", package = "FOOOFAnalysis"))

    py$FOOOF_summaries(
        data_list = data_list,
        append = append,
        img_path = img_path,
        data_path = data_path,
        freq_range = freq_range
    )

}