SOC_DS_GLOBE.Rmd

---
title: "Social factors DataSchema"
output: html_document
---

```{r, echo=TRUE}
library(epiDisplay)
library(dplyr)
library(data.table)
# Connecting with Opal data server
## Login to server and assign study data
#Load Opal R library
library(opal)
# Create an opal object with the login information
erasmus_opal <- opal.login()
#Login to Opal server and assign the content of the GLOBE table(s) to your RStudio environment
# GLOBE1991
opal.assign.table.tibble(erasmus_opal, 'GLOBE1991', 'GLOBE.GLOBE1991',variables = list('v156','v169','v167','v168','v173','v174','v175','v172','v155','v156','v335','SEGVv460','SEGVv461','SEGVv462','SEGVv454','SEGVv455','SEGVv456','SEGVv475','SEGVv476','SEGVv477','SEGVv472','SEGVv473','SEGVv474','SEGVv457','SEGVv458','SEGVv459','v167','v168','v169','v170','v171','v172','v173','v174','v175','v167'))
GLOBE1991 <- opal.execute(erasmus_opal,'GLOBE1991')
# GLOBE1997
opal.assign.table.tibble(erasmus_opal, 'GLOBE1997', 'GLOBE.GLOBE1997',variables = list('v11c','v11a','v11b','v11g','v11h','v11i','v11f','g29a','g9c1','g9c2','g9c3','g9a2','g9a3','g9a1','g9g1','g9g2','g9g3','g9f1','g9f2','g9f3','g9b1','g9b2','g9b3','v11a','v11b','v11c','v11d','v11e','v11f','v11g','v11h','v11i','v11a'))
GLOBE1997 <- opal.execute(erasmus_opal,'GLOBE1997')
# GLOBE2004
opal.assign.table.tibble(erasmus_opal, 'GLOBE2004', 'GLOBE.GLOBE2004',variables = list('w266','w264','w265','w270','w271','w272','w269','w072b','w051','w040a','w041','w289','w264','w265','w266','w267','w268','w269','w270','w271','w272','w072b','w051','w264','w072a'))
GLOBE2004 <- opal.execute(erasmus_opal,'GLOBE2004')
# GLOBE2011
opal.assign.table.tibble(erasmus_opal, 'GLOBE2011', 'GLOBE.GLOBE2011',variables = list('v49_buurt_wndr','53_b_buur2','v50_huis_bez','v61_c_o_vak','v61_d_o_pol','v61_e_o_ker','v61_f_o_buu','v61_g_o_ner','v59_f_ond6','v61_d_o_pol','v61_c_o_vak','v61_f_o_buu','v61_g_o_ner','v61_b_o_hob','v49_buurt_wndr','v53_b_buur2','v59_a_ond1'))
GLOBE2011 <- opal.execute(erasmus_opal,'GLOBE2011')
# GLOBE2014
opal.assign.table.tibble(erasmus_opal, 'GLOBE2014', 'GLOBE.GLOBE2014',variables = list('G14v9','G14v87','G14v90_g','G14v88','G14v42','G14v46','G14v54','G14v55','G14v36','G14v40','G14v59_f','G14v56_e','G14v56_g','G14v56_c','G14v56_d','G14v56_f','G14v56_h','G14v56_b','G14v87','G14v90_g','G14v45','G14v59_a'))
GLOBE2014 <- opal.execute(erasmus_opal,'GLOBE2014')
```
## Assign participant id as first column of your harmonized dataframes
```{r, echo=FALSE}
soc_GLOBE_0 <- data.frame(id = GLOBE1991$id )
soc_GLOBE_1 <- data.frame(id = GLOBE1997$id )
soc_GLOBE_2 <- data.frame(id = GLOBE2004$id )
soc_GLOBE_3 <- data.frame(id = GLOBE2011$id )
soc_GLOBE_4 <- data.frame(id = GLOBE2014$id )
```
## When you are done with your work, logout of Opal server
```{r, echo=FALSE}
opal.logout(erasmus_opal) 
```

