knitr::opts_chunk$set(echo = FALSE) library(pipeline)
# set the path for your json file json_path <- system.file("extdata", "iat.json", package = "pipeline") # set the path for your data file; leave commented if no data exists data_path <- system.file("extdata", "iat.csv", package = "pipeline")
if (exists("data_path")) { # run analyses from the json file on the data study <- pipeline(json_path, data_path) } else { study <- jsonlite::read_json(json_path) } summary(study, "hypotheses", "analyses", "results")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.