Publications by Jen Richmond
marchPsiChi challnege
You will be using this dataset: https://osf.io/jfdtk/ The data set is from this publication: https://cdn.ymaws.com/www.psichi.org/resource/resmgr/journal_2019/24_2_crambletalvarez.pdf A codebook can be found here: https://osf.io/bkd5m/ You can complete and submit R script for any of the four levels, but higher levels require the completion of low...
2915 sym R (4018 sym/28 pcs) 1 img
psichi_april
April 2020 PsiChiR challenge The new challenge is up! Contest submissions: submit here. For this contest, you will be using this dataset: https://osf.io/jfdtk/ The data set is from this publication: https://cdn.ymaws.com/www.psichi.org/resource/resmgr/journal_2019/24_2_crambletalvarez.pdf A codebook can be found here: https://osf.io/bkd5m/ You ca...
3096 sym R (2882 sym/24 pcs) 4 img 1 tbl
motor battery 2019 results
load packages library(tidyverse) library(here) library(janitor) library(patchwork) library(papaja) library(kableExtra) the back story Students in group1 were told that BabyA is preterm and BabyB is fullterm; students in group 2 were told that BabyA is fullterm and BabyB is preterm. Both BabyA and BabyB were actually full term. questions Does k...
1918 sym R (10690 sym/38 pcs) 4 img 1 tbl
Motor Battery data
load packages library(tidyverse) library(here) library(janitor) library(patchwork) library(papaja) library(beepr) the back story Students in group1 were told that BabyA is preterm and BabyB is fullterm; students in group 2 were told that BabyA is fullterm and BabyB is preterm. Both BabyA and BabyB were actually full term. questions Does knowin...
692 sym R (7150 sym/23 pcs) 2 img
3 three things
3 things II how to make Rstudio forget how to customise the look of Rstudio how to use the package tab 3 things III how to customise quadrants how to explore the function that are in a package how to publish to RPubs ...
238 sym
danika code example
load packages library(tidyverse) library(readxl) library(here) library(janitor) read in sample data test <- read_excel(here("data", "SampleParticipant.xlsx")) %>% clean_names() Create separate dataframes (df) for covariates and just vid data (droppiung time first, last, clicks) covariates <- test %>% select(1:80, starts_with("mfss")) vid_d...
276 sym R (1729 sym/8 pcs)
Factor - Integer
load tidyverse library(tidyverse) generate data df <- data.frame("pp_no" = c("pp1", "pp2", "pp3", "pp4", "pp5", "pp6", "pp7", "pp8", "pp9", "pp10"), "acc" = sample(c(0,1), replace=TRUE, size=10)) glimpse(df) ## Rows: 10 ## Columns: 2 ## $ pp_no <fct> pp1, pp2, pp3, pp4, pp5, pp6, pp7, pp8, pp9, pp10 ## $ acc <dbl> 0, 0, 0, ...
87 sym R (690 sym/7 pcs)
lmm emg
load packages library(tidyverse) ## ── Attaching packages ───────────────────── tidyverse 1.2.1 ── ## ✓ ggplot2 3.3.0 ✓ purrr 0.3.3 ## ✓ tibble 3.0.1 ✓ dplyr 0.8.3 ## ✓ tidyr 0.8.99.9000 ✓ stringr 1.4.0 ## ✓ readr 1.3.1 ✓...
1142 sym R (11378 sym/44 pcs) 4 img
3_screen baseline
load packages library(tidyverse) library(here) library(janitor) read combined clean data clean_data <- read_csv(here("data", "combined", "1_clean_combined.csv")) select just baseline Arrange by pp, emotion, muscle. Add an empty bl_outlier column. bl <- clean_data %>% filter(bin == "bin_0") %>% arrange(pp_no, emotion, muscle) %>% mutate(b...
661 sym R (2932 sym/12 pcs)
4_zscores
https://rpubs.com/jenrichmond/emgz load packages library(tidyverse) library(here) library(skimr) options(scipen = 999) #set no scientific notation The process first, make data wide using pivot_wider so that brow and cheek are in columns use scale() to transform RMS scores into z scores for each participant. then make bin wide so that each row...
2759 sym R (5623 sym/20 pcs) 1 img