# Table of Contents  
1. [Social network subdomain](#social-network-subdomain)  
2. [Social support subdomain](#social-support-subdomain)  
3. [Social participation subdomain](#social-participation-subdomain)  
4. [Major life events subdomain](#major-life-events-subdomain)
5. [Residential characteristics subdomain](#residential-characteristics-subdomain)

# Social network subdomain

### **Variable label**:   Network size of children      
**Variable name**:   soc_sn_num_children_0    
**Variable description**:  Number of living biological, adopted or step children.      
**Value type**:  integer  
**Variable unit**: children       
**Category coding**:      

**Harmonization status**:  impossible   
**Harmonization comment**:  Cannot harmonize with GLOBE item  v335, since alive/dead or biological/adopted/foster child was not specified (checked with Joost G), meaning it was left up to the interpretation of the participants.  
**R script**:  
```{r, echo=TRUE}

```
### **Variable label**:   Network size of children      
**Variable name**:   soc_sn_num_children_1    
**Variable description**:  Number of living biological, adopted or step children.          
**Value type**:  integer  
**Variable unit**:  children    
**Category coding**:    

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Network size of children      
**Variable name**:   soc_sn_num_children_2    
**Variable description**:  Number of living biological, adopted or step children.        
**Value type**:  integer  
**Variable unit**: children       
**Category coding**:   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Network size of children      
**Variable name**:   soc_sn_num_children_3    
**Variable description**:  Number of living biological, adopted or step children.         
**Value type**:  integer  
**Variable unit**: children       
**Category coding**:   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Network size of children      
**Variable name**:   soc_sn_num_children_4    
**Variable description**:  Number of living biological, adopted or step children.         
**Value type**:  integer  
**Variable unit**: children       
**Category coding**:   

**Harmonization status**:  impossible    
**Harmonization comment**: Cannot harmonize with GLOBE item G14v9, since alive/dead or biological/adopted/foster child was not specified (checked with Joost G), meaning it was left up to the interpretation of the participants. 
**R script**:  
```{r, echo=TRUE}

```
### **Variable label**:   Network size of children      
**Variable name**:   soc_sn_num_children_5    
**Variable description**:  Number of living biological, adopted or step children.          
**Value type**:  integer  
**Variable unit**: children     
**Category coding**:   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Network size of children      
**Variable name**:   soc_sn_num_children_6    
**Variable description**:  Number of living biological, adopted or step children.          
**Value type**:  integer  
**Variable unit**: children     
**Category coding**:   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Ranked network size of children         
**Variable name**:   soc_sn_children_rank_0      
**Variable description**:  Indicator of whether the participant has a low, medium or high network size compromised of children. It is measured by ranking the size of the network which is comprised of any type of child (biological, step, adoptive, foster, in-law son/daughter).  Low rank indicates no children.  Note: cohorts inquire about different types of children due to the particular questionnaire used, therefore a childless respondent in one study would not necessarily be considered childless in another study.  
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
0 |  Low rank of network size comprised of children (childless) 
1 |  Medium rank of network size comprised of children  (1 or 2 children)
2 |  Large rank of network size comprised of children  (more than 2 children) 

**Harmonization status**:  complete   
**Harmonization comment**:  GLOBE item does not specify alive/dead or biological/adopted/foster child.  
**R script**:  
```{r, echo=TRUE}
soc_GLOBE_0$soc_sn_children_rank_0 <- ifelse(GLOBE1991$v335=='0',0L, 
                                             ifelse(GLOBE1991$v335=='1' | GLOBE1991$v335=='2',1L,
                                                    ifelse(GLOBE1991$v335 >'2',2L, NA)))
```

### **Variable label**:   Ranked network size of children           
**Variable name**:   soc_sn_children_rank_1      
**Variable description**:  Indicator of whether the participant has a low, medium or high network size compromised of children. It is measured by ranking the size of the network which is comprised of any type of child (biological, step, adoptive, foster, in-law son/daughter).  Low rank indicates no children.  Note: cohorts inquire about different types of children due to the particular questionnaire used, therefore a childless respondent in one study would not necessarily be considered childless in another study.  
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
0 |  Low rank of network size comprised of children (childless) 
1 |  Medium rank of network size comprised of children  (1 or 2 children)
2 |  Large rank of network size comprised of children  (more than 2 children)  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Ranked network size of children           
**Variable name**:   soc_sn_children_rank_2      
**Variable description**:  Indicator of whether the participant has a low, medium or high network size compromised of children. It is measured by ranking the size of the network which is comprised of any type of child (biological, step, adoptive, foster, in-law son/daughter).  Low rank indicates no children.  Note: cohorts inquire about different types of children due to the particular questionnaire used, therefore a childless respondent in one study would not necessarily be considered childless in another study.    
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
0 |  Low rank of network size comprised of children (childless) 
1 |  Medium rank of network size comprised of children  (1 or 2 children)
2 |  Large rank of network size comprised of children  (more than 2 children)  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Ranked network size of children          
**Variable name**:   soc_sn_children_rank_3      
**Variable description**:  Indicator of whether the participant has a low, medium or high network size compromised of children. It is measured by ranking the size of the network which is comprised of any type of child (biological, step, adoptive, foster, in-law son/daughter).  Low rank indicates no children.  Note: cohorts inquire about different types of children due to the particular questionnaire used, therefore a childless respondent in one study would not necessarily be considered childless in another study.  
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
0 |  Low rank of network size comprised of children (childless) 
1 |  Medium rank of network size comprised of children  (1 or 2 children)
2 |  Large rank of network size comprised of children  (more than 2 children)  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Ranked network size of children          
**Variable name**:   soc_sn_children_rank_4      
**Variable description**:  Indicator of whether the participant has a low, medium or high network size compromised of children. It is measured by ranking the size of the network which is comprised of any type of child (biological, step, adoptive, foster, in-law son/daughter).  Low rank indicates no children.  Note: cohorts inquire about different types of children due to the particular questionnaire used, therefore a childless respondent in one study would not necessarily be considered childless in another study.  
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
0 |  Low rank of network size comprised of children (childless) 
1 |  Medium rank of network size comprised of children  (1 or 2 children)
2 |  Large rank of network size comprised of children  (more than 2 children)  

**Harmonization status**:  complete   
**Harmonization comment**:  GLOBE item does not specify alive/dead or biological/adopted/foster child. VALIDATION STEP HELP: 134 NAs but after transformation we get 135 NAs   
**R script**:  
```{r, echo=TRUE}
soc_GLOBE_4$soc_sn_children_rank_4 <- ifelse(GLOBE2014$G14v9=='0',0L, 
                                             ifelse(GLOBE2014$G14v9=='1' | GLOBE2014$G14v9=='2',1L,
                                                    ifelse(GLOBE2014$G14v9 >'2',2L, NA)))

```
### **Variable label**:   Ranked network size of children          
**Variable name**:   soc_sn_children_rank_5      
**Variable description**:  Indicator of whether the participant has a low, medium or high network size compromised of children. It is measured by ranking the size of the network which is comprised of any type of child (biological, step, adoptive, foster, in-law son/daughter).  Low rank indicates no children.  Note: cohorts inquire about different types of children due to the particular questionnaire used, therefore a childless respondent in one study would not necessarily be considered childless in another study.  
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
0 |  Low rank of network size comprised of children (childless) 
1 |  Medium rank of network size comprised of children  (1 or 2 children)
2 |  Large rank of network size comprised of children  (more than 2 children)  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Ranked network size of children         
**Variable name**:   soc_sn_children_rank_6      
**Variable description**:  Indicator of whether the participant has a low, medium or high network size compromised of children. It is measured by ranking the size of the network which is comprised of any type of child (biological, step, adoptive, foster, in-law son/daughter).  Low rank indicates no children.  Note: cohorts inquire about different types of children due to the particular questionnaire used, therefore a childless respondent in one study would not necessarily be considered childless in another study.  
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
0 |  Low rank of network size comprised of children (childless) 
1 |  Medium rank of network size comprised of children  (1 or 2 children)
2 |  Large rank of network size comprised of children  (more than 2 children)  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```

### **Variable label**:   Network size of friends    
**Variable name**:   soc_sn_num_friends_0  
**Variable description**:  Number of close friends. These are friends which the participant feels they can talk to/reach out to.    
**Value type**:  integer  
**Variable unit**: friends  
**Category coding**:      

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Network size of friends    
**Variable name**:   soc_sn_num_friends_1    
**Variable description**: Number of close friends. These are friends which the participant feels they can talk to/reach out to.  
**Value type**:  integer  
**Variable unit**:  friends 
**Category coding**:        

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Network size of friends    
**Variable name**:   soc_sn_num_friends_2    
**Variable description**:  Number of close friends. These are friends which the participant feels they can talk to/reach out to.    
**Value type**:  integer  
**Variable unit**:  friends 
**Category coding**:      

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Network size of friends    
**Variable name**:   soc_sn_num_friends_3    
**Variable description**: Number of close friends. These are friends which the participant feels they can talk to/reach out to.    
**Value type**:  integer  
**Variable unit**:  friends 
**Category coding**:         

**Harmonization status**:  impossible    
**Harmonization comment**:GLOBE item v54_hv_conta asks for friends and relatives together. 
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Network size of friends    
**Variable name**:   soc_sn_num_friends_4    
**Variable description**:  Number of close friends. These are friends which the participant feels they can talk to/reach out to.    
**Value type**:  integer  
**Variable unit**:  friends 
**Category coding**: N/A      

**Harmonization status**:  complete    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_4$soc_sn_num_friends_4 <- as.integer(GLOBE2014$G14v42)

```
### **Variable label**:   Network size of friends    
**Variable name**:   soc_sn_num_friends_5    
**Variable description**:  Number of close friends. These are friends which the participant feels they can talk to/reach out to.      
**Value type**:  integer  
**Variable unit**:  friends  
**Category coding**:      

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```

### **Variable label**:   Network size of friends    
**Variable name**:   soc_sn_num_friends_6    
**Variable description**:  Number of close friends. These are friends which the participant feels they can talk to/reach out to.    
**Value type**:  integer  
**Variable unit**:  friends 
**Category coding**:         

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```

### **Variable label**:   In-person contact frequency with friends        
**Variable name**:   soc_sn_freq_friends_inperson_0       
**Variable description**:   Indicator of the frequency at which the participant has in-person contact with close friends.      
**Value type**:  integer  
**Variable unit**:   
**Category coding**:    

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to several times per month in-person contact with friends 
2 |  Once per month in-person contact with friends
3 |  A few times per year, once per year or never in-person contact with friends  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


``` 
### **Variable label**:   In-person contact frequency with friends        
**Variable name**:   soc_sn_freq_friends_inperson_1       
**Variable description**:   Indicator of the frequency at which the participant has in-person contact with close friends.  
**Value type**:  integer  
**Variable unit**:   
**Category coding**:    

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to several times per month in-person contact with friends 
2 |  Once per month in-person contact with friends
3 |  A few times per year, once per year or never in-person contact with friends  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


``` 
### **Variable label**:   In-person contact frequency with friends        
**Variable name**:   soc_sn_freq_friends_inperson_2       
**Variable description**:   Indicator of the frequency at which the participant has in-person contact with close friends.  
**Value type**:  integer  
**Variable unit**:   
**Category coding**:    

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to several times per month in-person contact with friends 
2 |  Once per month in-person contact with friends
3 |  A few times per year, once per year or never in-person contact with friends  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


``` 
### **Variable label**:   In-person contact frequency with friends       
**Variable name**:   soc_sn_freq_friends_inperson_3       
**Variable description**:   Indicator of the frequency at which the participant has in-person contact with close friends.      
**Value type**:  integer  
**Variable unit**:   
**Category coding**:    

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to several times per month in-person contact with friends 
2 |  Once per month in-person contact with friends
3 |  A few times per year, once per year or never in-person contact with friends  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


``` 
### **Variable label**:   In-person contact frequency with friends       
**Variable name**:   soc_sn_freq_friends_inperson_4       
**Variable description**:   Indicator of the frequency at which the participant has in-person contact with close friends.     
**Value type**:  integer  
**Variable unit**:   
**Category coding**:    

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to several times per month in-person contact with friends 
2 |  Once per month in-person contact with friends
3 |  A few times per year, once per year or never in-person contact with friends  

**Harmonization status**:  complete    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}
soc_GLOBE_4$soc_sn_freq_friends_inperson_4 <- ifelse(GLOBE2014$G14v45==1|GLOBE2014$G14v45==2|GLOBE2014$G14v45==3, 1L, 
                                                ifelse(GLOBE2014$G14v45==4, 2L,ifelse(GLOBE2014$G14v45==5, 3L,NA)))

table(soc_GLOBE_4$soc_sn_freq_friends_inperson_4)
``` 
### **Variable label**:   Contact frequency with friends        
**Variable name**:   soc_sn_freq_friends_0       
**Variable description**:   Indicator of the frequency at which the participant has contact with close friends.         
**Value type**:  integer  
**Variable unit**:   
**Category coding**:    

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to several times per month contact with friends 
2 |  Once per month contact with friends
3 |  A few times per year, once per year or never contact with friends

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


``` 
### **Variable label**:   Contact frequency with friends        
**Variable name**:   soc_sn_freq_friends_1       
**Variable description**:   Indicator of the frequency at which the participant has contact with close friends.          
**Value type**:  integer  
**Variable unit**:   
**Category coding**:    

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to several times per month contact with friends 
2 |  Once per month contact with friends
3 |  A few times per year, once per year or never contact with friends

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


``` 
### **Variable label**:   Contact frequency with friends        
**Variable name**:   soc_sn_freq_friends_2       
**Variable description**:   Indicator of the frequency at which the participant has contact with close friends.          
**Value type**:  integer  
**Variable unit**:   
**Category coding**:    

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to several times per month contact with friends 
2 |  Once per month contact with friends
3 |  A few times per year, once per year or never contact with friends

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


``` 
### **Variable label**:   Contact frequency with friends        
**Variable name**:   soc_sn_freq_friends_3       
**Variable description**:   Indicator of the frequency at which the participant has contact with close friends.          
**Value type**:  integer  
**Variable unit**:   
**Category coding**:    

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to several times per month contact with friends 
2 |  Once per month contact with friends
3 |  A few times per year, once per year or never contact with friends

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


``` 
### **Variable label**:   Contact frequency with friends        
**Variable name**:   soc_sn_freq_friends_4       
**Variable description**:   Indicator of the frequency at which the participant has contact with close friends.          
**Value type**:  integer  
**Variable unit**:   
**Category coding**:    

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to several times per month contact with friends 
2 |  Once per month contact with friends
3 |  A few times per year, once per year or never contact with friends

**Harmonization status**:  complete   
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


soc_GLOBE_4$soc_sn_freq_friends_4 <- ifelse(GLOBE2014$G14v46==1|GLOBE2014$G14v46==2|GLOBE2014$G14v46==3, 1L, 
                                                 ifelse(GLOBE2014$G14v46==4, 2L,ifelse(GLOBE2014$G14v46==5, 3L,NA)))
 table(soc_GLOBE_4$soc_sn_freq_friends_4 )
``` 
### **Variable label**:   Contact frequency with friends        
**Variable name**:   soc_sn_freq_friends_5       
**Variable description**:   Indicator of the frequency at which the participant has contact with close friends.          
**Value type**:  integer  
**Variable unit**:   
**Category coding**:    

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to several times per month contact with friends 
2 |  Once per month contact with friends
3 |  A few times per year, once per year or never contact with friends

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


``` 
### **Variable label**:   Contact frequency with friends        
**Variable name**:   soc_sn_freq_friends_6       
**Variable description**:   Indicator of the frequency at which the participant has contact with close friends.           
**Value type**:  integer  
**Variable unit**:   
**Category coding**:    

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to several times per month contact with friends 
2 |  Once per month contact with friends
3 |  A few times per year, once per year or never contact with friends

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


``` 
### **Variable label**:   Network size of neighbours           
**Variable name**:   soc_sn_num_nbhs_0    
**Variable description**:  Indicator of the number of neighbours that the participant knows well enough to be in touch with or visit.    
**Value type**:  integer    
**Variable unit**:    
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  No neighbours 
2 |  1 or 2 neighbours 
3 |  3 to 5 neighbours 
4 |  6 to 10 neighbours 
5 |  11 to 20 neighbours 
6 |  More than 20 neighbours   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


``` 
### **Variable label**:   Network size of neighbours           
**Variable name**:   soc_sn_num_nbhs_1    
**Variable description**:  Indicator of the number of neighbours that the participant knows well enough to be in touch with or visit.  
**Value type**:  integer    
**Variable unit**:    
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  No neighbours 
2 |  1 or 2 neighbours 
3 |  3 to 5 neighbours 
4 |  6 to 10 neighbours 
5 |  11 to 20 neighbours 
6 |  More than 20 neighbours    

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


``` 
### **Variable label**:   Network size of neighbours           
**Variable name**:   soc_sn_num_nbhs_2    
**Variable description**:  Indicator of the number of neighbours that the participant knows well enough to be in touch with or visit.  
**Value type**:  integer    
**Variable unit**:    
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  No neighbours 
2 |  1 or 2 neighbours 
3 |  3 to 5 neighbours 
4 |  6 to 10 neighbours 
5 |  11 to 20 neighbours 
6 |  More than 20 neighbours    

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


``` 
### **Variable label**:   Network size of neighbours           
**Variable name**:   soc_sn_num_nbhs_3    
**Variable description**:  Indicator of the number of neighbours that the participant knows well enough to be in touch with or visit.  
**Value type**:  integer    
**Variable unit**:    
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  No neighbours 
2 |  1 or 2 neighbours 
3 |  3 to 5 neighbours 
4 |  6 to 10 neighbours 
5 |  11 to 20 neighbours 
6 |  More than 20 neighbours    

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


``` 
### **Variable label**:   Network size of neighbours           
**Variable name**:   soc_sn_num_nbhs_4    
**Variable description**:  Indicator of the number of neighbours that the participant knows well enough to be in touch with or visit.  
**Value type**:  integer    
**Variable unit**:    
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  No neighbours 
2 |  1 or 2 neighbours 
3 |  3 to 5 neighbours 
4 |  6 to 10 neighbours 
5 |  11 to 20 neighbours 
6 |  More than 20 neighbours    

**Harmonization status**:  complete    
**Harmonization comment**:  DataSchema has same categories as the original GLOBE item.   
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_4$soc_sn_num_nbhs_4 <- as.integer(GLOBE2014$G14v54)


``` 
### **Variable label**:   Network size of neighbours           
**Variable name**:   soc_sn_num_nbhs_5    
**Variable description**:  Indicator of the number of neighbours that the participant knows well enough to be in touch with or visit.  
**Value type**:  integer    
**Variable unit**:    
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  No neighbours 
2 |  1 or 2 neighbours 
3 |  3 to 5 neighbours 
4 |  6 to 10 neighbours 
5 |  11 to 20 neighbours 
6 |  More than 20 neighbours    

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


``` 
### **Variable label**:   Network size of neighbours           
**Variable name**:   soc_sn_num_nbhs_6    
**Variable description**:  Indicator of the number of neighbours that the participant knows well enough to be in touch with or visit.  
**Value type**:  integer    
**Variable unit**:    
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  No neighbours 
2 |  1 or 2 neighbours 
3 |  3 to 5 neighbours 
4 |  6 to 10 neighbours 
5 |  11 to 20 neighbours 
6 |  More than 20 neighbours 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


``` 

### **Variable label**:   Contact frequency with neighbours        
**Variable name**:   soc_sn_freq_nbhs_0    
**Variable description**:  Indicator of the contact frequency with neighbours that the participant knows well enough to be in touch with or visit.   
**Value type**:  integer  
**Variable unit**:     
**Category coding**:    

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to several times per month contact with neighbours 
2 |  Once per month contact with neighbours
3 |  A few times per year, once per year or never contact with neighbours

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


``` 
### **Variable label**:   Contact frequency with neighbours        
**Variable name**:   soc_sn_freq_nbhs_1    
**Variable description**:  Indicator of the contact frequency with neighbours that the participant knows well enough to be in touch with or visit.   
**Value type**:  integer  
**Variable unit**:     
**Category coding**:    

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to several times per month contact with neighbours 
2 |  Once per month contact with neighbours
3 |  A few times per year, once per year or never contact with neighbours

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Contact frequency with neighbours        
**Variable name**:   soc_sn_freq_nbhs_2    
**Variable description**:  Indicator of the contact frequency with neighbours that the participant knows well enough to be in touch with or visit.   
**Value type**:  integer  
**Variable unit**:     
**Category coding**:    

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to several times per month contact with neighbours 
2 |  Once per month contact with neighbours
3 |  A few times per year, once per year or never contact with neighbours

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Contact frequency with neighbours        
**Variable name**:   soc_sn_freq_nbhs_3    
**Variable description**:  Indicator of the contact frequency with neighbours that the participant knows well enough to be in touch with or visit.   
**Value type**:  integer  
**Variable unit**:     
**Category coding**:    

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to several times per month contact with neighbours 
2 |  Once per month contact with neighbours
3 |  A few times per year, once per year or never contact with neighbours

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Contact frequency with neighbours        
**Variable name**:   soc_sn_freq_nbhs_4    
**Variable description**:  Indicator of the contact frequency with neighbours that the participant knows well enough to be in touch with or visit.   
**Value type**:  integer  
**Variable unit**:     
**Category coding**:    

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to several times per month contact with neighbours 
2 |  Once per month contact with neighbours
3 |  A few times per year, once per year or never contact with neighbours

**Harmonization status**:  complete    
**Harmonization comment**:  DataSchema has same categories as original GLOBE item.     
**R script**:  
```{r, echo=TRUE}


soc_GLOBE_4$soc_sn_freq_nbhs_4 <- ifelse(GLOBE2014$G14v55==1|GLOBE2014$G14v55==2|GLOBE2014$G14v55==3, 1L, 
                                                 ifelse(GLOBE2014$G14v55==4, 2L,ifelse(GLOBE2014$G14v55==5, 3L,NA)))
```
### **Variable label**:   Contact frequency with neighbours        
**Variable name**:   soc_sn_freq_nbhs_5    
**Variable description**:  Indicator of the contact frequency with neighbours that the participant knows well enough to be in touch with or visit.   
**Value type**:  integer  
**Variable unit**:     
**Category coding**:    

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to several times per month contact with neighbours 
2 |  Once per month contact with neighbours
3 |  A few times per year, once per year or never contact with neighbours

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Contact frequency with neighbours        
**Variable name**:   soc_sn_freq_nbhs_6      
**Variable description**:  Indicator of the contact frequency with neighbours that the participant knows well enough to be in touch with or visit.   
**Value type**:  integer  
**Variable unit**:     
**Category coding**:    

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to several times per month contact with neighbours 
2 |  Once per month contact with neighbours
3 |  A few times per year, once per year or never contact with neighbours

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Network size of relatives      
**Variable name**:   soc_sn_num_relatives_0    
**Variable description**:  Number of relatives, including siblings and excluding partner/children living at home, which the participant is close to, i.e. is in touch with regularly.           
**Value type**:  integer  
**Variable unit**:     
**Category coding**:

**Code** | **Category Label**  
------------- | -------------  
1 |  None
2 |  1 or 2
3 |  3 to 5
4 |  6 to 10
5 |  11 to 20 
6 |  More than 20

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Network size of relatives      
**Variable name**:   soc_sn_num_relatives_1    
**Variable description**:  Number of relatives, including siblings and excluding partner/children living at home, which the participant is close to, i.e. is in touch with regularly.           
**Value type**:  integer  
**Variable unit**:     
**Category coding**:

**Code** | **Category Label**  
------------- | -------------  
1 |  None
2 |  1 or 2
3 |  3 to 5
4 |  6 to 10
5 |  11 to 20 
6 |  More than 20

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Network size of relatives      
**Variable name**:   soc_sn_num_relatives_2    
**Variable description**:  Number of relatives, including siblings and excluding partner/children living at home, which participant is close to, i.e. is in touch with regularly.           
**Value type**:  integer  
**Variable unit**:       
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  None
2 |  1 or 2
3 |  3 to 5
4 |  6 to 10
5 |  11 to 20 
6 |  More than 20

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Network size of relatives      
**Variable name**:   soc_sn_num_relatives_3    
**Variable description**:  Number of relatives, including siblings and excluding partner/children living at home, which participant is close to, i.e. is in touch with regularly.           
**Value type**:  integer  
**Variable unit**:         
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
1 |  None
2 |  1 or 2
3 |  3 to 5
4 |  6 to 10
5 |  11 to 20 
6 |  More than 20

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Network size of relatives      
**Variable name**:   soc_sn_num_relatives_4    
**Variable description**:  Number of relatives, including siblings and excluding partner/children living at home, which participant is close to, i.e. is in touch with regularly.           
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  None
2 |  1 or 2
3 |  3 to 5
4 |  6 to 10
5 |  11 to 20 
6 |  More than 20

**Harmonization status**:  complete    
**Harmonization comment**:  
**R script**:  
```{r, echo=TRUE}
table(GLOBE2014$G14v36,useNA = "always")

soc_GLOBE_4$soc_sn_num_relatives_4 <- ifelse(GLOBE2014$G14v36==1,1L, 
                                                  ifelse(GLOBE2014$G14v36==2,2L,
                                                      ifelse(GLOBE2014$G14v36>=3 & GLOBE2014$G14v36 <=5,3L,
                                                           ifelse(GLOBE2014$G14v36>=6 & GLOBE2014$G14v36 <=10,4L,
                                                                   ifelse(GLOBE2014$G14v36>=11& GLOBE2014$G14v36 <=20,5L,
                                                                          ifelse(GLOBE2014$G14v36>=21,6L, NA))))))
 

table(soc_GLOBE_4$soc_sn_num_relatives_4,useNA = "always")
```
### **Variable label**:   Network size of relatives      
**Variable name**:   soc_sn_num_relatives_5    
**Variable description**:  Number of relatives, including siblings and excluding partner/children living at home, which participant is close to, i.e. is in touch with regularly.           
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  None
2 |  1 or 2
3 |  3 to 5
4 |  6 to 10
5 |  11 to 20 
6 |  More than 20
   
**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Network size of relatives      
**Variable name**:   soc_sn_num_relatives_6    
**Variable description**:  Number of relatives, including siblings and excluding partner/children living at home, which participant is close to, i.e. is in touch with regularly.           
**Value type**:  integer  
**Variable unit**:       
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  None
2 |  1 or 2
3 |  3 to 5
4 |  6 to 10
5 |  11 to 20 
6 |  More than 20

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Contact frequency with family   
**Variable name**:   soc_sn_freq_close_relatives_0    
**Variable description**:  Indicator of the contact frequency with relatives including siblings and children, which participant is close to.                
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to less than monthly (once per month) contact with family 
2 |  Once per month contact with family
3 |  A few times per year, once per year or never contact with family  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Contact frequency with family     
**Variable name**:   soc_sn_freq_close_relatives_1    
**Variable description**:  Indicator of the contact frequency with relatives including siblings and children, which participant is close to.                 
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to less than monthly (once per month) contact with family 
2 |  Once per month contact with family
3 |  A few times per year, once per year or never contact with family  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Contact frequency with family    
**Variable name**:   soc_sn_freq_close_relatives_2    
**Variable description**:  Indicator of the contact frequency with relatives including siblings and children, which participant is close to.               
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to less than monthly (once per month) contact with family 
2 |  Once per month contact with family
3 |  A few times per year, once per year or never contact with family  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Contact frequency with family    
**Variable name**:   soc_sn_freq_close_relatives_3      
**Variable description**:  Indicator of the contact frequency with relatives including siblings and children, which participant is close to.                 
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to less than monthly (once per month) contact with family 
2 |  Once per month contact with family
3 |  A few times per year, once per year or never contact with family  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Contact frequency with family   
**Variable name**:   soc_sn_freq_close_relatives_4      
**Variable description**:  Indicator of the contact frequency with relatives including siblings and children, which participant is close to.                 
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to less than monthly (once per month) contact with family 
2 |  Once per month contact with family
3 |  A few times per year, once per year or never contact with family  

**Harmonization status**:  complete    
**Harmonization comment**:  GLOBE asks about contact frequency with relatives which to some respondents might include siblings and children. GLOBE item G14v39 was not used to harmonize this DataSchema since that item asks about how often one sees relatives, indicating in person contact, as opposed to communicate with.
**R script**:  
```{r, echo=TRUE}


soc_GLOBE_4$soc_sn_freq_close_relatives_4 <- ifelse(GLOBE2014$G14v40==1|GLOBE2014$G14v40==2|GLOBE2014$G14v40==3, 1L, 
                                                 ifelse(GLOBE2014$G14v40==4, 2L,ifelse(GLOBE2014$G14v40==5, 3L,NA)))


```
### **Variable label**:   Contact frequency with family    
**Variable name**:   soc_sn_freq_close_relatives_5      
**Variable description**:  Indicator of the contact frequency with relatives including siblings and children, which participant is close to.                 
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to less than monthly (once per month) contact with family 
2 |  Once per month contact with family
3 |  A few times per year, once per year or never contact with family  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Contact frequency with family    
**Variable name**:   soc_sn_freq_close_relatives_6      
**Variable description**:  Indicator of the contact frequency with relatives including siblings and children, which participant is close to.               
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to less than monthly (once per month) contact with family 
2 |  Once per month contact with family
3 |  A few times per year, once per year or never contact with family  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```

### **Variable label**:   Contact frequency with relatives   
**Variable name**:   soc_sn_freq_relatives_0        
**Variable description**:  Indicator of the contact frequency with relatives, including siblings and children regardless of how close the participant feels to them.                
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to less than monthly (once per month) contact with relatives 
2 |  Once per month contact with relatives
3 |  A few times per year, once per year or never contact with relatives  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Contact frequency with relatives      
**Variable name**:   soc_sn_freq_relatives_1          
**Variable description**:  Indicator of the contact frequency with relatives, including siblings and children regardless of how close the participant feels to them.                
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to less than monthly (once per month) contact with relatives 
2 |  Once per month contact with relatives
3 |  A few times per year, once per year or never contact with relatives  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Contact frequency with relatives     
**Variable name**:   soc_sn_freq_relatives_2          
**Variable description**:  Indicator of the contact frequency with relatives, including siblings and children regardless of how close the participant feels to them.                
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to less than monthly (once per month) contact with relatives 
2 |  Once per month contact with relatives
3 |  A few times per year, once per year or never contact with relatives  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Contact frequency with relatives    
**Variable name**:   soc_sn_freq_relatives_3          
**Variable description**:  Indicator of the contact frequency with relatives, including siblings and children regardless of how close the participant feels to them.                
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to less than monthly (once per month) contact with relatives 
2 |  Once per month contact with relatives
3 |  A few times per year, once per year or never contact with relatives  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Contact frequency with relatives    
**Variable name**:   soc_sn_freq_relatives_4          
**Variable description**:  Indicator of the contact frequency with relatives, including siblings and children regardless of how close the participant feels to them.                
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to less than monthly (once per month) contact with relatives 
2 |  Once per month contact with relatives
3 |  A few times per year, once per year or never contact with relatives  

**Harmonization status**:  complete   
**Harmonization comment**:  This DataSchema was created to include CLSA, which does not identify if relatives are close to participant or not.    
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_4$soc_sn_freq_relatives_4 <- ifelse(GLOBE2014$G14v40==1|GLOBE2014$G14v40==2|GLOBE2014$G14v40==3, 1L, 
                                                 ifelse(GLOBE2014$G14v40==4, 2L,ifelse(GLOBE2014$G14v40==5, 3L,NA)))

table(soc_GLOBE_4$soc_sn_freq_relatives_4)
```
### **Variable label**:   Contact frequency with relatives     
**Variable name**:   soc_sn_freq_relatives_5          
**Variable description**:  Indicator of the contact frequency with relatives, including siblings and children regardless of how close the participant feels to them.                
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to less than monthly (once per month) contact with relatives 
2 |  Once per month contact with relatives
3 |  A few times per year, once per year or never contact with relatives  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Contact frequency with relatives    
**Variable name**:   soc_sn_freq_relatives_6          
**Variable description**:  Indicator of the contact frequency with relatives, including siblings and children regardless of how close the participant feels to them.                
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to less than monthly (once per month) contact with relatives 
2 |  Once per month contact with relatives
3 |  A few times per year, once per year or never contact with relatives  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Network size of non-kin      
**Variable name**:   soc_sn_num_nonkin_0    
**Variable description**:  Number of non-kin members of the participant’s social network consisting of neighbours, colleagues (from work or school), members of associations (that participant is a part of, such as community activities and organization) and friends.         
**Value type**:  integer  
**Variable unit**: members       
**Category coding**:   

**Harmonization status**:  impossible  
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Network size of non-kin      
**Variable name**:   soc_sn_num_nonkin_1      
**Variable description**:  Number of non-kin members of the participant’s social network consisting of neighbours, colleagues (from work or school), members of associations (that participant is a part of, such as community activities and organization) and friends.         
**Value type**:  integer  
**Variable unit**: members       
**Category coding**:   

**Harmonization status**:  impossible  
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Network size of non-kin      
**Variable name**:   soc_sn_num_nonkin_2      
**Variable description**:  Number of non-kin members of the participant’s social network consisting of neighbours, colleagues (from work or school), members of associations (that participant is a part of, such as community activities and organization) and friends.         
**Value type**:  integer  
**Variable unit**: members       
**Category coding**:      

**Harmonization status**:  impossible  
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Network size of non-kin      
**Variable name**:   soc_sn_num_nonkin_3      
**Variable description**:  Number of non-kin members of the participant’s social network consisting of neighbours, colleagues (from work or school), members of associations (that participant is a part of, such as community activities and organization) and friends.         
**Value type**:  integer  
**Variable unit**:  members      
**Category coding**:   

**Harmonization status**:  impossible  
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Network size of non-kin      
**Variable name**:   soc_sn_num_nonkin_4      
**Variable description**:  Number of non-kin members of the participant’s social network consisting of neighbours, colleagues (from work or school), members of associations (that participant is a part of, such as community activities and organization) and friends.         
**Value type**:  integer  
**Variable unit**:  members      
**Category coding**:     

**Harmonization status**:  impossible  
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Network size of non-kin      
**Variable name**:   soc_sn_num_nonkin_5      
**Variable description**:  Number of non-kin members of the participant’s social network consisting of neighbours, colleagues (from work or school), members of associations (that participant is a part of, such as community activities and organization) and friends.         
**Value type**:  integer  
**Variable unit**:  members      
**Category coding**:   

**Harmonization status**:  impossible  
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Network size of non-kin      
**Variable name**:   soc_sn_num_nonkin_6      
**Variable description**: Number of non-kin members of the participant’s social network consisting of neighbours, colleagues (from work or school), members of associations (that participant is a part of, such as community activities and organization) and friends.         
**Value type**:  integer  
**Variable unit**: members       
**Category coding**:      

**Harmonization status**:  impossible  
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Contact frequency with non-kin  
**Variable name**:   soc_sn_freq_nonkin_0          
**Variable description**:  Indicator of the contact frequency with non-kin members of social network, consisting of neighbours, relatives and friends.            
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to less than monthly (once per month) contact with non-kin members 
2 |  Once per month contact with non-kin members
3 |  A few times per year, once per year or never contact with non-kin members    

**Harmonization status**:  impossible  
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Contact frequency with non-kin  
**Variable name**:   soc_sn_freq_nonkin_1            
**Variable description**:  Indicator of the contact frequency with non-kin members of social network, consisting of neighbours, relatives and friends.            
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to less than monthly (once per month) contact with non-kin members 
2 |  Once per month contact with non-kin members
3 |  A few times per year, once per year or never contact with non-kin members    

**Harmonization status**:  impossible  
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Contact frequency with non-kin  
**Variable name**:   soc_sn_freq_nonkin_2            
**Variable description**:  Indicator of the contact frequency with non-kin members of social network, consisting of neighbours, relatives and friends.            
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to less than monthly (once per month) contact with non-kin members 
2 |  Once per month contact with non-kin members
3 |  A few times per year, once per year or never contact with non-kin members    

**Harmonization status**:  impossible  
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Contact frequency with non-kin  
**Variable name**:   soc_sn_freq_nonkin_3            
**Variable description**:  Indicator of the contact frequency with non-kin members of social network, consisting of neighbours, relatives and friends.            
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to less than monthly (once per month) contact with non-kin members 
2 |  Once per month contact with non-kin members
3 |  A few times per year, once per year or never contact with non-kin members    

**Harmonization status**:  impossible  
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Contact frequency with non-kin  
**Variable name**:   soc_sn_freq_nonkin_4            
**Variable description**:  Indicator of the contact frequency with non-kin members of social network, consisting of neighbours, relatives and friends.            
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to less than monthly (once per month) contact with non-kin members 
2 |  Once per month contact with non-kin members
3 |  A few times per year, once per year or never contact with non-kin members    

**Harmonization status**:  impossible  
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Contact frequency with non-kin  
**Variable name**:   soc_sn_freq_nonkin_5          
**Variable description**:  Indicator of the contact frequency with non-kin members of social network, consisting of neighbours, relatives and friends.            
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to less than monthly (once per month) contact with non-kin members 
2 |  Once per month contact with non-kin members
3 |  A few times per year, once per year or never contact with non-kin members    

**Harmonization status**:  impossible  
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:   Contact frequency with non-kin  
**Variable name**:   soc_sn_freq_nonkin_6          
**Variable description**:  Indicator of the contact frequency with non-kin members of social network, consisting of neighbours, relatives and friends.            
**Value type**:  integer  
**Variable unit**:      
**Category coding**:   

**Code** | **Category Label**  
------------- | -------------  
1 |  Daily to less than monthly (once per month) contact with non-kin members 
2 |  Once per month contact with non-kin members
3 |  A few times per year, once per year or never contact with non-kin members    

**Harmonization status**:  impossible  
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```

# Social support subdomain

### **Variable label**: Received emotional support    
**Variable name**:   soc_ss_received_emo_0 
**Variable description**:  Indicator of the frequency of received emotional support i.e. receiving affection from or sharing personal experiences/feelings with, from the participant’s three social network members that they indicated they are closest to.        
**Value type**: integer   
**Variable unit**:  
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Never received emotional support
1 |  Sometimes received emotional support
2 |  Often received emotional support

**Harmonization status**:  complete     
**Harmonization comment**: Receiving support from any 1 of 3 confidants is categorized as often receiving support, otherwise receiving support sometimes from any 1 of 3 confidants is categorized as sometimes receiving support. Study specific variable asks 'Do you get affection from this person, does this person embrace or kiss you or give you an affectionate handshake?', which might be interpreted as physical not emotional affection by perticipants. 
**R script**:  
```{r, echo=TRUE}
soc_GLOBE_0$soc_ss_received_emo_0 <- ifelse(GLOBE1991$SEGVv460 ==3 | GLOBE1991$SEGVv461 ==3 |GLOBE1991$SEGVv462 == 3, 2L, 
                                         ifelse(GLOBE1991$SEGVv460 ==2 | GLOBE1991$SEGVv461 ==2 |GLOBE1991$SEGVv462 == 2, 1L, 
                                             ifelse(GLOBE1991$SEGVv460 <=1 | GLOBE1991$SEGVv461 <=1 |GLOBE1991$SEGVv462 <=1, 0L, NA)))
 
```
### **Variable label**: Received emotional support    
**Variable name**:   soc_ss_received_emo_1 
**Variable description**:  Indicator of the frequency of received emotional support i.e. receiving affection from or sharing personal experiences/feelings with, from the participant’s three social network members that they indicated they are closest to.        
**Value type**:  integer  
**Variable unit**:  
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Never received emotional support
1 |  Sometimes received emotional support
2 |  Often received emotional support

**Harmonization status**:  complete      
**Harmonization comment**:  Receiving support from any 1 of 3 confidants is categorized as often receiving support, otherwise receiving support sometimes from any 1 of 3 confidants is categorized as sometimes receiving support. Study specific variable asks 'Do you get affection from this person, does this person embrace or kiss you or give you an affectionate handshake?', which might be interpreted as physical not emotional affection by perticipants.       
**R script**:  
```{r, echo=TRUE}
soc_GLOBE_1$soc_ss_received_emo_1 <- ifelse(GLOBE1997$g9c1 ==3 | GLOBE1997$g9c2 ==3 |GLOBE1997$g9c3 == 3, 2L, 
                                         ifelse(GLOBE1997$g9c1 ==2 | GLOBE1997$g9c2 ==2 |GLOBE1997$g9c3 == 2, 1L, 
                                             ifelse(GLOBE1997$g9c1 ==1 | GLOBE1997$g9c2 ==1 |GLOBE1997$g9c3 == 1, 0L, NA)))

```
### **Variable label**: Received emotional support    
**Variable name**:   soc_ss_received_emo_2 
**Variable description**:  Indicator of the frequency of received emotional support i.e. receiving affection from or sharing personal experiences/feelings with, from the participant’s three social network members that they indicated they are closest to.          
**Value type**:  integer  
**Variable unit**:  
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Never received emotional support
1 |  Sometimes received emotional support
2 |  Often received emotional support

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**: Received emotional support    
**Variable name**:   soc_ss_received_emo_3 
**Variable description**:  Indicator of the frequency of received emotional support i.e. receiving affection from or sharing personal experiences/feelings with, from the participant’s three social network members that they indicated they are closest to.       
**Value type**:  integer  
**Variable unit**:  
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Never received emotional support
1 |  Sometimes received emotional support
2 |  Often received emotional support

**Harmonization status**:  complete    
**Harmonization comment**:  This DataSchema is composed of one item:  How often is this kind of support available to you if you need it: Someone who shows you love and affection, unlike soc_ss_received_emo_0, soc_ss_received_emo_1 which are composed of 3 items (per three confidants). Study specific variable categories: 'one of the time' and 'most of the time' are recoded as 'never receiving support', 'some of the time' is recoded as 'sometimes receiving support', and 'most of the time' and 'all of the time' are recoded as often reciving emotional support.   
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_3$soc_ss_received_emo_3 <- ifelse(GLOBE2011$v59_a_ond1 ==1|GLOBE2011$v59_a_ond1 ==2,0L, 
                                            ifelse(GLOBE2011$v59_a_ond1 ==3, 1L, 
                                              ifelse(GLOBE2011$v59_a_ond1 ==4 | GLOBE2011$v59_a_ond1 ==5,2L,NA)))

```
### **Variable label**: Received emotional support    
**Variable name**:   soc_ss_received_emo_4 
**Variable description**:  Indicator of the frequency of received emotional support i.e. receiving affection from or sharing personal experiences/feelings with, from the participant’s three social network members that they indicated they are closest to.       
**Value type**:  integer  
**Variable unit**:  
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Never received emotional support
1 |  Sometimes received emotional support
2 |  Often received emotional support

**Harmonization status**:  complete    
**Harmonization comment**:  This DataSchema is composed of one item:  How often is this kind of support available to you if you need it: Someone who shows you love and affection, unlike soc_ss_received_emo_0, soc_ss_received_emo_1 which are composed of 3 items (per three confidants). Study specific variable categories: 'one of the time' and 'most of the time' are recoded as 'never receiving support', 'some of the time' is recoded as 'sometimes receiving support', and 'most of the time' and 'all of the time' are recoded as often reciving emotional support  
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_4$soc_ss_received_emo_4 <- ifelse(GLOBE2014$G14v59_a ==4|GLOBE2014$G14v59_a ==5,0L, 
                                            ifelse(GLOBE2014$G14v59_a ==3, 1L, 
                                              ifelse(GLOBE2014$G14v59_a ==1 | GLOBE2014$G14v59_a ==2,2L,NA)))

```
### **Variable label**: Received emotional support    
**Variable name**:   soc_ss_received_emo_5 
**Variable description**:  Indicator of the frequency of received emotional support i.e. receiving affection from or sharing personal experiences/feelings with, from the participant’s three social network members that they indicated they are closest to.       
**Value type**:  integer  
**Variable unit**:  
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Never received emotional support
1 |  Sometimes received emotional support
2 |  Often received emotional support

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**: Received emotional support    
**Variable name**:   soc_ss_received_emo_6 
**Variable description**:  Indicator of the frequency of received emotional support i.e. receiving affection from or sharing personal experiences/feelings with, from the participant’s three social network members that they indicated they are closest to.    
**Value type**:  integer  
**Variable unit**:  
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Never received emotional support
1 |  Sometimes received emotional support
2 |  Often received emotional support

**Harmonization status**:  impossible       
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**: Received instrumental support   
**Variable name**:   soc_ss_received_instru_0 
**Variable description**:  Indicator of the frequency of received instrumental support, i.e. tangible help, from the participant’s three social network members that they indicated they are closest to.      
**Value type**:  integer  
**Variable unit**:  
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Never received instrumental support
1 |  Sometimes received instrumental support
2 |  Often received instrumental support

**Harmonization status**:  complete    
**Harmonization comment**:  Receiving support from any 1 of 3 confidants is categorized as often receiving support, otherwise receiving support sometimes from any 1 of 3 confidants is categorized as sometimes receiving support.     
**R script**:  
```{r, echo=TRUE}
soc_GLOBE_0$soc_ss_received_instru_0 <- ifelse(GLOBE1991$SEGVv454 ==3 | GLOBE1991$SEGVv455 ==3 |GLOBE1991$SEGVv456 == 3, 2L, 
                                         ifelse(GLOBE1991$SEGVv454 ==2 | GLOBE1991$SEGVv455 ==2 |GLOBE1991$SEGVv456 == 2, 1L, 
                                             ifelse(GLOBE1991$SEGVv454 ==1 | GLOBE1991$SEGVv455 ==1 |GLOBE1991$SEGVv456 == 1, 0L, NA)))


```
### **Variable label**: Received instrumental support   
**Variable name**:   soc_ss_received_instru_1 
**Variable description**:  Indicator of the frequency of received instrumental support, i.e. tangible help, from the participant’s three social network members that they indicated they are closest to.     
**Value type**:  integer  
**Variable unit**:  
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Never received instrumental support
1 |  Sometimes received instrumental support
2 |  Often received instrumental support

**Harmonization status**:  complete    
**Harmonization comment**:  Receiving support from any 1 of 3 confidants is categorized as often receiving support, otherwise receiving support sometimes from any 1 of 3 confidants is categorized as sometimes receiving support.      
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_1$soc_ss_received_instru_1 <- ifelse(GLOBE1997$g9a1 ==3 | GLOBE1997$g9a2 ==3 |GLOBE1997$g9a3 == 3, 2L, 
                                         ifelse(GLOBE1997$g9a1 ==2 | GLOBE1997$g9a2 ==2 |GLOBE1997$g9a3 == 2, 1L, 
                                             ifelse(GLOBE1997$g9a1 ==1 | GLOBE1997$g9a2 ==1 |GLOBE1997$g9a3 == 1, 0L, NA)))


```
### **Variable label**: Received instrumental support   
**Variable name**:   soc_ss_received_instru_2 
**Variable description**:  Indicator of the frequency of received instrumental support, i.e. tangible help, from the participant’s three social network members that they indicated they are closest to.      
**Value type**:  integer  
**Variable unit**:  
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Never received instrumental support
1 |  Sometimes received instrumental support
2 |  Often received instrumental support

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**: Received instrumental support   
**Variable name**:   soc_ss_received_instru_3 
**Variable description**:  Indicator of the frequency of received instrumental support, i.e. tangible help, from the participant’s three social network members that they indicated they are closest to.      
**Value type**:  integer  
**Variable unit**:  
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Never received instrumental support
1 |  Sometimes received instrumental support
2 |  Often received instrumental support

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**: Received instrumental support   
**Variable name**:   soc_ss_received_instru_4 
**Variable description**:  Indicator of the frequency of received instrumental support, i.e. tangible help, from the participant’s three social network members that they indicated they are closest to.      
**Value type**:  integer  
**Variable unit**:  
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |   Never received instrumental support
1 |   Sometimes received instrumental support
2 |   Often received instrumental support

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**: Received instrumental support   
**Variable name**:   soc_ss_received_instru_5 
**Variable description**:  Indicator of the frequency of received instrumental support, i.e. tangible help, from the participant’s three social network members that they indicated they are closest to.      
**Value type**:  integer  
**Variable unit**:  
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Never received instrumental support
1 |  Sometimes received instrumental support
2 |  Often received instrumental support

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**: Received instrumental support   
**Variable name**:   soc_ss_received_instru_6 
**Variable description**:  Indicator of the frequency of received instrumental support, i.e. tangible help, from the participant’s three social network members that they indicated they are closest to.      
**Value type**:  integer  
**Variable unit**:  
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Never received instrumental support
1 |  Sometimes received instrumental support
2 |  Often received instrumental support

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**: Perceived emotional support Z-score   
**Variable name**:   soc_ss_Zscore_perceived_emo_0      
**Variable description**:  Z-score of perceived emotional support.   
**Value type**:  decimal    
**Variable unit**:  
**Category coding**:  

**Harmonization status**:  complete   
**Harmonization comment**:   The following GLOBE items were used: Would this person give good advice? Would you be able to go to this person in tears? Do you see that this person cares for you? - averaged over the top 3 contacts. Each item is rated 1 (never) to 3 (always) hence maximum score is out of 9 which was then converted into a Z-score in order to be comparable with items in other studies which might not use 3 separate items to create this DataSchema.   
**R script**:  
```{r, echo=TRUE}
GLOBE1991$soc_ss_Zscore_perceived_emo_0_inter <- as.numeric(GLOBE1991$SEGVv475 + GLOBE1991$SEGVv476 + GLOBE1991$SEGVv477
                                                             + GLOBE1991$SEGVv472 + GLOBE1991$SEGVv473 + GLOBE1991$SEGVv474
                                                             + GLOBE1991$SEGVv457 + GLOBE1991$SEGVv458 + GLOBE1991$SEGVv459)


soc_GLOBE_0$soc_ss_Zscore_perceived_emo_0 <-as.numeric(scale(GLOBE1991$soc_ss_Zscore_perceived_emo_0_inter, center = TRUE, scale= TRUE)) 

```
### **Variable label**: Perceived emotional support Z-score   
**Variable name**:   soc_ss_Zscore_perceived_emo_1      
**Variable description**:  Z-score of perceived emotional support.  
**Value type**:  decimal    
**Variable unit**:  
**Category coding**:  

**Harmonization status**:  complete   
**Harmonization comment**: The following GLOBE items were used: Would this person give good advice? Would you be able to go to this person in tears? Do you see that this person cares for you? - averaged over the top 3 contacts. Each item is rated 1 (never) to 3 (always) hence maximum score is out of 9 which was then converted into a Z-score in order to be comparable with items in other studies which might not use 3 separate items to create this DataSchema.   
**R script**:  
```{r, echo=TRUE}

GLOBE1997$soc_ss_Zscore_perceived_emo_1_inter <- as.numeric(GLOBE1997$g9g1 + GLOBE1997$g9g2 + GLOBE1997$g9g3
                                                             + GLOBE1997$g9f1 + GLOBE1997$g9f2 + GLOBE1997$g9f3
                                                             + GLOBE1997$g9b1 + GLOBE1997$g9b2 + GLOBE1997$g9b3)


soc_GLOBE_1$soc_ss_Zscore_perceived_emo_1 <- as.numeric(scale(GLOBE1997$soc_ss_Zscore_perceived_emo_1_inter, center = TRUE, scale= TRUE)) 

```
### **Variable label**: Perceived emotional support Z-score   
**Variable name**:   soc_ss_Zscore_perceived_emo_2      
**Variable description**: Z-score of perceived emotional support.   
**Value type**:  decimal    
**Variable unit**:  
**Category coding**:  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**: Perceived emotional support Z-score   
**Variable name**:   soc_ss_Zscore_perceived_emo_3      
**Variable description**: Z-score of perceived emotional support.  
**Value type**:  decimal    
**Variable unit**:  
**Category coding**:  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**: Perceived emotional support Z-score   
**Variable name**:   soc_ss_Zscore_perceived_emo_4       
**Variable description**:  Z-score of perceived emotional support.  
**Value type**:  decimal    
**Variable unit**:  
**Category coding**:     

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**: Perceived emotional support Z-score   
**Variable name**:   soc_ss_Zscore_perceived_emo_5        
**Variable description**:  Z-score of perceived emotional support.  
**Value type**:  decimal    
**Variable unit**:  
**Category coding**:  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**: Perceived emotional support Z-score   
**Variable name**:   soc_ss_Zscore_perceived_emo_6        
**Variable description**:  Z-score of perceived emotional support.  
**Value type**:  decimal    
**Variable unit**:  
**Category coding**:  
 
**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**: Perceived instrumental support        
**Variable name**:   soc_ss_perceived_instru_0      
**Variable description**:  Indicator of perceived instrumental support, i.e. participant feels like there is someone to help with daily chores in case of need.          
**Value type**:  integer  
**Variable unit**:  
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Feels tangible help is available  
1 |  Does not feel tangible help is available   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**: Perceived instrumental support        
**Variable name**:   soc_ss_perceived_instru_1      
**Variable description**:  Indicator of perceived instrumental support, i.e. participant feels like there is someone to help with daily chores in case of need.        
**Value type**:  integer  
**Variable unit**:  
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Feels tangible help is available  
1 |  Does not feel tangible help is available   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**: Perceived instrumental support        
**Variable name**:   soc_ss_perceived_instru_2      
**Variable description**:  Indicator of perceived instrumental support, i.e. participant feels like there is someone to help with daily chores in case of need.        
**Value type**:  integer  
**Variable unit**:  
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Feels tangible help is available   
1 |  Does not feel tangible help is available   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**: Perceived instrumental support        
**Variable name**:   soc_ss_perceived_instru_3      
**Variable description**:  Indicator of perceived instrumental support, i.e. participant feels like there is someone to help with daily chores in case of need.       
**Value type**:  integer  
**Variable unit**:  
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Feels tangible help is available   
1 |  Does not feel tangible help is available    

**Harmonization status**:  complete    
**Harmonization comment**:   Study specific variable categories: all of the time, most of the time, some of the time (help is available...) are harmonized as "feels tangible help is available", categories: a litte of the time, never are harmonized as "does not feel tangible help is avilable".
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_3$soc_ss_perceived_instru_3 <- ifelse(GLOBE2011$v59_f_ond6 ==1|GLOBE2011$v59_f_ond6 ==2|GLOBE2011$v59_f_ond6==3 ,0L, 
                                              ifelse(GLOBE2011$v59_f_ond6 ==4 | GLOBE2011$v59_f_ond6 ==5,1L,NA))

```
### **Variable label**: Perceived instrumental support        
**Variable name**:   soc_ss_perceived_instru_4      
**Variable description**:  Indicator of perceived instrumental support, i.e. participant feels like there is someone to help with daily chores in case of need.       
**Value type**:  integer  
**Variable unit**:  
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Feels tangible help is available   
1 |  Does not feel tangible help is available  

**Harmonization status**:  complete    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_4$soc_ss_perceived_instru_4 <- ifelse(GLOBE2014$G14v59_f ==1|GLOBE2014$G14v59_f ==2|GLOBE2014$G14v59_f==3 ,0L, 
                                              ifelse(GLOBE2014$G14v59_f ==4 | GLOBE2014$G14v59_f ==5,1L,NA))

```
### **Variable label**: Perceived instrumental support        
**Variable name**:   soc_ss_perceived_instru_5      
**Variable description**:  Indicator of perceived instrumental support, i.e. participant feels like there is someone to help with daily chores in case of need.       
**Value type**:  integer  
**Variable unit**:  
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Feels tangible help is available   
1 |  Does not feel tangible help is available  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**: Perceived instrumental support        
**Variable name**:   soc_ss_perceived_instru_6      
**Variable description**:  Indicator of perceived instrumental support, i.e. participant feels like there is someone to help with daily chores in case of need.       
**Value type**:  integer  
**Variable unit**:  
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Feels tangible help is available   
1 |  Does not feel tangible help is available   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```

# Social participation subdomain

### **Variable label**:  Religious participation 
**Variable name**:  soc_sp_religious_0        
**Variable description**:  Indicator of participation in a religious organization.      
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in a religious organization   
1 |  Does participate in a religious organization 

**Harmonization status**:  impossible   
**Harmonization comment**:    
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Religious participation 
**Variable name**:  soc_sp_religious_1        
**Variable description**:  Indicator of participation in a religious organization.      
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in a religious organization   
1 |  Does participate in a religious organization  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Religious participation 
**Variable name**:  soc_sp_religious_2        
**Variable description**:  Indicator of participation in a religious organization.      
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in a religious organization   
1 |  Does participate in a religious organization 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Religious participation 
**Variable name**:  soc_sp_religious_3        
**Variable description**:  Indicator of participation in a religious organization.      
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in a religious organization   
1 |  Does participate in a religious organization 

**Harmonization status**:  complete    
**Harmonization comment**:  Study specific variable also asks about mosque, synagogue or other religious organization. 
**R script**:  
```{r, echo=TRUE}


soc_GLOBE_3$soc_sp_religious_3 <- ifelse(GLOBE2011$v61_e_o_ker ==1,1L, 
                                              ifelse(GLOBE2011$v61_e_o_ker ==0,0L,NA))

```
### **Variable label**:  Religious participation 
**Variable name**:  soc_sp_religious_4        
**Variable description**:  Indicator of participation in a religious organization.      
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in a religious organization   
1 |  Does participate in a religious organization 

**Harmonization status**:  complete    
**Harmonization comment**: Study specific variable also asks about mosque, synagogue or other religious organization.  
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_4$soc_sp_religious_4 <- ifelse(GLOBE2014$G14v56_e==1,1L, 
                                              ifelse(GLOBE2014$G14v56_e ==0,0L,NA))
```
### **Variable label**:  Religious participation 
**Variable name**:  soc_sp_religious_5        
**Variable description**:  Indicator of participation in a religious organization.      
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in a religious organization   
1 |  Does participate in a religious organization  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Religious participation 
**Variable name**:  soc_sp_religious_6        
**Variable description**:  Indicator of participation in a religious organization.      
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in a religious organization   
1 |  Does participate in a religious organization  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```

### **Variable label**:  Frequency of religious participation 
**Variable name**:  soc_sp_freq_religious_0        
**Variable description**:  Indicator of the frequency of participation in a religious organization.         
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
1 |  Weekly participation in religious organization 
2 |  Monthly participation in religious organization
3 |  Less than monthly participation in religious organization
4 |  Never participates in religious organization
5 |  No answer/don’t know regarding participation in religious organization

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Frequency of religious participation 
**Variable name**:  soc_sp_freq_religious_1        
**Variable description**:  Indicator of the frequency of participation in a religious organization.         
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
1 |  Weekly participation in religious organization 
2 |  Monthly participation in religious organization
3 |  Less than monthly participation in religious organization
4 |  Never participates in religious organization
5 |  No answer/don’t know regarding participation in religious organization

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Frequency of religious participation 
**Variable name**:  soc_sp_freq_religious_2        
**Variable description**:  Indicator of the frequency of participation in a religious organization.         
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
1 |  Weekly participation in religious organization 
2 |  Monthly participation in religious organization
3 |  Less than monthly participation in religious organization
4 |  Never participates in religious organization
5 |  No answer/don’t know regarding participation in religious organization

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Frequency of religious participation 
**Variable name**:  soc_sp_freq_religious_3        
**Variable description**:  Indicator of the frequency of participation in a religious organization.         
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
1 |  Weekly participation in religious organization 
2 |  Monthly participation in religious organization
3 |  Less than monthly participation in religious organization
4 |  Never participates in religious organization
5 |  No answer/don’t know regarding participation in religious organization

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Frequency of religious participation 
**Variable name**:  soc_sp_freq_religious_4        
**Variable description**:  Indicator of the frequency of participation in a religious organization.         
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
1 |  Weekly participation in religious organization 
2 |  Monthly participation in religious organization
3 |  Less than monthly participation in religious organization
4 |  Never participates in religious organization
5 |  No answer/don’t know regarding participation in religious organization

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Frequency of religious participation 
**Variable name**:  soc_sp_freq_religious_5        
**Variable description**:  Indicator of the frequency of participation in a religious organization.         
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
1 |  Weekly participation in religious organization 
2 |  Monthly participation in religious organization
3 |  Less than monthly participation in religious organization
4 |  Never participates in religious organization
5 |  No answer/don’t know regarding participation in religious organization

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Frequency of religious participation 
**Variable name**:  soc_sp_freq_religious_6        
**Variable description**:  Indicator of the frequency of participation in a religious organization.         
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
1 |  Weekly participation in religious organization 
2 |  Monthly participation in religious organization
3 |  Less than monthly participation in religious organization
4 |  Never participates in religious organization
5 |  No answer/don’t know regarding participation in religious organization

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```

### **Variable label**:  Cultural and educational participation   
**Variable name**:  soc_sp_cultural_edu_0           
**Variable description**:  Indicator of whether the participant is a member of/participates in a group, club or activity related to education or culture.       
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in a cultural or educational organization  
1 |  Does participate in a cultural or educational organization 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Cultural and educational participation   
**Variable name**:  soc_sp_cultural_edu_1           
**Variable description**:  Indicator of whether the participant is a member of/participates in a group, club or activity related to education or culture.       
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in a cultural or educational organization  
1 |  Does participate in a cultural or educational organization 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Cultural and educational participation   
**Variable name**:  soc_sp_cultural_edu_2           
**Variable description**:  Indicator of whether the participant is a member of/participates in a group, club or activity related to education or culture.       
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in a cultural or educational organization  
1 |  Does participate in a cultural or educational organization 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Cultural and educational participation   
**Variable name**:  soc_sp_cultural_edu_3           
**Variable description**:  Indicator of whether the participant is a member of/participates in a group, club or activity related to education or culture.       
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in a cultural or educational organization  
1 |  Does participate in a cultural or educational organization 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Cultural and educational participation   
**Variable name**:  soc_sp_cultural_edu_4           
**Variable description**:  Indicator of whether the participant is a member of/participates in a group, club or activity related to education or culture.       
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in a cultural or educational organization  
1 |  Does participate in a cultural or educational organization 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Cultural and educational participation   
**Variable name**:  soc_sp_cultural_edu_5           
**Variable description**:  Indicator of whether the participant is a member of/participates in a group, club or activity related to education or culture.       
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in a cultural or educational organization  
1 |  Does participate in a cultural or educational organization 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Cultural and educational participation   
**Variable name**:  soc_sp_cultural_edu_6           
**Variable description**:  Indicator of whether the participant is a member of/participates in a group, club or activity related to education or culture.       
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in a cultural or educational organization  
1 |  Does participate in a cultural or educational organization 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Cultural, educational and social participation    
**Variable name**:  soc_sp_cul_edu_soc_0                 
**Variable description**:  Indicator of whether the participant is a member of/ participates in a group, club or activity related to culture, educational or social activities.   
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in a cultural, educational or social organization  
1 |  Does participate in a cultural, educational or social organization 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Cultural, educational and social participation       
**Variable name**:  soc_sp_cul_edu_soc_1                 
**Variable description**:  Indicator of whether the participant is a member of/ participates in a group, club or activity related to culture, educational or social activities.      
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in a cultural, educational or social organization  
1 |  Does participate in a cultural, educational or social organization 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Cultural, educational and social participation       
**Variable name**:  soc_sp_cul_edu_soc_2                 
**Variable description**:  Indicator of whether the participant is a member of/ participates in a group, club or activity related to culture, educational or social activities.      
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in a cultural, educational or social organization  
1 |  Does participate in a cultural, educational or social organization 

**Harmonization status**:  complete   
**Harmonization comment**:  Study specific variable asks if participant has memberhsip and it does not ask about educational participation.   
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_2$soc_sp_cul_edu_soc_2 <- ifelse(GLOBE2004$w289=='1',1, 
                                                  ifelse(GLOBE2004$w289=='2',2, NA))
```
### **Variable label**:  Cultural, educational and social participation       
**Variable name**:  soc_sp_cul_edu_soc_3               
**Variable description**:  Indicator of whether the participant is a member of/ participates in a group, club or activity related to culture, educational or social activities.      
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in a cultural, educational or social organization  
1 |  Does participate in a cultural, educational or social organization 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Cultural, educational and social participation       
**Variable name**:  soc_sp_cul_edu_soc_4               
**Variable description**:  Indicator of whether the participant is a member of/ participates in a group, club or activity related to culture, educational or social activities.      
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in a cultural, educational or social organization  
1 |  Does participate in a cultural, educational or social organization 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Cultural, educational and social participation       
**Variable name**:  soc_sp_cul_edu_soc_5               
**Variable description**:  Indicator of whether the participant is a member of/ participates in a group, club or activity related to culture, educational or social activities.     
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in a cultural, educational or social organization  
1 |  Does participate in a cultural, educational or social organization 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Cultural, educational and social participation       
**Variable name**:  soc_sp_cul_edu_soc_6               
**Variable description**:  Indicator of whether the participant is a member of/ participates in a group, club or activity related to culture, educational or social activities.      
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in a cultural, educational or social organization  
1 |  Does participate in a cultural, educational or social organization 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Volunteering      
**Variable name**:  soc_sp_volunteer_0                
**Variable description**:  Indicator of whether the participant takes part in volunteer activities including charity work or volunteer work in an association with a social aim.      
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not take part in volunteer activities
1 |  Does take part in volunteer activities  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Volunteering      
**Variable name**:  soc_sp_volunteer_1                
**Variable description**:  Indicator of whether the participant takes part in volunteer activities including charity work or volunteer work in an association with a social aim.      
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not take part in volunteer activities
1 |  Does take part in volunteer activities  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Volunteering      
**Variable name**:  soc_sp_volunteer_2                
**Variable description**:  Indicator of whether the participant takes part in volunteer activities including charity work or volunteer work in an association with a social aim.      
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not take part in volunteer activities
1 |  Does take part in volunteer activities  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Volunteering      
**Variable name**:  soc_sp_volunteer_3                
**Variable description**:  Indicator of whether the participant takes part in volunteer activities including charity work or volunteer work in an association with a social aim.      
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not take part in volunteer activities
1 |  Does take part in volunteer activities 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Volunteering      
**Variable name**:  soc_sp_volunteer_4                
**Variable description**:  Indicator of whether the participant takes part in volunteer activities including charity work or volunteer work in an association with a social aim.      
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not take part in volunteer activities
1 |  Does take part in volunteer activities 

**Harmonization status**:  complete   
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_4$soc_sp_volunteer_4 <- ifelse(GLOBE2014$G14v56_g=='1',1L, 
                                                  ifelse(GLOBE2014$G14v56_g=='0',0L, NA))

```
### **Variable label**:  Volunteering      
**Variable name**:  soc_sp_volunteer_5                
**Variable description**:  Indicator of whether the participant takes part in volunteer activities including charity work or volunteer work in an association with a social aim.      
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not take part in volunteer activities
1 |  Does take part in volunteer activities 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Volunteering      
**Variable name**:  soc_sp_volunteer_6                
**Variable description**:  Indicator of whether the participant takes part in volunteer activities including charity work or volunteer work in an association with a social aim.      
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not take part in volunteer activities
1 |  Does take part in volunteer activities 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Political / union participation         
**Variable name**:  soc_sp_pol_0                
**Variable description**:  Indicator of participation in a union or political party.        
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in a civic organization   
1 |  Does participate in a civic organization   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Political / union participation         
**Variable name**:  soc_sp_pol_1                
**Variable description**:  Indicator of participation in a union or political party.        
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in a civic organization   
1 |  Does participate in a civic organization   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Political / union participation         
**Variable name**:  soc_sp_pol_2                
**Variable description**:  Indicator of participation in a union or political party.        
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in a civic organization   
1 |  Does participate in a civic organization   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Political / union participation         
**Variable name**:  soc_sp_pol_3                
**Variable description**:  Indicator of participation in a union or political party.        
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in a civic organization   
1 |  Does participate in a civic organization   

**Harmonization status**:  complete   
**Harmonization comment**:   Two study specific variables were harmonized, one asking about political party participation and one asking about union but also professional organization participation. Answering yes to either was harmonized as participates in a civic organization.  
**R script**:  
```{r, echo=TRUE}
	
soc_GLOBE_3$soc_sp_pol_3 <- ifelse(GLOBE2011$v61_d_o_pol =='1' | GLOBE2011$v61_c_o_vak =='1',1L, 
                                                  ifelse(GLOBE2011$v61_d_o_pol =='0' & GLOBE2011$v61_c_o_vak =='0',0L, NA))

```
### **Variable label**:  Political / union participation         
**Variable name**:  soc_sp_pol_4                
**Variable description**:  Indicator of participation in a union or political party.        
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in a civic organization   
1 |  Does participate in a civic organization  

**Harmonization status**:  complete    
**Harmonization comment**:  Two study specific variables were harmonized, one asking about political party participation and one asking about union but also professional organization participation. Answering yes to either was harmonized as participates in a civic organization.   
**R script**:  
```{r, echo=TRUE}
soc_GLOBE_4$soc_sp_pol_4 <- ifelse(GLOBE2014$G14v56_c =='1' | GLOBE2014$G14v56_d =='1',1L, 
                                                  ifelse(GLOBE2014$G14v56_c =='0' & GLOBE2014$G14v56_d =='0',0L, NA))

```
### **Variable label**:  Political / union participation         
**Variable name**:  soc_sp_pol_5                
**Variable description**:  Indicator of participation in a union or political party.        
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in a civic organization   
1 |  Does participate in a civic organization  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Political / union participation         
**Variable name**:  soc_sp_pol_6                
**Variable description**:  Indicator of participation in a union or political party.        
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in a civic organization   
1 |  Does participate in a civic organization  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Professional participation         
**Variable name**:  soc_sp_prof_0                
**Variable description**:  Indicator of participation in a professional association, including a union or neighbourhood association.  
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in an union, professional or neighbourhood organization   
1 |  Does participate in an union, professional or neighbourhood organization  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Professional participation         
**Variable name**:  soc_sp_prof_1                
**Variable description**:  Indicator of participation in a professional association, including a union or neighbourhood association.  
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in an union, professional or neighbourhood organization   
1 |  Does participate in an union, professional or neighbourhood organization  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Professional participation         
**Variable name**:  soc_sp_prof_2                
**Variable description**:  Indicator of participation in a professional association, including a union or neighbourhood association.  
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in an union, professional or neighbourhood organization  
1 |  Does participate in an union, professional or neighbourhood organization 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Professional participation         
**Variable name**:  soc_sp_prof_3                
**Variable description**:  Indicator of participation in a professional association, including a union or neighbourhood association.  
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in an union, professional or neighbourhood organization   
1 |  Does participate in an union, professional or neighbourhood organization  

**Harmonization status**:  complete    
**Harmonization comment**:  Harmonized 2 study specific variables, participation in either i) union/professional organizations or ii) a neighbourhood, civic or community association, was harmonized as participation.
**R script**:  
```{r, echo=TRUE}
soc_GLOBE_3$soc_sp_prof_3 <- ifelse(GLOBE2011$v61_f_o_buu =='1' | GLOBE2011$v61_c_o_vak =='1',1L, 
                                                  ifelse(GLOBE2011$v61_f_o_buu =='0' & GLOBE2011$v61_c_o_vak =='0',0L, NA))


```
### **Variable label**:  Professional participation         
**Variable name**:  soc_sp_prof_4                
**Variable description**:  Indicator of participation in a professional association, including a union or neighbourhood association.  
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in an union, professional or neighbourhood organization   
1 |  Does participate in an union, professional or neighbourhood organization   

**Harmonization status**:  complete    
**Harmonization comment**:  Harmonized 2 study specific variables, participation in either i) union/professional organizations or ii) a neighbourhood, civic or community association, was harmonized as participation.   
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_4$soc_sp_prof_4 <- ifelse(GLOBE2014$G14v56_c =='1' | GLOBE2014$G14v56_f =='1',1L, 
                                                  ifelse(GLOBE2014$G14v56_c =='0' & GLOBE2014$G14v56_f =='0',0L, NA))


