Load Packages

haven

# Check if haven is already installed and if it is, load it.
if (!require(haven))
  # If it's not intalled, then tell R to install it.
  install.packages("haven", dependencies = TRUE)

tidyverse

if (!require(tidyverse))
  install.packages("tidyverse", dependencies = TRUE)
  library(tidyverse)

Import Data

library(haven)
Harry_Potter_Data_5_ <- read_sav("Harry Potter Data (5).sav")
View(Harry_Potter_Data_5_)

T-test

t.test(formula = nameofyourdependentvariable ~ CoinFlipFactor,
       data = dataset,
       var.equal = FALSE)
LS0tCnRpdGxlOiAiTGVhcm4gVC10ZXN0cyIKb3V0cHV0OiAKICBodG1sX25vdGVib29rOgogICAgdGhlbWU6IHBhcGVyCiAgICB0b2M6IHllcwogICAgdG9jX2Zsb2F0OiB5ZXMKLS0tCgojIyBMb2FkIFBhY2thZ2VzCgojIyMgaGF2ZW4KYGBge3J9CiMgQ2hlY2sgaWYgaGF2ZW4gaXMgYWxyZWFkeSBpbnN0YWxsZWQgYW5kIGlmIGl0IGlzLCBsb2FkIGl0LgppZiAoIXJlcXVpcmUoaGF2ZW4pKQogICMgSWYgaXQncyBub3QgaW50YWxsZWQsIHRoZW4gdGVsbCBSIHRvIGluc3RhbGwgaXQuCiAgaW5zdGFsbC5wYWNrYWdlcygiaGF2ZW4iLCBkZXBlbmRlbmNpZXMgPSBUUlVFKQpgYGAKCiMjIyB0aWR5dmVyc2UKYGBge3J9CmlmICghcmVxdWlyZSh0aWR5dmVyc2UpKQogIGluc3RhbGwucGFja2FnZXMoInRpZHl2ZXJzZSIsIGRlcGVuZGVuY2llcyA9IFRSVUUpCiAgbGlicmFyeSh0aWR5dmVyc2UpCmBgYAoKIyMgSW1wb3J0IERhdGEKCmBgYHtyfQpsaWJyYXJ5KGhhdmVuKQpIYXJyeV9Qb3R0ZXJfRGF0YV81XyA8LSByZWFkX3NhdigiSGFycnkgUG90dGVyIERhdGEgKDUpLnNhdiIpClZpZXcoSGFycnlfUG90dGVyX0RhdGFfNV8pCmBgYAoKIyMgVC10ZXN0CmBgYHtyfQp0LnRlc3QoZm9ybXVsYSA9IG5hbWVvZnlvdXJkZXBlbmRlbnR2YXJpYWJsZSB+IENvaW5GbGlwRmFjdG9yLAogICAgICAgZGF0YSA9IGRhdGFzZXQsCiAgICAgICB2YXIuZXF1YWwgPSBGQUxTRSkKYGBgCgo=