Module 9. Assignment:

R_Code:

Question A:

df <- data.frame(
  country = c("France", "Spain", "Germany", "Spain", "Germany", "France", "Spain", "France", "Germany", "France"),
  age = c(44, 27, 30, 38, 40, 35, 52, 48, 45, 37),
  salary = c(6000, 5000, 7000, 4000, 8000, 6000, 5000, 7000, 4000, 8000),
  purchased = c("No", "Yes", "No", "No", "Yes", "Yes", "No", "Yes", "No", "Yes")
)

A1: Generate a one-way table for "purchased"

A2: Generate a two-way table for "country" and "purchased."

Question B:

data(mtcars)
mtcars_df <- table(mtcars$gear, mtcars$cyl, dnn = c("Gears", "Cylinders"))
B1: Add the addmargins() function to report on the sum totals of the rows and columns of "mtcars_df" table

B2: Add prop.tables() function, and report on the proportional weight of each value in the "mtcars_df" table


 

 

Comments

Post a Comment

Popular posts from this blog

  Module 3 Assignment Question A The following are two sets of data - each consist of 7 observations (n=7). Set#1:  10, 2, 3, 2, 4, 2, 5 Set#2:  20, 12, 13, 12, 14, 12, 15 A1 . For each set, compute the mean, medium, and mode under Central Tendency A2 . For each set, compute the range, interquartile, variance, and standard deviation under Variation A3 . Compare your results between set#1 vs. set #2 by discussing the differences between the two sets. A1: Central Tendency Set 1: Mean:4 Median: 3 Mode: 2     Set 2: Mean: 14 Median: 13 Mode: 12  A2: Variation Set 1: Range: 8 Quartiles  Q1: 2 Q3: 5  Interquartile Range: 3 Variance: 8.67 Standard Deviation: 2.94 Set 2: Range: 8 Quartiles Q1: 12 Q3: 15  Interquartile Range: 3 Variance: 8.67 Standard Deviation: 2.94 A3: Comparison By analyzing and comparing both datasets, I noticed that they both have the same spread. This is conveyed by the fact that they have the same values for the range, i...
Read more
Image
  Module 5. Assignment: Some things to note before starting this assignment: Question A: A1:  State the null and alternative hypothesis _______ Given that: H0 = 70 σ = 3.5 n = 49 x̄ = 69.1 H0  = 70 H1 =/ 70 A2:   Is there evidence that the machine is not meeting the manufacturer's specifications for average strength? Use a 0.05 level of significance _______  I believe there isn't evidence regarding the machine not meeting the manufacturer's requirements, we have the values to compute this. To test this, we need to use the formula first: z = ( x̄-H0)/(σ/(sqrt(n)))  -> (69.1-70)/(3.5/(sqrt(49))) = -1.8 Now, we need to use this formula: Two-tailed p-value = p = 2 * pnorm(z) A3:  Compute the p value and interpret its meaning _______     As we can see, our p-value is 0.071861 = 0.072. This means that p > alpha (0.072 > 0.05). Therefore, We fail to reject the null hypothesis, meaning there isn't enough evidence that the machin...
Read more
Image
  Module 4. Assignment: Question A:         A1: What is the probability of event A? P_Total = 10 + 20 + 20 + 40 = 90 P(A) = (10 + 20)/90 = 30/90 = 3/9 = 1/3 = 0.333333...  A2: What is the probability of event B? P(B) = (10   + 20)/90 = 30/90 = 3/9 = 1/3 = 0.333333... A3: What is the probability of event A or B? P(A   ∩     B) = 10/90 = 1/9 = 0.1111 P(A  ∪ B ) = P(A) + P(B) - P(A  ∩  B) = 1/3 + 1/3 - 1/9 = 5/9 = 0.5556 A4: What is the probability of   P(A or B) = P(A) + P(B)? P(A or B) = P(A   ∪ B) P(A   ∪ B) = P(A) + P(B) only if they're mutually exclusive. However, since they are not mutually exclusive, that means they overlap. Therefore, the probability of it happening is zero. Question B: What is the probability that it will rain on the day of Jane's wedding? P(rain) = 5/365 P(forecast rain | rain) = 0.9 P(forecast rain | no rain) = 0.1 P(rain |   forecast rain) = ((5/365)(0.9))/((5/365)(0/9)) + ((36...
Read more