```
### **Variable label**:  Professional participation         
**Variable name**:  soc_sp_prof_5                
**Variable description**:  Indicator of participation in a professional association, including a union or neighbourhood association.  
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in an union, professional or neighbourhood organization   
1 |  Does participate in an union, professional or neighbourhood organization   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Professional participation         
**Variable name**:  soc_sp_prof_6                
**Variable description**:  Indicator of participation in a professional association, including a union or neighbourhood association.  
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not participate in an union, professional or neighbourhood organization  
1 |  Does participate in an union, professional or neighbourhood organization   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  General social participation          
**Variable name**:  soc_sp_general_0                
**Variable description**:  Indicator of participation in a religious, cultural, educational, civic, political, social/charity work association and/or volunteering.        
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not take part in a social organization/volunteers   
1 |  Does take part in a social organization/volunteers   

**Harmonization status**:  impossible   
**Harmonization comment**: 
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  General social participation            
**Variable name**:  soc_sp_general_1                
**Variable description**:  Indicator of participation in a religious, cultural, educational, civic, political, social/charity work association and/or volunteering.        
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not take part in a social organization/volunteers     
1 |  Does take part in a social organization/volunteers       

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  General social participation          
**Variable name**:  soc_sp_general_2                
**Variable description**:  Indicator of participation in a religious, cultural, educational, civic, political, social/charity work association and/or volunteering.        
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not take part in a social organization/volunteers     
1 |  Does take part in a social organization/volunteers     

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  General social participation          
**Variable name**:  soc_sp_general_3                
**Variable description**:  Indicator of participation in a religious, cultural, educational, civic, political, social/charity work association and/or volunteering.        
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not take part in a social organization/volunteers     
1 |  Does take part in a social organization/volunteers       

**Harmonization status**:  complete    
**Harmonization comment**: Study specific variable asking respondent if they do NOT participate in any organization is used in this harmonization.    
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_3$soc_sp_general_3 <- ifelse(GLOBE2011$v61_g_o_ner =='1'|GLOBE2011$v61_f_o_buu=='1'| GLOBE2011$v61_c_o_vak=='1'| GLOBE2011$v61_d_o_pol=='1'| GLOBE2011$v61_e_o_ker=='1' ,1L, 
                                                  ifelse(GLOBE2011$v61_g_o_ner =='0' &   GLOBE2011$v61_f_o_buu =='0' & GLOBE2011$v61_c_o_vak =='0' &   GLOBE2011$v61_d_o_pol =='0'&   GLOBE2011$v61_e_o_ker =='0' ,0L, NA))

```
### **Variable label**:  General social participation          
**Variable name**:  soc_sp_general_4                
**Variable description**:  Indicator of participation in a religious, cultural, educational, civic, political, social/charity work association and/or volunteering.        
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not take part in a social organization/volunteers     
1 |  Does take part in a social organization/volunteers     

