Analysis of cars dataset

by CSK

Part 1

# Load the cars dataset
data(cars)
 
# Display the structure of the dataset
str(cars)

## 'data.frame':    50 obs. of  2 variables:
##  $ speed: num  4 4 7 7 8 9 10 10 10 11 ...
##  $ dist : num  2 10 4 22 16 10 18 26 34 17 ...

# Generate a summary of the dataset
summary(cars)

##      speed           dist       
##  Min.   : 4.0   Min.   :  2.00  
##  1st Qu.:12.0   1st Qu.: 26.00  
##  Median :15.0   Median : 36.00  
##  Mean   :15.4   Mean   : 42.98  
##  3rd Qu.:19.0   3rd Qu.: 56.00  
##  Max.   :25.0   Max.   :120.00

# Plot the dataset
plot(cars)

# Create a histogram of car speeds
hist(cars$speed, main="Histogram of Car Speeds", xlab="Speed", col="blue")

# Create a boxplot of stopping distances
boxplot(cars$dist, main="Boxplot of Stopping Distances", ylab="Distance", col="red")

The END