## ----basic, eval = FALSE------------------------------------------------------
# # load the package
# library(fmriqa)
# 
# # get help on the options for run_fmriqa
# ?run_fmriqa
# 
# # run the analysis - a file chooser will appear when a data_file argument is not given
# run_fmriqa()

## ----real_data, eval = TRUE---------------------------------------------------
library(fmriqa)
fname <- system.file("extdata", "qa_data.nii.gz", package = "fmriqa")
res <- run_fmriqa(data_file = fname, gen_png = FALSE, gen_res_csv = FALSE, tr = 3)