**Harmonization status**:  complete    
**Harmonization comment**:  Study specific variable asking respondent if they do NOT participate in any organization is used in this harmonization.   
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_4$soc_sp_general_4 <- ifelse(GLOBE2014$G14v56_h =='1'|GLOBE2014$G14v56_c=='1'| GLOBE2014$G14v56_f=='1'| GLOBE2014$G14v56_d=='1'| GLOBE2014$G14v56_g=='1'| GLOBE2014$G14v56_e=='1' ,1L, 
                                                  ifelse(GLOBE2014$G14v56_h =='0' &   GLOBE2014$G14v56_c =='0' & GLOBE2014$G14v56_f =='0' &   GLOBE2014$G14v56_d =='0'&   GLOBE2014$G14v56_g =='0' & GLOBE2014$G14v56_e =='0',0L, NA))

```
### **Variable label**:  General social participation          
**Variable name**:  soc_sp_general_5                
**Variable description**:  Indicator of participation in a religious, cultural, educational, civic, political, social/charity work association and/or volunteering.        
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not take part in a social organization/volunteers     
1 |  Does take part in a social organization/volunteers    

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  General social participation          
**Variable name**:  soc_sp_general_6                
**Variable description**:  Indicator of participation in a religious, cultural, educational, civic, political, social/charity work association and/or volunteering.      
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not take part in a social organization/volunteers     
1 |  Does take part in a social organization/volunteers    

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Non participation due to safety       
**Variable name**:  soc_sp_nosafety_0                  
**Variable description**:  Indicator of whether the participant did not participate in social activities due to safety concerns.       
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Safety concerns did not affect participation  
1 |  Did not participate due to safety concerns   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Non participation due to safety       
**Variable name**:  soc_sp_nosafety_1                  
**Variable description**:  Indicator of whether the participant did not participate in social activities due to safety concerns.       
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Safety concerns did not affect participation  
1 |  Did not participate due to safety concerns   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Non participation due to safety       
**Variable name**:  soc_sp_nosafety_2                  
**Variable description**:  Indicator of whether the participant did not participate in social activities due to safety concerns.       
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Safety concerns did not affect participation  
1 |  Did not participate due to safety concerns   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Non participation due to safety       
**Variable name**:  soc_sp_nosafety_3                   
**Variable description**:  Indicator of whether the participant did not participate in social activities due to safety concerns.       
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Safety concerns did not affect participation  
1 |  Did not participate due to safety concerns   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Non participation due to safety       
**Variable name**:  soc_sp_nosafety_4                    
**Variable description**:  Indicator of whether the participant did not participate in social activities due to safety concerns.       
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Safety concerns did not affect participation  
1 |  Did not participate due to safety concerns   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Non participation due to safety       
**Variable name**:  soc_sp_nosafety_5                  
**Variable description**:  Indicator of whether the participant did not participate in social activities due to safety concerns.       
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Safety concerns did not affect participation  
1 |  Did not participate due to safety concerns   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Non participation due to safety       
**Variable name**:  soc_sp_nosafety_6                  
**Variable description**:  Indicator of whether the participant did not participate in social activities due to safety concerns.       
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Safety concerns did not affect participation  
1 |  Did not participate due to safety concerns   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Non participation due to lack of transportation      
**Variable name**:  soc_sp_notrans_0                  
**Variable description**:  Indicator of whether the participant did not participate in social activities due to transport issues.       
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Lack of transportation did not affect participation
1 |  Did not participate due to lack of transportation   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Non participation due to lack of transportation      
**Variable name**:  soc_sp_notrans_1                  
**Variable description**:  Indicator of whether the participant did not participate in social activities due to transport issues.       
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Lack of transportation did not affect participation
1 |  Did not participate due to lack of transportation   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Non participation due to lack of transportation      
**Variable name**:  soc_sp_notrans_2                  
**Variable description**:  Indicator of whether the participant did not participate in social activities due to transport issues.       
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Lack of transportation did not affect participation
1 |  Did not participate due to lack of transportation   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Non participation due to lack of transportation      
**Variable name**:  soc_sp_notrans_3                  
**Variable description**:  Indicator of whether the participant did not participate in social activities due to transport issues.       
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Lack of transportation did not affect participation
1 |  Did not participate due to lack of transportation   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Non participation due to lack of transportation      
**Variable name**:  soc_sp_notrans_4                  
**Variable description**:  Indicator of whether the participant did not participate in social activities due to transport issues.       
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Lack of transportation did not affect participation
1 |  Did not participate due to lack of transportation   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Non participation due to lack of transportation      
**Variable name**:  soc_sp_notrans_5                  
**Variable description**:  Indicator of whether the participant did not participate in social activities due to transport issues.       
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Lack of transportation did not affect participation
1 |  Did not participate due to lack of transportation   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Non participation due to lack of transportation      
**Variable name**:  soc_sp_notrans_6                  
**Variable description**:  Indicator of whether the participant did not participate in social activities due to transport issues.       
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Lack of transportation did not affect participation
1 |  Did not participate due to lack of transportation   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Hobby      
**Variable name**:  soc_sp_hobby_0                       
**Variable description**:  Indicator of whether the participant has a hobby.         
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not have a hobby
1 |  Does have a hobby  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Hobby      
**Variable name**:  soc_sp_hobby_1                       
**Variable description**:  Indicator of whether the participant has a hobby.         
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not have a hobby
1 |  Does have a hobby   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Hobby      
**Variable name**:  soc_sp_hobby_2                       
**Variable description**:  Indicator of whether the participant has a hobby.         
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not have a hobby
1 |  Does have a hobby  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Hobby      
**Variable name**:  soc_sp_hobby_3                       
**Variable description**:  Indicator of whether the participant has a hobby.         
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not have a hobby
1 |  Does have a hobby  

**Harmonization status**:  complete    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_3$soc_sp_hobby_3 <- ifelse(GLOBE2011$v61_b_o_hob =='1',1L, 
                                                  ifelse(GLOBE2011$v61_b_o_hob =='0',0L, NA))

```
### **Variable label**:  Hobby      
**Variable name**:  soc_sp_hobby_4                       
**Variable description**:  Indicator of whether the participant has a hobby.         
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not have a hobby
1 |  Does have a hobby 

