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)
  # Once it's installed, tell R to load it.
  library(haven)
}

tidyverse

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

openxlsx

Import data

Excel

dataset.xls <- read.xlsx("Harry Potter Data.xlsx", 
                         sheet = 1,
                         colNames = FALSE,
                         rowNames = FALSE,
                         detectDates = TRUE)
Error in read.xlsx("Harry Potter Data.xlsx", sheet = 1, colNames = FALSE,  : 
  could not find function "read.xlsx"

CSV

dataset.csv <- read_csv ("Harry Potter Data.csv")
Error: 'Harry Potter Data.csv' does not exist in current working directory ('/cloud/project').

SPSS

dataset.spss <- read_sav("Harry Potter Data.spss")
Error: 'Harry Potter Data.spss' does not exist in current working directory ('/cloud/project').

SPSS from the web

dataset.spss.web <- read_sav("https://osf.io/kd4ej/download")
LS0tCnRpdGxlOiAiTGVhcm4gUiAtIEltcG9ydCBEYXRhIgpvdXRwdXQ6IAogIGh0bWxfbm90ZWJvb2s6CiAgICB0aGVtZTogcGFwZXIKICAgIHRvYzogeWVzCiAgICB0b2NfZmxvYXQ6IHllcwotLS0KCiMgTG9hZCBQYWNrYWdlcyB7LnRhYnNldH0KCiMjIGhhdmVuCgpgYGB7cn0KIyBDaGVjayBpZiBoYXZlbiBpcyBhbHJlYWR5IGluc3RhbGxlZCBhbmQgaWYgaXQgaXMsIGxvYWQgaXQuCmlmICghcmVxdWlyZShoYXZlbikpewogICMgSWYgaXQncyBub3QgaW50YWxsZWQsIHRoZW4gdGVsbCBSIHRvIGluc3RhbGwgaXQuCiAgaW5zdGFsbC5wYWNrYWdlcygiaGF2ZW4iLCBkZXBlbmRlbmNpZXMgPSBUUlVFKQogICMgT25jZSBpdCdzIGluc3RhbGxlZCwgdGVsbCBSIHRvIGxvYWQgaXQuCiAgbGlicmFyeShoYXZlbikKfQpgYGAKIyMgdGlkeXZlcnNlCgpgYGB7cn0KaWYgKCFyZXF1aXJlKHRpZHl2ZXJzZSkpewogIGluc3RhbGwucGFja2FnZXMoInRpZHl2ZXJzZSIsIGRlcGVuZGVuY2llcyA9IFRSVUUpCiAgbGlicmFyeSh0aWR5dmVyc2UpCn0KYGBgCgojIyBvcGVueGxzeAoKYGBge3J9CgpgYGAKIyBJbXBvcnQgZGF0YSB7LnRhYnNldH0KCiMjIEV4Y2VsCmBgYHtyfQpkYXRhc2V0LnhscyA8LSByZWFkLnhsc3goIkhhcnJ5IFBvdHRlciBEYXRhLnhsc3giLCAKICAgICAgICAgICAgICAgICAgICAgICAgIHNoZWV0ID0gMSwKICAgICAgICAgICAgICAgICAgICAgICAgIGNvbE5hbWVzID0gRkFMU0UsCiAgICAgICAgICAgICAgICAgICAgICAgICByb3dOYW1lcyA9IEZBTFNFLAogICAgICAgICAgICAgICAgICAgICAgICAgZGV0ZWN0RGF0ZXMgPSBUUlVFKQpgYGAKCiMjIENTVgpgYGB7cn0KZGF0YXNldC5jc3YgPC0gcmVhZF9jc3YgKCJIYXJyeSBQb3R0ZXIgRGF0YS5jc3YiKQpgYGAKCiMjIFNQU1MKYGBge3J9CmRhdGFzZXQuc3BzcyA8LSByZWFkX3NhdigiSGFycnkgUG90dGVyIERhdGEuc3BzcyIpCmBgYAoKIyMgU1BTUyBmcm9tIHRoZSB3ZWIKYGBge3J9CmRhdGFzZXQuc3Bzcy53ZWIgPC0gcmVhZF9zYXYoImh0dHBzOi8vb3NmLmlvL2tkNGVqL2Rvd25sb2FkIikKYGBgCgoKCgoKCgoKCg==