International Social Survey Programme (ISSP)
Questionnaire 2015 ISSP module on work orientation IV
ZA6770 data in SPSS file ZA.sav
> library(foreign)
> setwd("C:/Users/batagelj/Documents/papers/2018/moskva/nusa")
> T <- read.spss("ZA.sav",
+ use.value.labels = FALSE,
+ to.data.frame = TRUE,
+ use.missings = TRUE)
> dim(T)
[1] 51668 442
> colnames(T)
[1] "studyno" "version" "doi" "c_sample" "country" "c_alphan" "v1" "v2" "v3"
[10] "v4" "v5" "v6" "v7" "v8" "v9" "v10" "v11" "v12"
[19] "v13" "v14" "v15" "V16" "v17" "v18" "v19" "v20" "v21"
[28] "v22" "v23" "v24" "v25" "v26" "v27" "v28" "v29" "v30"
[37] "v31" "v32" "v33" "v34" "v35" "v36" "v37" "v38" "v39"
[46] "v40" "v41" "v42" "v43" "v44" "v45" "v46" "v47" "v48"
[55] "v49" "v50" "v51" "v52" "v53" "v54" "v55" "v56" "v57"
[64] "v58" "v59" "v60" "v61" "v62" "v63" "v64" "v65" "v66"
[73] "v67" "v68" "v69" "v70" "v71" "v72" "v73" "v74" "v75"
[82] "v76" "v77" "v78" "v79" "v80" "v81" "v82" "v83" "v84"
[91] "v85" "v86" "v87" "v88" "v89" "v90" "v91" "v92" "v93"
[100] "v94" "v95" "v96" "v97" "SEX" "BIRTH" "AGE" "DK_AGE" "EDUCYRS"
[109] "AT_DEGR" "AU_DEGR" "BE_DEGR" "CH_DEGR" "CL_DEGR" "CN_DEGR" "CZ_DEGR" "DE_DEGR" "DK_DEGR"
[118] "EE_DEGR" "ES_DEGR" "FI_DEGR" "FR_DEGR" "GB_DEGR" "GE_DEGR" "HR_DEGR" "HU_DEGR" "IL_DEGR"
[127] "IN_DEGR" "IS_DEGR" "JP_DEGR" "LT_DEGR" "LV_DEGR" "MX_DEGR" "NO_DEGR" "NZ_DEGR" "PH_DEGR"
[136] "PL_DEGR" "RU_DEGR" "SE_DEGR" "SI_DEGR" "SK_DEGR" "SR_DEGR" "TW_DEGR" "US_DEGR" "VE_DEGR"
[145] "ZA_DEGR" "DEGREE" "WORK" "WRKHRS" "EMPREL" "NEMPLOY" "WRKSUP" "NSUP" "TYPORG1"
[154] "TYPORG2" "ISCO08" "MAINSTAT" "PARTLIV" "SPWORK" "SPWRKHRS" "SPEMPREL" "SPWRKSUP" "SPISCO08"
[163] "SPMAINST" "UNION" "AT_RELIG" "AU_RELIG" "BE_RELIG" "CH_RELIG" "CL_RELIG" "CN_RELIG" "CZ_RELIG"
[172] "DE_RELIG" "DK_RELIG" "EE_RELIG" "ES_RELIG" "FI_RELIG" "FR_RELIG" "GB_RELIG" "GE_RELIG" "HR_RELIG"
[181] "HU_RELIG" "IL_RELIG" "IN_RELIG" "IS_RELIG" "JP_RELIG" "LT_RELIG" "LV_RELIG" "MX_RELIG" "NO_RELIG"
[190] "NZ_RELIG" "PH_RELIG" "PL_RELIG" "RU_RELIG" "SE_RELIG" "SI_RELIG" "SK_RELIG" "SR_RELIG" "TW_RELIG"
[199] "US_RELIG" "VE_RELIG" "ZA_RELIG" "RELIGGRP" "ATTEND" "TOPBOT" "VOTE_LE" "AT_PRTY" "AU_PRTY"
[208] "BE_PRTY" "CH_PRTY" "CL_PRTY" "CN_PRTY" "CZ_PRTY" "DE_PRTY" "DK_PRTY" "EE_PRTY" "ES_PRTY"
[217] "FI_PRTY" "FR_PRTY" "GB_PRTY" "GE_PRTY" "HR_PRTY" "HU_PRTY" "IL_PRTY" "IN_PRTY" "IS_PRTY"
[226] "JP_PRTY" "LT_PRTY" "LV_PRTY" "MX_PRTY" "NO_PRTY" "NZ_PRTY" "PH_PRTY" "PL_PRTY" "RU_PRTY"
[235] "SE_PRTY" "SI_PRTY" "SK_PRTY" "SR_PRTY" "TW_PRTY" "US_PRTY" "VE_PRTY" "ZA_PRTY" "PARTY_LR"
[244] "AT_ETHN1" "AT_ETHN2" "AU_ETHN1" "AU_ETHN2" "BE_ETHN1" "BE_ETHN2" "CH_ETHN1" "CH_ETHN2" "CL_ETHN1"
[253] "CL_ETHN2" "CN_ETHN1" "CN_ETHN2" "CZ_ETHN1" "CZ_ETHN2" "DE_ETHN1" "DE_ETHN2" "DK_ETHN1" "DK_ETHN2"
[262] "EE_ETHN1" "EE_ETHN2" "ES_ETHN1" "ES_ETHN2" "FI_ETHN1" "FI_ETHN2" "FR_ETHN1" "FR_ETHN2" "GB_ETHN1"
[271] "GB_ETHN2" "GE_ETHN1" "GE_ETHN2" "HR_ETHN1" "HR_ETHN2" "HU_ETHN1" "HU_ETHN2" "IL_ETHN1" "IL_ETHN2"
[280] "IN_ETHN1" "IN_ETHN2" "IS_ETHN1" "IS_ETHN2" "JP_ETHN1" "JP_ETHN2" "LT_ETHN1" "LT_ETHN2" "LV_ETHN1"
[289] "LV_ETHN2" "MX_ETHN1" "MX_ETHN2" "NO_ETHN1" "NO_ETHN2" "NZ_ETHN1" "NZ_ETHN2" "PH_ETHN1" "PH_ETHN2"
[298] "PL_ETHN1" "PL_ETHN2" "RU_ETHN1" "RU_ETHN2" "SE_ETHN1" "SE_ETHN2" "SI_ETHN1" "SI_ETHN2" "SK_ETHN1"
[307] "SK_ETHN2" "SR_ETHN1" "SR_ETHN2" "TW_ETHN1" "TW_ETHN2" "US_ETHN1" "US_ETHN2" "VE_ETHN1" "VE_ETHN2"
[316] "ZA_ETHN1" "ZA_ETHN2" "HOMPOP" "HHCHILDR" "HHTODD" "AT_RINC" "AU_RINC" "BE_RINC" "CH_RINC"
[325] "CL_RINC" "CN_RINC" "CZ_RINC" "DE_RINC" "DK_RINC" "EE_RINC" "ES_RINC" "FI_RINC" "FR_RINC"
[334] "GB_RINC" "GE_RINC" "HR_RINC" "HU_RINC" "IL_RINC" "IN_RINC" "IS_RINC" "JP_RINC" "LT_RINC"
[343] "LV_RINC" "MX_RINC" "NO_RINC" "NZ_RINC" "PH_RINC" "PL_RINC" "RU_RINC" "SE_RINC" "SI_RINC"
[352] "SK_RINC" "SR_RINC" "TW_RINC" "US_RINC" "VE_RINC" "ZA_RINC" "AT_INC" "AU_INC" "BE_INC"
[361] "CH_INC" "CL_INC" "CN_INC" "CZ_INC" "DE_INC" "DK_INC" "EE_INC" "ES_INC" "FI_INC"
[370] "FR_INC" "GB_INC" "GE_INC" "HR_INC" "HU_INC" "IL_INC" "IN_INC" "IS_INC" "JP_INC"
[379] "LT_INC" "LV_INC" "MX_INC" "NO_INC" "NZ_INC" "PH_INC" "PL_INC" "RU_INC" "SE_INC"
[388] "SI_INC" "SK_INC" "SR_INC" "TW_INC" "US_INC" "VE_INC" "ZA_INC" "MARITAL" "F_BORN"
[397] "M_BORN" "URBRURAL" "AT_REG" "AU_REG" "BE_REG" "CH_REG" "CL_REG" "CN_REG" "CZ_REG"
[406] "DE_REG" "DK_REG" "EE_REG" "ES_REG" "FI_REG" "FR_REG" "GB_REG" "GE_REG" "HR_REG"
[415] "HU_REG" "IL_REG" "IN_REG" "IS_REG" "JP_REG" "LT_REG" "LV_REG" "MX_REG" "NO_REG"
[424] "NZ_REG" "PH_REG" "PL_REG" "RU_REG" "SE_REG" "SI_REG" "SK_REG" "SR_REG" "TW_REG"
[433] "US_REG" "VE_REG" "ZA_REG" "CASEID" "SUBSCASE" "DATEYR" "DATEMO" "DATEDY" "WEIGHT"
[442] "MODE"
>
> names(attributes(T))
[1] "names" "row.names" "class" "variable.labels" "codepage"
> head(row.names(T))
[1] "1" "2" "3" "4" "5" "6"
> tail(row.names(T))
[1] "51663" "51664" "51665" "51666" "51667" "51668"
> class(T)
[1] "data.frame"
> head(attributes(T)$variable.labels)
studyno
"GESIS Data Archive Study Number"
version
"GESIS Archive Version"
doi
"Digital Object Identifier"
c_sample
"Country/ Sample ISO 3166 Code (see country for codes for whole nation states)"
country
"Country ISO 3166 Code (see c_sample for codes for the sample)"
c_alphan
"Country Prefix ISO 3166"
> attributes(T)$variable.labels[7:20]
v1
"Q1a Job is a way of earning money"
v2
"Q1b Enjoy a paid job even if I did not need money"
v3
"Q2a Personally important: job security"
v4
"Q2b Personally important: high income"
v5
"Q2c Personally important: opportunities for advancement"
v6
"Q2d Personally important: an interesting job"
v7
"Q2e Personally important: work independently"
v8
"Q2f Personally important: help other people"
v9
"Q2g Personally important: a job useful to society"
v10
"Q2h Personally important: decide time of work"
v11
"Q2i Personally important: contact with other people"
v12
"Q3 Give up job opportunities for benefit of family life"
v13
"Q4 Remain in not satisfying job for benefit of family life"
v14
"Q5 Past five years: discriminated against with regard to work"
>
> table(T$country)
36 40 56 152 156 158 191 203 208 233 246 250 268 276 348 352 356 376 392 428 440
1211 1001 2141 1433 1795 2031 1000 1435 1138 1207 1203 1224 1487 1687 1003 1126 1336 1248 1573 1002 1127
484 554 578 608 616 643 703 705 710 724 740 752 756 826 840 862
1141 901 1550 1200 2112 1596 1150 1023 2940 1834 1139 1162 1235 1793 1477 1007
> table(T$c_alphan)
AT AU BE CH
1001 1211 2141 1235
CL CN CZ DE
1433 1795 1435 1687
DK EE ES FI
1138 1207 1834 1203
FR GB-GBN GE HR
1224 1793 1487 1000
HU IL IN IS
1003 1248 1336 1126
JP LT LV MX
1573 1127 1002 1141
NO NZ PH PL
1550 901 1200 2112
RU SE SI SK
1596 1162 1023 1150
SR TW US VE
1139 2031 1477 1007
ZA
2940
>
https://rpubs.com/n31k/likert ; https://www.r-bloggers.com/plotting-likert-scales/
> load("ZA_rekodirane.bin")
> ls()
[1] "podatki" "T"
> dim(podatki)
[1] 1023 445