CreatingDescriptiveStatistics.R

# Creating Data Visualization

# Set the working directory
setwd("/Users/daviddryburgh/Documents/R_Programming")

# Read the CSV file
cars <- read.csv("Cars.csv")

# Peek at the data
head(cars)

# Create a frequency table
table(cars$Transmission)

# Get the minimum value
min(cars$Fuel.Economy)

# Get the maximum value
max(cars$Fuel.Economy)
# Get the average vale
mean(cars$Fuel.Economy)

# Get the median value
median(cars$Fuel.Economy)

# Get the quartiles
quantile(cars$Fuel.Economy)

# Get the standard deviation
sd(cars$Fuel.Economy)

# Get the total value
sum(cars$Fuel.Economy)

# Get the correlation coefficient
cor(
  x = cars$Cylinders,
  y = cars$Fuel.Economy
)

# Summarize and entire table
summary(cars)