(1/36)+(1/36)+(1/36)+(1/36)
## [1] 0.1111111
1/36
## [1] 0.02777778
# 2.8 b
#install.packages('VennDiagram')
library(VennDiagram)
## Loading required package: grid
## Loading required package: futile.logger
grid.newpage()
draw.pairwise.venn(area1 = 14.6, cross.area = 4.2, area2 = 20.7,
category = c("Below the Poverty Line", "Language Other Than English"),
lty = rep("blank", 2),
fill = c("aquamarine", "yellow"),
alpha = rep(0.25, 2),
cat.pos = c(0, 0),
cat.dist = rep(0.025, 2))
## (polygon[GRID.polygon.1], polygon[GRID.polygon.2], polygon[GRID.polygon.3], polygon[GRID.polygon.4], text[GRID.text.5], text[GRID.text.6], text[GRID.text.7], text[GRID.text.8], text[GRID.text.9])
14.6-4.2
## [1] 10.4
20.7-4.2
## [1] 16.5
10.4-4.2
## [1] 6.2
78/204
## [1] 0.3823529
(78/114) * (78/108)
## [1] 0.494152
19/54
## [1] 0.3518519
11/36
## [1] 0.3055556
(28/95) * (59/94)
## [1] 0.1849944
(72/95) * (28/94)
## [1] 0.2257559
58% males, 41% females
a) This distribution is positive/right skewed. The median exists somewhere in the 35,000-49,000 range.
b) 21.2 + 18.3 + 15.8 + 4.7 + 2.2 = 62.2
c) 0.622 * 0.41 = 0.25502
We assume that income and gender are independent.
d) The statement that 71.8% of females make less than 50,000 per year invalidates the assumption we made in part c. Income and gender are dependent.