Weights of adult females

House prices

Salaries of a random sample of people from North Carolina

Birthdays of classmates (day of the month)

2Var(X) − 3Var(Y )

4Var(X) + 12Cov(X, Y ) + 9Var(Y )

4Var(X) − 12Cov(X, Y ) + 9Var(Y )

2Var(X) + 6Cov(X, Y ) + 3Var(Y )

0.74

-0.92

0.39

-0.69

0.74

-0.92

0.39

-0.69

Strong linear relationship (r = - 0.88)

Weak linear relationship (r = - 0.88)

Moderate linear relationship ( r = 0.12)

No linear relationship (r = 0)

Neither independent nor mutually exclusive

Independent

Mutually exclusive

df.choc %>% with(table(co_location, eval)) %>% kable(align=rep('c',6))

df.choc %>% with(table(co_location, eval)) kable(align=rep('c',6))

df.choc %>% with(table(co_location, eval)) %>% kable()

df.choc count(co_location, eval) %>% kable(align=rep('c',6))

df.choc %>% count(co_location, eval) %>% kable()