ChatGPT: A tutor for data analysis? · GESIS Blog · 5 June 2023
library(tidyverse)
library(ggeffects)
library(rcompanion)
library(broom)
library(lme4)
library(rsq)
library(brms)ess_data_raw <- haven::read_dta("ESS9e03_1.dta")
ess_data <- ess_data_rawess_data_raw <- haven::read_sav("ESS9e03_1.sav")
ess_data <- ess_data_rawnames(ess_data) [1] "name" "essround" "edition" "proddate" "idno" "cntry" "dweight" "pspwght" "pweight" "anweight"
[11] "prob" "stratum" "psu" "nwspol" "netusoft" "netustm" "ppltrst" "pplfair" "pplhlp" "polintr"
[21] "psppsgva" "actrolga" "psppipla" "cptppola" "trstprl" "trstlgl" "trstplc" "trstplt" "trstprt" "trstep"
[31] "trstun" "vote" "prtvtcat" "prtvtdbe" "prtvtdbg" "prtvtgch" "prtvtbcy" "prtvtecz" "prtvede1" "prtvede2"
[41] "prtvtddk" "prtvtgee" "prtvtees" "prtvtdfi" "prtvtdfr" "prtvtcgb" "prtvtahr" "prtvtfhu" "prtvtcie" "prtvtcis"
[51] "prtvtcit" "prtvblt1" "prtvblt2" "prtvblt3" "prtvtalv" "prtvtme" "prtvtgnl" "prtvtbno" "prtvtdpl" "prtvtcpt"
[61] "prtvtrs" "prtvtcse" "prtvtfsi" "prtvtdsk" "contplt" "wrkprty" "wrkorg" "badge" "sgnptit" "pbldmn"
[71] "bctprd" "pstplonl" "clsprty" "prtcldat" "prtcldbe" "prtcldbg" "prtclgch" "prtclbcy" "prtclecz" "prtclede"
[81] "prtclddk" "prtclgee" "prtclfes" "prtclefi" "prtclffr" "prtclcgb" "prtclahr" "prtclghu" "prtcleie" "prtclcis"
[91] "prtcldit" "prtclblt" "prtclalv" "prtclme" "prtclfnl" "prtclbno" "prtclhpl" "prtclept" "prtclrs" "prtclcse"
[101] "prtclfsi" "prtcldsk" "prtdgcl" "lrscale" "stflife" "stfeco" "stfgov" "stfdem" "stfedu" "stfhlth"
[111] "gincdif" "freehms" "hmsfmlsh" "hmsacld" "euftf" "imsmetn" "imdfetn" "impcntr" "imbgeco" "imueclt"
[121] "imwbcnt" "happy" "sclmeet" "inprdsc" "sclact" "crmvct" "aesfdrk" "health" "hlthhmp" "atchctr"
[131] "atcherp" "rlgblg" "rlgdnm" "rlgdnbat" "rlgdnbe" "rlgdnach" "rlgdncy" "rlgdnade" "rlgdnafi" "rlgdngb"
[141] "rlgdnhu" "rlgdnie" "rlgdnais" "rlgdnlt" "rlgdnlv" "rlgdme" "rlgdnnl" "rlgdnno" "rlgdnapl" "rlgdnrs"
[151] "rlgdnase" "rlgdnask" "rlgblge" "rlgdnme" "rlgdebat" "rlgdebe" "rlgdeach" "rlgdecy" "rlgdeade" "rlgdeafi"
[161] "rlgdegb" "rlgdehu" "rlgdeie" "rlgdeais" "rlgdelt" "rlgdelv" "rlgdeme" "rlgdenl" "rlgdeno" "rlgdeapl"
[171] "rlgders" "rlgdease" "rlgdeask" "rlgdgr" "rlgatnd" "pray" "dscrgrp" "dscrrce" "dscrntn" "dscrrlg"
[181] "dscrlng" "dscretn" "dscrage" "dscrgnd" "dscrsex" "dscrdsb" "dscroth" "dscrdk" "dscrref" "dscrnap"
[191] "dscrna" "ctzcntr" "ctzshipd" "brncntr" "cntbrthd" "livecnta" "lnghom1" "lnghom2" "blgetmg" "facntr"
[201] "fbrncntc" "mocntr" "mbrncntc" "admdw" "vteurmmb" "vteumbgb" "vteubcmb" "evpdemp" "pdempyr" "lvpntyr"
[211] "evlvptn" "lvptnyr" "evmar" "maryr" "bthcld" "nbthcld" "fcldbrn" "ycldbyr" "ngchld" "ygcdbyr"
[221] "ggchld" "admge" "ageadlt" "agemage" "ageoage" "iaglptn" "iagmr" "iagpnt" "iagrtr" "tygledu"
[231] "tyglvp" "tygmr" "tygpnt" "tygrtr" "tolvpnt" "tochld" "towkht" "anvcld" "alvgptn" "acldnmr"
[241] "aftjbyc" "advcyc" "plnftr" "hhmmb" "gndr" "gndr2" "gndr3" "gndr4" "gndr5" "gndr6"
[251] "gndr7" "gndr8" "gndr9" "gndr10" "gndr11" "gndr12" "gndr13" "gndr14" "gndr15" "yrbrn"
[261] "agea" "yrbrn2" "yrbrn3" "yrbrn4" "yrbrn5" "yrbrn6" "yrbrn7" "yrbrn8" "yrbrn9" "yrbrn10"
[271] "yrbrn11" "yrbrn12" "yrbrn13" "yrbrn14" "yrbrn15" "rshipa2" "rshipa3" "rshipa4" "rshipa5" "rshipa6"
[281] "rshipa7" "rshipa8" "rshipa9" "rshipa10" "rshipa11" "rshipa12" "rshipa13" "rshipa14" "rshipa15" "rshpsts"
[291] "rshpsgb" "lvgptnea" "dvrcdeva" "marsts" "marstgb" "maritalb" "chldhhe" "domicil" "eisced" "edulvlb"
[301] "edlveat" "edlvebe" "edlvebg" "edlvdch" "edlvgcy" "edlvdcz" "edubde1" "eduade2" "eduade3" "edlvddk"
[311] "edlvdee" "edlvges" "edlvdfi" "edlvdfr" "educgb1" "edubgb2" "edagegb" "edlvehr" "edlvdhu" "edlvdie"
[321] "edlvdis" "edlveit" "edlvdlt" "edlvdlv" "edlvdme" "edlvenl" "edlvdno" "edlvgpl" "edlvdpt" "edlvdrs"
[331] "edlvdse" "edlvesi" "edlvdsk" "eduyrs" "pdwrk" "edctn" "uempla" "uempli" "dsbld" "rtrd"
[341] "cmsrv" "hswrk" "dngoth" "dngref" "dngdk" "dngna" "mainact" "mnactic" "crpdwk" "pdjobev"
[351] "pdjobyr" "emplrel" "emplno" "wrkctra" "estsz" "jbspv" "njbspv" "wkdcorga" "iorgact" "wkhct"
[361] "icwhct" "wkhtot" "nacer2" "tporgwk" "isco08" "wrkac6m" "uemp3m" "uemp12m" "uemp5yr" "mbtru"
[371] "hincsrca" "hinctnta" "hincfel" "iincsrc" "eiscedp" "edulvlpb" "edlvpeat" "edlvpebe" "edlvpebg" "edlvpdch"
[381] "edlvpgcy" "edlvpdcz" "edupbde1" "edupade2" "edupade3" "edlvpddk" "edlvpdee" "edlvpfes" "edlvpdfi" "edlvpdfr"
[391] "edupcgb1" "edupbgb2" "edagepgb" "edlvpehr" "edlvpdhu" "edlvpdie" "edlvpdis" "edlvpeit" "edlvpdlt" "edlvpdlv"
[401] "edlvpdme" "edlvpenl" "edlvpdno" "edlvpfpl" "edlvpdpt" "edlvpdrs" "edlvpdse" "edlvpesi" "edlvpdsk" "pdwrkp"
[411] "edctnp" "uemplap" "uemplip" "dsbldp" "rtrdp" "cmsrvp" "hswrkp" "dngothp" "dngdkp" "dngnapp"
[421] "dngrefp" "dngnap" "mnactp" "crpdwkp" "isco08p" "emprelp" "wkhtotp" "eiscedf" "edulvlfb" "edlvfeat"
[431] "edlvfebe" "edlvfebg" "edlvfdch" "edlvfgcy" "edlvfdcz" "edufbde1" "edufade2" "edufade3" "edlvfddk" "edlvfdee"
[441] "edlvffes" "edlvfdfi" "edlvfdfr" "edufcgb1" "edufbgb2" "edagefgb" "edlvfehr" "edlvfdhu" "edlvfdie" "edlvfdis"
[451] "edlvfeit" "edlvfdlt" "edlvfdlv" "edlvfdme" "edlvfenl" "edlvfdno" "edlvffpl" "edlvfdpt" "edlvfdrs" "edlvfdse"
[461] "edlvfesi" "edlvfdsk" "emprf14" "occf14b" "eiscedm" "edulvlmb" "edlvmeat" "edlvmebe" "edlvmebg" "edlvmdch"
[471] "edlvmgcy" "edlvmdcz" "edumbde1" "edumade2" "edumade3" "edlvmddk" "edlvmdee" "edlvmfes" "edlvmdfi" "edlvmdfr"
[481] "edumcgb1" "edumbgb2" "edagemgb" "edlvmehr" "edlvmdhu" "edlvmdie" "edlvmdis" "edlvmeit" "edlvmdlt" "edlvmdlv"
[491] "edlvmdme" "edlvmenl" "edlvmdno" "edlvmfpl" "edlvmdpt" "edlvmdrs" "edlvmdse" "edlvmesi" "edlvmdsk" "emprm14"
[501] "occm14b" "atncrse" "anctry1" "anctry2" "region" "regunit" "frprtpl" "gvintcz" "poltran" "ifredu"
[511] "ifrjob" "evfredu" "evfrjob" "fvgabc" "infqbst" "grspnum" "grsplet" "netinum" "netilet" "grspfr"
[521] "netifr" "frlgrsp" "frlneti" "occinfr" "topinfr" "btminfr" "wltdffr" "recskil" "recexp" "recknow"
[531] "recimg" "recgndr" "sofrdst" "sofrwrk" "sofrpr" "sofrprv" "ppldsrv" "jstprev" "pcmpinj" "ipcrtiv"
[541] "imprich" "ipeqopt" "ipshabt" "impsafe" "impdiff" "ipfrule" "ipudrst" "ipmodst" "ipgdtim" "impfree"
[551] "iphlppl" "ipsuces" "ipstrgv" "ipadvnt" "ipbhprp" "iprspot" "iplylfr" "impenv" "imptrad" "impfun"
[561] "inwdds" "inwmms" "inwyys" "inwshh" "inwsmm" "inwdde" "inwmme" "inwyye" "inwehh" "inwemm"
[571] "inwtm" "domain" glimpse(ess_data)