library(noggin) load('testdata/ISIP_raw.Rdata') # Raw experiment file head(simon) # Score the experiment and store it to object "td" td <- scoreExpt(simon, type = "simon") # Summarize summary(td) # Summarize with bootstrapping summary(td, statmethod = "bootstrap") # Extract the scored dataframe scored <- td$scored # or td[['scored']] head(scored) # Experiment objects also retain their raw data head(td$raw)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.