Import packages

library(stats)


Prepare data

mtcars_data <- mtcars
mtcars_data$am <- as.factor(mtcars_data$am) # converting predictors to factor 
mtcars_data$cyl <- as.factor(mtcars_data$cyl)


Student's t-test, assessing difference in means for two groups

chisq.test(table(mtcars_data$am, mtcars_data$cyl)) # Assess Transmission differences by number of cylinders
## Warning in chisq.test(table(mtcars_data$am, mtcars_data$cyl)): Chi-squared
## approximation may be incorrect
## 
##  Pearson's Chi-squared test
## 
## data:  table(mtcars_data$am, mtcars_data$cyl)
## X-squared = 8.7407, df = 2, p-value = 0.01265