**Harmonization status**:  complete    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_4$soc_sp_hobby_4 <- ifelse(GLOBE2014$G14v56_b =='1',1L, 
                                                  ifelse(GLOBE2014$G14v56_b =='0',0L, NA))

```
### **Variable label**:  Hobby      
**Variable name**:  soc_sp_hobby_5                       
**Variable description**:  Indicator of whether the participant has a hobby.         
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not have a hobby
1 |  Does have a hobby  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Hobby      
**Variable name**:  soc_sp_hobby_6                       
**Variable description**:  Indicator of whether the participant has a hobby.         
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not have a hobby
1 |  Does have a hobby 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Social isolation    
**Variable name**:  soc_sp_isolation_0  
**Variable description**:  Indicator of whether the participant is socially isolated i.e. no/ low social network and no participation in an association (any type, including religious organization and volunteering).  
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Not socially isolated, has social network and/ or social participation 
1 |  Socially isolated, no social network and no social participation 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Social isolation    
**Variable name**:  soc_sp_isolation_1  
**Variable description**:  Indicator of whether the participant is socially isolated i.e. no/ low social network and no participation in an association (any type, including religious organization and volunteering).  
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Not socially isolated, has social network and/ or social participation 
1 |  Socially isolated, no social network and no social participation 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Social isolation    
**Variable name**:  soc_sp_isolation_2  
**Variable description**:  Indicator of whether the participant is socially isolated i.e. no/ low social network and no participation in an association (any type, including religious organization and volunteering).  
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Not socially isolated, has social network and/ or social participation 
1 |  Socially isolated, no social network and no social participation 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Social isolation    
**Variable name**:  soc_sp_isolation_3  
**Variable description**:  Indicator of whether the participant is socially isolated i.e. no/ low social network and no participation in an association (any type, including religious organization and volunteering).  
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Not socially isolated, has social network and/ or social participation 
1 |  Socially isolated, no social network and no social participation 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}



```
### **Variable label**:  Social isolation    
**Variable name**:  soc_sp_isolation_4  
**Variable description**:  Indicator of whether the participant is socially isolated i.e. no/ low social network and no participation in an association (any type, including religious organization and volunteering).  
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Not socially isolated, has social network and/ or social participation 
1 |  Socially isolated, no social network and no social participation 

