Chi-Square Analyses for IPV Status and Demographic Characteristics

IPV Status and Race

(tbl1 = table(IPVandCognitionDataSet2$Race, IPVandCognitionDataSet2$IPVstatus))

##        
##          0  1
##   White 30 16
##   AfrAm 54 26

chisq.test(tbl1)

## 
##  Pearson's Chi-squared test with Yates' continuity correction
## 
## data:  tbl1
## X-squared = 0.0043, df = 1, p-value = 0.9478

IPV Status and Sex

(tbl2 = table(IPVandCognitionDataSet2$Sex, IPVandCognitionDataSet2$IPVstatus))

##        
##          0  1
##   Women 36 24
##   Men   48 18

chisq.test(tbl2)

## 
##  Pearson's Chi-squared test with Yates' continuity correction
## 
## data:  tbl2
## X-squared = 1.754, df = 1, p-value = 0.1854

IPV Status and Age at Baseline

(tbl3 = table(IPVandCognitionDataSet2$ageBL, IPVandCognitionDataSet2$IPVstatus))

##           
##             0  1
##   30 to 39 36 20
##   40 to 49 38 16
##   50 +     10  6

chisq.test(tbl3)

## 
##  Pearson's Chi-squared test
## 
## data:  tbl3
## X-squared = 0.6012, df = 2, p-value = 0.7404