Section 2.1

9

  1. 69% of respondents believe that divorce is morally acceptable.

  2. 55,200,000 believe divorce is morally wrong.

  3. The statement is inferential because it is a “claim” based on the results of the survey.

11

  1. The proportion for more likely to buy when made in America for 18-34 year olds is 0.42 and the proportion for 35-44 year olds is 0.61.

  2. 55+

  3. 18-34

  4. As age increases, people are more likely to buy products that are made in America.

13

datt <- c(125, 324, 552, 1257, 2518)

rel.freqq <- datt/sum(datt)

categoriess <- c("Never", "Rarely", "Sometimes", "Most of time", "Always")


answerr <- data.frame(categoriess,rel.freqq)

answerr
##    categoriess  rel.freqq
## 1        Never 0.02617253
## 2       Rarely 0.06783920
## 3    Sometimes 0.11557789
## 4 Most of time 0.26319095
## 5       Always 0.52721943

  1. 52.72% answered always.

  2. 9.40% answered never or rarely.

barplot(datt,main="Seat Belt Usage",names=categoriess, col =c("red","blue","green","yellow","orange"))

barplot(rel.freqq,main="Seat Belt Usage",names=categoriess, col =c("red","blue","green","yellow","orange"))

pie(datt,main="Seat Belt Usage",labels=categoriess, col =c("red","blue","green","yellow","orange"))

  1. The statement is inferential because it refers to a sample of the entire population.

15

dat <- c(377,192,132,81,243)

rel.freq <- dat/sum(dat)

categories <- c("More 1", "Up to 1", "Few a week", "Few a month", "Never")


answer <- data.frame(categories,rel.freq)

answer
##    categories   rel.freq
## 1      More 1 0.36780488
## 2     Up to 1 0.18731707
## 3  Few a week 0.12878049
## 4 Few a month 0.07902439
## 5       Never 0.23707317

  1. 24% never used the internet.

barplot(dat,main="Internet Usage",names=categories, col =c("red","blue","green","yellow","orange"))

barplot(rel.freq,main="Internet Usage(Relative Freq)",names=categories, col =c("red","blue","green","yellow","orange"))

pie(dat,main="Internet Usage",labels=categories, col =c("red","blue","green","yellow","orange"))

Section 2.2

9

  1. Value rolled with the highest frequency is 8.

  2. Value rolled with the lowest frequency is 2.

  3. 15 times.

  4. 4 more 5’s were observed than 4’s.

  5. 15%

  6. bell shaped

10

  1. The most frequent number of cars sold in a week is 4.

  2. 9 weeks

  3. 17% of the time, two cars were sold.

  4. Right skewed.

11

  1. 200 students

  2. Class width is 10.

  3. 60-69 = 2 70-79 = 3 80-89 = 13 90-99 = 42 100-109 = 58 110-119 = 40 120-129 = 31 130-139 = 8 140-149 = 2 150-159 = 1

  4. 100-109

  5. 150-159

  6. 5.5% of students

  7. No one had an IQ above 159.

12

  1. Class width is 200.

  2. 0-199 200-399 400-599 600-799 800-999 1000-1199 1200-1399

  3. 0-199 has the highest frequency.

  4. Right skewed

  5. The survey does not relate to the roads in the states, rather it refers to drunk driving Therefore, a fair comparison would be to say that there is a greater frequency of drunk driving in Texas than in Vermont.

13

  1. Right skewed because more people’s incomes will graph to the left (the lower side of incomes).

  2. Bell shaped because the average will fall in the middle with lower and higher scores on both ends.

  3. Skewed right because more people will have about 1-5 people in their household rather than a large amount.

  4. Left skewed because more Alzheimer’s patients will be older.

14

  1. Left skewed because the average person will consume fewer drinks per week.

  2. Uniform because each grade has a similar amount of people in it all at the same age.

  3. Left skewed because older patients will be more inclined to have a hearing aid.

  4. Right skewed because more men are likey to be shorter or closer to the average height then they are to be extremely tall.

15

dattt <- c(16, 18, 12, 3, 1)

rel.freqqq <- dattt/sum(dattt)

categoriesss <- c("Zero", "One", "Two", "Three", "Four")

answerrr <- data.frame(categoriesss,rel.freqqq)

answerrr
##   categoriesss rel.freqqq
## 1         Zero       0.32
## 2          One       0.36
## 3          Two       0.24
## 4        Three       0.06
## 5         Four       0.02

  1. 24% has two children under the age of 5.

  2. 60% has one or two children under the age of 5.