**Harmonization status**:  complete   
**Harmonization comment**: 97% of respondents were categorized the same (as isolated or not isoldated) using either i) study available DataSchema social network variables (children, friends, neighbours, relatives) in addition to the general participation variable or ii) study available DataSchema social network - contact frequency variables (friends, neighbours, relatives, close relatives) in addition to the general participation variable. Approach ii) was chosen for the transformation of this DataSchema.       
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_4$soc_sp_isolation_4 <- ifelse((soc_GLOBE_4$soc_sn_freq_friends_inperson_4 ==3 | soc_GLOBE_4$soc_sn_freq_friends_4 ==3 | 
                                          soc_GLOBE_4$soc_sn_freq_nbhs_4 ==3 | soc_GLOBE_4$soc_sn_freq_close_relatives_4 ==3 |soc_GLOBE_4$soc_sn_freq_relatives_4==3 ) & 
                                           soc_GLOBE_4$soc_sp_general_4 == 0,1L,
                                 ifelse((soc_GLOBE_4$soc_sn_freq_friends_inperson_4 >=1 | soc_GLOBE_4$soc_sn_freq_friends_4 >= 1 | soc_GLOBE_4$soc_sn_freq_nbhs_4 >= 1 | 
                                          soc_GLOBE_4$soc_sn_freq_close_relatives_4 >= 1 | soc_GLOBE_4$soc_sn_freq_relatives_4 >= 1) & soc_GLOBE_4$soc_sp_general_4 == 1, 0L, NA ))

```
### **Variable label**:  Social isolation    
**Variable name**:  soc_sp_isolation_5  
**Variable description**:  Indicator of whether the participant is socially isolated i.e. no/ low social network and no participation in an association (any type, including religious organization and volunteering).  
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Not socially isolated, has social network and/ or social participation 
1 |  Socially isolated, no social network and no social participation 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Social isolation    
**Variable name**:  soc_sp_isolation_6  
**Variable description**:  Indicator of whether the participant is socially isolated i.e. no/ low social network and no participation in an association (any type, including religious organization and volunteering).  
**Value type**:  integer  
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Not socially isolated, has social network and/ or social participation 
1 |  Socially isolated, no social network and no social participation 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```

# Major life events subdomain

### **Variable label**:  Life event: victim     
**Variable name**:  soc_le_vic_0         
**Variable description**:   Indicator of whether the participant experienced being the victim of a crime (i.e. theft, assault) in the past few years.     
**Value type**:  integer    
**Variable unit**:      
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience being the victim of a crime
1 |  Did experience being the victim of a crime 

**Harmonization status**:  complete    
**Harmonization comment**:  Study specific variable asks about the past 12 months.  
**R script**:  
```{r, echo=TRUE}
soc_GLOBE_0$soc_le_vic_0 <- ifelse(GLOBE1991$v169 =='1',1L, 
                            ifelse(GLOBE1991$v169 =='2',0L, NA))

```
### **Variable label**:  Life event: victim     
**Variable name**:  soc_le_vic_1         
**Variable description**:   Indicator of whether the participant experienced being the victim of a crime (i.e. theft, assault) in the past few years.     
**Value type**:  integer    
**Variable unit**:      
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience being the victim of a crime
1 |  Did experience being the victim of a crime 

**Harmonization status**:  complete    
**Harmonization comment**:  Study specific variable asks about the past 12 months.    
**R script**:  
```{r, echo=TRUE}
#1 = yes 2= no -1=?

soc_GLOBE_1$soc_le_vic_1 <- ifelse(GLOBE1997$v11c =='1',1L, 
                            ifelse(GLOBE1997$v11c =='2',0L, NA))

```
### **Variable label**:  Life event: victim     
**Variable name**:  soc_le_vic_2         
**Variable description**:   Indicator of whether the participant experienced being the victim of a crime (i.e. theft, assault) in the past few years.     
**Value type**:  integer    
**Variable unit**:      
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience being the victim of a crime
1 |  Did experience being the victim of a crime 

**Harmonization status**:  complete    
**Harmonization comment**:  Study specific variable asks about the past 12 months.   
**R script**:  
```{r, echo=TRUE}
soc_GLOBE_2$soc_le_vic_2 <- ifelse(GLOBE2004$w266 =='1',1L, 
                            ifelse(GLOBE2004$w266 =='2',0L, NA))

```
### **Variable label**:  Life event: victim     
**Variable name**:  soc_le_vic_3         
**Variable description**:   Indicator of whether the participant experienced being the victim of a crime (i.e. theft, assault) in the past few years.     
**Value type**:  integer    
**Variable unit**:      
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience being the victim of a crime
1 |  Did experience being the victim of a crime 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Life event: victim     
**Variable name**:  soc_le_vic_4         
**Variable description**:   Indicator of whether the participant experienced being the victim of a crime (i.e. theft, assault) in the past few years.     
**Value type**:  integer    
**Variable unit**:    
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience being the victim of a crime
1 |  Did experience being the victim of a crime 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Life event: victim     
**Variable name**:  soc_le_vic_5         
**Variable description**:   Indicator of whether the participant experienced being the victim of a crime (i.e. theft, assault) in the past few years.     
**Value type**:  integer    
**Variable unit**:      
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience being the victim of a crime
1 |  Did experience being the victim of a crime 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Life event: victim     
**Variable name**:  soc_le_vic_6         
**Variable description**:   Indicator of whether the participant experienced being the victim of a crime (i.e. theft, assault) in the past few years.     
**Value type**:  integer    
**Variable unit**:     
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience being the victim of a crime
1 |  Did experience being the victim of a crime 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Life event: financial problems      
**Variable name**:  soc_le_fprob_0             
**Variable description**:  Indicator of whether the participant experienced financial problems in the past few years.        
**Value type**:  integer      
**Variable unit**:        
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience financial problems
1 |  Did experience financial problems  

**Harmonization status**:  complete    
**Harmonization comment**:  Study specific variable asks about the past 12 months. 
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_0$soc_le_fprob_0 <- ifelse(GLOBE1991$v168 =='1',1L, 
                            ifelse(GLOBE1991$v168 =='2',0L, NA))

```
### **Variable label**:  Life event: financial problems      
**Variable name**:  soc_le_fprob_1             
**Variable description**:  Indicator of whether the participant experienced financial problems in the past few years.        
**Value type**:  integer      
**Variable unit**:       
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience financial problems
1 |  Did experience financial problems    

**Harmonization status**:  complete    
**Harmonization comment**:  Study specific variable asks about the past 12 months.   
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_1$soc_le_fprob_1 <- ifelse(GLOBE1997$v11b =='1',1L, 
                            ifelse(GLOBE1997$v11b =='2',0L, NA))


```
### **Variable label**:  Life event: financial problems      
**Variable name**:  soc_le_fprob_2             
**Variable description**:  Indicator of whether the participant experienced financial problems in the past few years.        
**Value type**:  integer      
**Variable unit**:         
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience financial problems
1 |  Did experience financial problems   

**Harmonization status**:  complete    
**Harmonization comment**:  Study specific variable asks about the past 12 months.  
**R script**:  
```{r, echo=TRUE}
soc_GLOBE_2$soc_le_fprob_2 <- ifelse(GLOBE2004$w265 =='1',1L, 
                            ifelse(GLOBE2004$w265 =='2',0L, NA))

```
### **Variable label**:  Life event: financial problems      
**Variable name**:  soc_le_fprob_3             
**Variable description**:  Indicator of whether the participant experienced financial problems in the past few years.        
**Value type**:  integer      
**Variable unit**:        
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience financial problems
1 |  Did experience financial problems   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Life event: financial problems      
**Variable name**:  soc_le_fprob_4             
**Variable description**:  Indicator of whether the participant experienced financial problems in the past few years.        
**Value type**:  integer      
**Variable unit**:       
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience financial problems
1 |  Did experience financial problems   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Life event: financial problems      
**Variable name**:  soc_le_fprob_5             
**Variable description**:  Indicator of whether the participant experienced financial problems in the past few years.        
**Value type**:  integer      
**Variable unit**:        
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience financial problems
1 |  Did experience financial problems    

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Life event: financial problems      
**Variable name**:  soc_le_fprob_6             
**Variable description**:  Indicator of whether the participant experienced financial problems in the past few years.        
**Value type**:  integer      
**Variable unit**:       
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience financial problems
1 |  Did experience financial problems    

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```

### **Variable label**:  Life event: relationship problems        
**Variable name**:  soc_le_rprob_0             
**Variable description**:  Indicator of whether the participant experienced relationship problems in the past few years.          
**Value type**:  integer      
**Variable unit**:        
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience relationship problems
1 |  Did experience relationship problems

**Harmonization status**:  complete    
**Harmonization comment**:  Study specific variable asks about the past 12 months.  
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_0$soc_le_rprob_0 <- ifelse(GLOBE1991$v175 =='1',1L, 
                            ifelse(GLOBE1991$v175 =='2',0L, NA))

```
### **Variable label**:  Life event: relationship problems        
**Variable name**:  soc_le_rprob_1             
**Variable description**:  Indicator of whether the participant experienced relationship problems in the past few years.          
**Value type**:  integer      
**Variable unit**:        
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience relationship problems
1 |  Did experience relationship problems

**Harmonization status**:  complete    
**Harmonization comment**:  Study specific variable asks about the past 12 months.  
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_1$soc_le_rprob_1 <- ifelse(GLOBE1997$v11i =='1',1L, 
                            ifelse(GLOBE1997$v11i =='2',0L, NA))

```
### **Variable label**:  Life event: relationship problems        
**Variable name**:  soc_le_rprob_2             
**Variable description**:  Indicator of whether the participant experienced relationship problems in the past few years.          
**Value type**:  integer      
**Variable unit**:        
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience relationship problems
1 |  Did experience relationship problems  

**Harmonization status**:  complete    
**Harmonization comment**:  Study specific variable asks about the past 12 months.  
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_2$soc_le_rprob_2 <- ifelse(GLOBE2004$w272 =='1',1L, 
                            ifelse(GLOBE2004$w272 =='2',0L, NA))

```
### **Variable label**:  Life event: divorce/relationship breakup           
**Variable name**:  soc_le_divorce_0             
**Variable description**:  Indicator of the occurrence of divorce/relationship breakup in the past few years.         
**Value type**:  integer      
**Variable unit**:        
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not divorce/ have relationship breakup
1 |  Did divorce/ had relationship breakup  

**Harmonization status**:  complete    
**Harmonization comment**:  Study specific variable asks about the past 12 months.   
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_0$soc_le_divorce_0 <- ifelse(GLOBE1991$v175 =='1',1L, 
                            ifelse(GLOBE1991$v175 =='2',0L, NA))

```
### **Variable label**:  Life event: divorce/relationship breakup           
**Variable name**:  soc_le_divorce_1             
**Variable description**:  Indicator of the occurrence of divorce/relationship breakup in the past few years.         
**Value type**:  integer      
**Variable unit**:        
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not divorce/ have relationship breakup
1 |  Did divorce/ had relationship breakup  

**Harmonization status**:  complete    
**Harmonization comment**:  Study specific variable asks about the past 12 months.    
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_1$soc_le_divorce_1 <- ifelse(GLOBE1997$v11i =='1',1L, 
                            ifelse(GLOBE1997$v11i =='2',0L, NA))

```
### **Variable label**:  Life event: divorce/relationship breakup           
**Variable name**:  soc_le_divorce_2             
**Variable description**:  Indicator of the occurrence of divorce/relationship breakup in the past few years.         
**Value type**:  integer      
**Variable unit**:         
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not divorce/ have relationship breakup
1 |  Did divorce/ had relationship breakup  

**Harmonization status**:  complete    
**Harmonization comment**:  Study specific variable asks about the past 12 months.    
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_2$soc_le_divorce_2 <- ifelse(GLOBE2004$w272 =='1',1L, 
                            ifelse(GLOBE2004$w272 =='2',0L, NA))

```
### **Variable label**:  Life event: illness of family member             
**Variable name**:  soc_le_illfam_0                      
**Variable description**:  Indicator of whether the participant experienced the illness of family member (including partner) in the past few years.         
**Value type**:  integer      
**Variable unit**:        
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience illness of family member 
1 |  Did experience illness of family member 

**Harmonization status**:  complete    
**Harmonization comment**:  Study specific variable asks about the past 12 months. 
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_0$soc_le_illfam_0 <- ifelse(GLOBE1991$v172 =='1',1L, 
                            ifelse(GLOBE1991$v172 =='2',0L, NA))

```
### **Variable label**:  Life event: illness of family member             
**Variable name**:  soc_le_illfam_1                      
**Variable description**:  Indicator of whether the participant experienced the illness of family member (including partner) in the past few years.         
**Value type**:  integer      
**Variable unit**:        
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience illness of family member 
1 |  Did experience illness of family member 

**Harmonization status**:  complete    
**Harmonization comment**:  Study specific variable asks about the past 12 months.  
**R script**:  
```{r, echo=TRUE}
soc_GLOBE_1$soc_le_illfam_1 <- ifelse(GLOBE1997$v11f =='1',1L, 
                            ifelse(GLOBE1997$v11f =='2',0L, NA))

```
### **Variable label**:  Life event: illness of family member             
**Variable name**:  soc_le_illfam_2                      
**Variable description**:  Indicator of whether the participant experienced the illness of family member (including partner) in the past few years.         
**Value type**:  integer      
**Variable unit**:        
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience illness of family member 
1 |  Did experience illness of family member 

**Harmonization status**:  complete    
**Harmonization comment**:  Study specific variable asks about the past 12 months. 
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_2$soc_le_illfam_2 <- ifelse(GLOBE2004$w269 =='1',1L, 
                            ifelse(GLOBE2004$w269 =='2',0L, NA))

```
### **Variable label**:  Life event: illness of family member             
**Variable name**:  soc_le_illfam_3                      
**Variable description**:  Indicator of whether the participant experienced the illness of family member (including partner) in the past few years.         
**Value type**:  integer      
**Variable unit**:        
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience illness of family member 
1 |  Did experience illness of family member 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Life event: illness of family member             
**Variable name**:  soc_le_illfam_4                      
**Variable description**:  Indicator of whether the participant experienced the illness of family member (including partner) in the past few years.         
**Value type**:  integer      
**Variable unit**:        
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience illness of family member 
1 |  Did experience illness of family member 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Life event: illness of family member             
**Variable name**:  soc_le_illfam_5                      
**Variable description**:  Indicator of whether the participant experienced the illness of family member (including partner) in the past few years.         
**Value type**:  integer      
**Variable unit**:        
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience illness of family member 
1 |  Did experience illness of family member 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Life event: illness of family member             
**Variable name**:  soc_le_illfam_6                      
**Variable description**:  Indicator of whether the participant experienced the illness of family member (including partner) in the past few years.         
**Value type**:  integer      
**Variable unit**:        
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience illness of family member 
1 |  Did experience illness of family member 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Life event: death of partner             
**Variable name**:  soc_le_dpart_0                                           
**Variable description**:  Indicator of whether the participant experienced the death of partner/spouse in the past few years.      
**Value type**:  integer      
**Variable unit**:        
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience death of partner/spouse
1 |  Did experience death of partner/spouse 

**Harmonization status**:  complete    
**Harmonization comment**:  Study specific variable asks about the past 12 months.   
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_0$soc_le_dpart_0 <- ifelse(GLOBE1991$v173 =='1',1L, 
                            ifelse(GLOBE1991$v173 =='2',0L, NA))

```
### **Variable label**:  Life event: death of partner             
**Variable name**:  soc_le_dpart_1                                           
**Variable description**:  Indicator of whether the participant experienced the death of partner/spouse in the past few years.         
**Value type**:  integer      
**Variable unit**:        
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience death of partner/spouse
1 |  Did experience death of partner/spouse 

**Harmonization status**:  complete    
**Harmonization comment**:  Study specific variable asks about the past 12 months.    
**R script**:  
```{r, echo=TRUE}
soc_GLOBE_1$soc_le_dpart_1 <- ifelse(GLOBE1997$v11g =='1',1L, 
                            ifelse(GLOBE1997$v11g =='2',0L, NA))

```
### **Variable label**:  Life event: death of partner             
**Variable name**:  soc_le_dpart_2                                           
**Variable description**:  Indicator of whether the participant experienced the death of partner/spouse in the past few years.         
**Value type**:  integer      
**Variable unit**:        
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience death of partner/spouse
1 |  Did experience death of partner/spouse 

**Harmonization status**:  complete    
**Harmonization comment**:  Study specific variable asks about the past 12 months.    
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_2$soc_le_dpart_2 <- ifelse(GLOBE2004$w270 =='1',1L, 
                            ifelse(GLOBE2004$w270 =='2',0L, NA))

```
### **Variable label**:  Life event: death of family member or friend                
**Variable name**:  soc_le_dfam_0                                           
**Variable description**:  Indicator of whether the participant experienced the death of a child/family member/friend in the past few years.           
**Value type**:  integer      
**Variable unit**:        
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience death of child/family member/friend 
1 |  Did experience death of child/family member/friend  

**Harmonization status**:  complete    
**Harmonization comment**:  Study specific variable asks about the past 12 months.     
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_0$soc_le_dfam_0 <- ifelse(GLOBE1991$v174 =='1',1L, 
                            ifelse(GLOBE1991$v174 =='2',0L, NA))

```
### **Variable label**:  Life event: death of family member or friend                
**Variable name**:  soc_le_dfam_1                                           
**Variable description**:  Indicator of whether the participant experienced the death of a child/family member/friend in the past few years.           
**Value type**:  integer      
**Variable unit**:        
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience death of child/family member/friend  
1 |  Did experience death of child/family member/friend   

**Harmonization status**:  complete    
**Harmonization comment**:  Study specific variable asks about the past 12 months.    
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_1$soc_le_dfam_1 <- ifelse(GLOBE1997$v11h =='1',1L, 
                            ifelse(GLOBE1997$v11h =='2',0L, NA))

```
### **Variable label**:  Life event: death of family member or friend                
**Variable name**:  soc_le_dfam_2                                           
**Variable description**:  Indicator of whether the participant experienced the death of a child/family member/friend in the past few years.           
**Value type**:  integer      
**Variable unit**:        
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Did not experience death of child/family member/friend  
1 |  Did experience death of child/family member/friend  

**Harmonization status**:  complete    
**Harmonization comment**:  Study specific variable asks about the past 12 months.     
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_2$soc_le_dfam_2 <- ifelse(GLOBE2004$w271 =='1',1L, 
                            ifelse(GLOBE2004$w271 =='2',0L, NA))

```
# Residential characteristics subdomain

### **Variable label**:  Residential stability in neighbourhood (individual - level)  
**Variable name**:  soc_res_num_yrsnbh_0        
**Variable description**:  Number of years that the participant has lived in the neighbourhood.  
**Value type**:  integer  
**Variable unit**:  years   
**Category coding**:  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Residential stability in neighbourhood (individual - level)  
**Variable name**:  soc_res_num_yrsnbh_1          
**Variable description**:  Number of years that the participant has lived in the neighbourhood.  
**Value type**:  integer  
**Variable unit**:  years   
**Category coding**:  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Residential stability in neighbourhood (individual - level)  
**Variable name**:  soc_res_num_yrsnbh_2          
**Variable description**:  Number of years that the participant has lived in the neighbourhood.  
**Value type**:  integer  
**Variable unit**: years    
**Category coding**:  

**Harmonization status**:  complete   
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_2$soc_res_num_yrsnbh_2 <- GLOBE2004$w072a

```
### **Variable label**:  Residential stability in neighbourhood (individual - level)  
**Variable name**:  soc_res_num_yrsnbh_3          
**Variable description**:  Number of years that the participant has lived in the neighbourhood.  
**Value type**:  integer  
**Variable unit**:  years   
**Category coding**:  

**Harmonization status**:  complete    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_3$soc_res_num_yrsnbh_3 <-GLOBE2011$v49_buurt_wndr 

```
### **Variable label**:  Residential stability in neighbourhood (individual - level)  
**Variable name**:  soc_res_num_yrsnbh_4          
**Variable description**:  Number of years that participant has lived in the neighbourhood.  
**Value type**:  integer  
**Variable unit**:  years   
**Category coding**:  

**Harmonization status**:  complete   
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}
soc_GLOBE_4$soc_res_num_yrsnbh_4 <-GLOBE2014$G14v87 

```
### **Variable label**:  Residential stability in neighbourhood (individual - level)  
**Variable name**:  soc_res_num_yrsnbh_5          
**Variable description**:  Number of years that participant has lived in the neighbourhood.  
**Value type**:  integer  
**Variable unit**:  years   
**Category coding**:  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Residential stability in neighbourhood (individual - level)  
**Variable name**:  soc_res_num_yrsnbh_6          
**Variable description**:  Number of years that participant has lived in the neighbourhood.  
**Value type**:  integer  
**Variable unit**: years    
**Category coding**:  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Residential stability in home (individual - level)
**Variable name**:  soc_res_num_yrshome_0          
**Variable description**:  Number of years that participant has lived in current home/address.    
**Value type**:  integer  
**Variable unit**: years    
**Category coding**:   

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Residential stability in home (individual - level)
**Variable name**:  soc_res_num_yrshome_1          
**Variable description**:  Number of years that participant has lived in current home/address.    
**Value type**:  integer  
**Variable unit**:  years   
**Category coding**:    

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Residential stability in home (individual - level)
**Variable name**:  soc_res_num_yrshome_2          
**Variable description**:  Number of years that participant has lived in current home/address.    
**Value type**:  integer  
**Variable unit**:  years   
**Category coding**:  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Residential stability in home (individual - level)
**Variable name**:  soc_res_num_yrshome_3          
**Variable description**:  Number of years that participant has lived in current home/address.    
**Value type**:  integer  
**Variable unit**: years    
**Category coding**:  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Residential stability in home (individual - level)
**Variable name**:  soc_res_num_yrshome_4          
**Variable description**:  Number of years that participant has lived in current home/address.    
**Value type**:  integer  
**Variable unit**: years    
**Category coding**:  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Residential stability in home (individual - level)
**Variable name**:  soc_res_num_yrshome_5          
**Variable description**:  Number of years that participant has lived in current home/address.    
**Value type**:  integer  
**Variable unit**: years    
**Category coding**:  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Residential stability in home (individual - level)
**Variable name**:  soc_res_num_yrshome_6          
**Variable description**: Number of years that participant has lived in current home/address.    
**Value type**:  integer  
**Variable unit**:  years   
**Category coding**:  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Neighbourhood satisfaction   
**Variable name**:  soc_res_satis_0             
**Variable description**:  Indicator of whether the participant desires to move away from their current neighbourhood.      
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not want to move out of neighbourhood
1 |  Does want to move out of neighbourhood

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Neighbourhood satisfaction   
**Variable name**:  soc_res_satis_1             
**Variable description**:  Indicator of whether the participant desires to move away from their current neighbourhood.      
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not want to move out of neighbourhood
1 |  Does want to move out of neighbourhood

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Neighbourhood satisfaction   
**Variable name**:  soc_res_satis_2             
**Variable description**:  Indicator of whether the participant desires to move away from their current neighbourhood.      
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not want to move out of neighbourhood
1 |  Does want to move out of neighbourhood

**Harmonization status**:  complete    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_2$soc_res_satis_2 <- ifelse(GLOBE2004$w051 == 1 | GLOBE2004$w051 == 2 | GLOBE2004$w051 == 3 , 1L,     
                                ifelse(GLOBE2004$w051 == 4 | GLOBE2004$w051 == 5, 0L, NA))
                                               
```
### **Variable label**:  Neighbourhood satisfaction   
**Variable name**:  soc_res_satis_3             
**Variable description**:  Indicator of whether the participant desires to move away from their current neighbourhood.      
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not want to move out of neighbourhood
1 |  Does want to move out of neighbourhood

**Harmonization status**:  complete    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_3$soc_res_satis_3 <- ifelse(GLOBE2011$v53_b_buur2 == 1 | GLOBE2011$v53_b_buur2 == 2, 0L,     
                                ifelse(GLOBE2011$v53_b_buur2 == 3 | GLOBE2011$v53_b_buur2 == 4 | GLOBE2011$v53_b_buur2 == 5, 1L, NA))
                                               
```
### **Variable label**:  Neighbourhood satisfaction   
**Variable name**:  soc_res_satis_4             
**Variable description**:  Indicator of whether the participant desires to move away from their current neighbourhood.      
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not want to move out of neighbourhood
1 |  Does want to move out of neighbourhood

**Harmonization status**:  complete    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_4$soc_res_satis_4 <- ifelse(GLOBE2014$G14v90_g == 4 | GLOBE2014$G14v90_g == 5, 0L,     
                                ifelse(GLOBE2014$G14v90_g == 1 | GLOBE2014$G14v90_g == 2 | GLOBE2014$G14v90_g == 3, 1L, NA))
                                               
```
### **Variable label**:  Neighbourhood satisfaction   
**Variable name**:  soc_res_satis_5             
**Variable description**:  Indicator of whether the participant desires to move away from their current neighbourhood.      
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not want to move out of neighbourhood
1 |  Does want to move out of neighbourhood

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Residential mobility (individual - level)     
**Variable name**:  soc_res_move_0                
**Variable description**:  Indicator of whether the participant moved from their current neighbourhood since last interview.       
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Has not moved since last interview
1 |  Has moved since last interview

**Harmonization status**:  complete   
**Harmonization comment**:   GLOBE asks if participant has moved in the past 12 months.   
**R script**:  
```{r, echo=TRUE}
#1 yes 2 = no 9=?
soc_GLOBE_0$soc_res_move_0 <- ifelse(GLOBE1991$v167=='1',1L, 
                                             ifelse(GLOBE1991$v335=='2',0L, NA))
```
### **Variable label**:  Residential mobility (individual - level)     
**Variable name**:  soc_res_move_1                
**Variable description**:  Indicator of whether the participant moved from their current neighbourhood since last interview.          
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Has not moved since last interview
1 |  Has moved since last interview

**Harmonization status**:  complete    
**Harmonization comment**:  GLOBE asks if participant has moved in the past 12 months.  
**R script**:  
```{r, echo=TRUE}
soc_GLOBE_1$soc_res_move_1 <- ifelse(GLOBE1997$v11a=='1',1L, 
                                             ifelse(GLOBE1997$v11a=='2',0L, NA))
```
### **Variable label**:  Residential mobility (individual - level)     
**Variable name**:  soc_res_move_2                
**Variable description**:  Indicator of whether the participant moved from their current neighbourhood since last interview.          
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Has not moved since last interview
1 |  Has moved since last interview

**Harmonization status**:  complete    
**Harmonization comment**:   GLOBE asks if participant has moved in the past 12 months. 
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_2$soc_res_move_2 <- ifelse(GLOBE2004$w264=='1',1L, 
                                             ifelse(GLOBE2004$w264=='2',0L, NA))
```
### **Variable label**:  Residential mobility (individual - level)     
**Variable name**:  soc_res_move_3                
**Variable description**:  Indicator of whether the participant moved from their current neighbourhood since last interview.          
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Has not moved since last interview
1 |  Has moved since last interview

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Residential mobility (individual - level)     
**Variable name**:  soc_res_move_4                
**Variable description**:  Indicator of whether the participant moved from their current neighbourhood since last interview.          
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Has not moved since last interview
1 |  Has moved since last interview

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Residential mobility (individual - level)     
**Variable name**:  soc_res_move_5                
**Variable description**:  Indicator of whether the participant moved from their current neighbourhood since last interview.          
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Has not moved since last interview
1 |  Has moved since last interview

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Residential mobility (individual - level)     
**Variable name**:  soc_res_move_6                  
**Variable description**:  Indicator of whether the participant moved from their current neighbourhood since last interview.          
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Has not moved since last interview
1 |  Has moved since last interview

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Residence independence     
**Variable name**:  soc_res_indep_0                  
**Variable description**:  Indicator of whether the participant lives independently or in a nursing/ retirement home.        
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Lives independently  
1 |  Lives in a nursing/ retirement home

**Harmonization status**:  complete   
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}
soc_GLOBE_0$soc_res_indep_0 <- ifelse(GLOBE1991$v155=='1'|GLOBE1991$v155=='2'|GLOBE1991$v155=='4'|GLOBE1991$v155=='5'|GLOBE1991$v155=='6'|GLOBE1991$v155=='7',0L, 
                                             ifelse(GLOBE1991$v155=='3',1L, NA))


```
### **Variable label**:  Residence independence     
**Variable name**:  soc_res_indep_1                  
**Variable description**:  Indicator of whether the participant lives independently or in a nursing/ retirement home.        
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Lives independently  
1 |  Lives in a nursing/ retirement home

**Harmonization status**: impossible     
**Harmonization comment**:    
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Residence independence     
**Variable name**:  soc_res_indep_2                  
**Variable description**:  Indicator of whether the participant lives independently or in a nursing/ retirement home.        
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Lives independently  
1 |  Lives in a nursing/ retirement home

**Harmonization status**:  complete    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}
soc_GLOBE_2$soc_res_indep_2 <-ifelse(GLOBE2004$w040a=='1'|GLOBE2004$w040a=='2'|GLOBE2004$w040a=='4'|GLOBE2004$w040a=='5'|GLOBE2004$w040a=='6',0L, 
                                             ifelse(GLOBE2004$w040a=='3',1L, NA))
```
### **Variable label**:  Residence independence     
**Variable name**:  soc_res_indep_3                  
**Variable description**:  Indicator of whether the participant lives independently or in a nursing/ retirement home.        
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Lives independently  
1 |  Lives in a nursing/ retirement home

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Residence independence     
**Variable name**:  soc_res_indep_4                  
**Variable description**:  Indicator of whether the participant lives independently or in a nursing/ retirement home.        
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Lives independently  
1 |  Lives in a nursing/ retirement home

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Residence independence     
**Variable name**:  soc_res_indep_5                  
**Variable description**:  Indicator of whether the participant lives independently or in a nursing/ retirement home.        
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Lives independently  
1 |  Lives in a nursing/ retirement home

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Residence independence     
**Variable name**:  soc_res_indep_6                  
**Variable description**:  Indicator of whether the participant lives independently or in a nursing/ retirement home.        
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Lives independently  
1 |  Lives in a nursing/ retirement home

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Residence type     
**Variable name**:  soc_res_type_0                    
**Variable description**:  Indicator of type of home in which participant lives.           
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
1 |  Lives in a flat/ apartment   
2 |  Lives in a single-family house (terraced house/ townhouse, semi-detached, detached)  
3 |  Lives in a nursing home, retirement home, home for the elderly
4 |  Lives on a farm
5 |  Other

**Harmonization status**:  complete    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}
soc_GLOBE_0$soc_res_type_0 <- ifelse(GLOBE1991$v155=='1',2L, 
                                     ifelse(GLOBE1991$v155=='2',1L, 
                                          ifelse(GLOBE1991$v155=='3',3L, 
                                               ifelse(GLOBE1991$v155=='4'|GLOBE1991$v155=='6',5L,
                                                    ifelse(GLOBE1991$v155=='5',4L, NA)))))

```
### **Variable label**:  Residence type     
**Variable name**:  soc_res_type_1                    
**Variable description**:  Indicator of type of home in which participant lives.           
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
1 |  Lives in a flat/ apartment   
2 |  Lives in a single-family house (terraced house/ townhouse, semi-detached, detached)  
3 |  Lives in a nursing home, retirement home, home for the elderly
4 |  Lives on a farm
5 |  Other

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Residence type     
**Variable name**:  soc_res_type_2                    
**Variable description**:  Indicator of type of home in which participant lives.           
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
1 |  Lives in a flat/ apartment   
2 |  Lives in a single-family house (terraced house/ townhouse, semi-detached, detached)  
3 |  Lives in a nursing home, retirement home, home for the elderly
4 |  Lives on a farm
5 |  Other

**Harmonization status**:  complete    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}
soc_GLOBE_2$soc_res_type_2 <- ifelse(GLOBE2004$w040a=='1',2L, 
                                     ifelse(GLOBE2004$w040a=='2',1L, 
                                          ifelse(GLOBE2004$w040a=='3',3L, 
                                               ifelse(GLOBE2004$w040a=='4'|GLOBE2004$w040a=='6',5L,
                                                    ifelse(GLOBE2004$w040a=='5',4L, NA)))))
```
### **Variable label**:  Residence type     
**Variable name**:  soc_res_type_3                    
**Variable description**:  Indicator of type of home in which participant lives.           
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
1 |  Lives in a flat/ apartment   
2 |  Lives in a single-family house (terraced house/ townhouse, semi-detached, detached)  
3 |  Lives in a nursing home, retirement home, home for the elderly
4 |  Lives on a farm
5 |  Other

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Residence type     
**Variable name**:  soc_res_type_4                    
**Variable description**:  Indicator of type of home in which participant lives.           
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
1 |  Lives in a flat/ apartment   
2 |  Lives in a single-family house (terraced house/ townhouse, semi-detached, detached)  
3 |  Lives in a nursing home, retirement home, home for the elderly
4 |  Lives on a farm
5 |  Other

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Residence type     
**Variable name**:  soc_res_type_5                    
**Variable description**:  Indicator of type of home in which participant lives.           
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
1 |  Lives in a flat/ apartment   
2 |  Lives in a single-family house (terraced house/ townhouse, semi-detached, detached)  
3 |  Lives in a nursing home, retirement home, home for the elderly
4 |  Lives on a farm
5 |  Other

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Residence type     
**Variable name**:  soc_res_type_6                    
**Variable description**:  Indicator of type of home in which participant lives.           
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
1 |  Lives in a flat/ apartment   
2 |  Lives in a single-family house (terraced house/ townhouse, semi-detached, detached)  
3 |  Lives in a nursing home, retirement home, home for the elderly
4 |  Lives on a farm
5 |  Other

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Home ownership (2-level)      
**Variable name**:  soc_res_home_own_dich_0                     
**Variable description**:  Indicator of whether the participant owns home or not (i.e. pays rent or mortgage).          
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not own home
1 |  Does own home  

**Harmonization status**:  complete    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}
soc_GLOBE_0$soc_res_home_own_dich_0 <- ifelse(GLOBE1991$v156=='1',1L, 
                                     ifelse(GLOBE1991$v156=='2',0L, NA))

```
### **Variable label**:  Home ownership (2-level)      
**Variable name**:  soc_res_home_own_dich_1                     
**Variable description**:  Indicator of whether the participant owns home or not (i.e. pays rent or mortgage).          
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not own home
1 |  Does own home  

**Harmonization status**:  complete    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}
soc_GLOBE_1$soc_res_home_own_dich_1 <- ifelse(GLOBE1997$g29a=='1',1L, 
                                             ifelse(GLOBE1997$g29a=='2',0L, NA))
```
### **Variable label**:  Home ownership (2-level)      
**Variable name**:  soc_res_home_own_dich_2                     
**Variable description**:  Indicator of whether the participant owns home or not (i.e. pays rent or mortgage).          
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not own home
1 |  Does own home  

**Harmonization status**:  complete    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}
soc_GLOBE_2$soc_res_home_own_dich_2 <- ifelse(GLOBE2004$w041=='1',1L, 
                                             ifelse(GLOBE2004$w041=='2',0L, NA))
```
### **Variable label**:  Home ownership (2-level)      
**Variable name**:  soc_res_home_own_dich_3                     
**Variable description**:  Indicator of whether the participant owns home or not (i.e. pays rent or mortgage).          
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not own home
1 |  Does own home  

**Harmonization status**:  complete    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}

soc_GLOBE_3$soc_res_home_own_dich_3 <- ifelse(GLOBE2011$v50_huis_bez =='1',1L, 
                                                  ifelse(GLOBE2011$v50_huis_bez =='2',0L, NA))

```
### **Variable label**:  Home ownership (2-level)      
**Variable name**:  soc_res_home_own_dich_4                     
**Variable description**:  Indicator of whether the participant owns home or not (i.e. pays rent or mortgage).          
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not own home
1 |  Does own home  

**Harmonization status**:  complete    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}
soc_GLOBE_4$soc_res_home_own_dich_4 <- ifelse(GLOBE2014$G14v88=='1',1L, 
                                             ifelse(GLOBE2014$G14v88=='2'|GLOBE2014$G14v88=='3',0L,NA))
```
### **Variable label**:  Home ownership (2-level)      
**Variable name**:  soc_res_home_own_dich_5                     
**Variable description**:  Indicator of whether the participant owns home or not (i.e. pays rent or mortgage).          
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not own home
1 |  Does own home  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Home ownership (2-level)      
**Variable name**:  soc_res_home_own_dich_6                     
**Variable description**:  Indicator of whether the participant owns home or not (i.e. pays rent or mortgage).          
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
0 |  Does not own home
1 |  Does own home  

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Home ownership (3-level)      
**Variable name**:  soc_res_home_own_0                        
**Variable description**:  Indicator of whether the participant owns home, pays mortgage or rents.             
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
1 |  Owns home
2 |  Pays mortgage 
3 |  Rents home 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Home ownership (3-level)      
**Variable name**:  soc_res_home_own_1                        
**Variable description**:  Indicator of whether the participant owns home, pays mortgage or rents.             
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
1 |  Owns home
2 |  Pays mortgage 
3 |  Rents home 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```
### **Variable label**:  Home ownership (3-level)      
**Variable name**:  soc_res_home_own_2                        
**Variable description**:  Indicator of whether the participant owns home, pays mortgage or rents.             
**Value type**:  integer  
**Variable unit**:   
**Category coding**:  

**Code** | **Category Label**  
------------- | -------------  
1 |  Owns home
2 |  Pays mortgage 
3 |  Rents home 

**Harmonization status**:  impossible    
**Harmonization comment**:   
**R script**:  
```{r, echo=TRUE}


```