# Load the built-in dataset
data(mtcars)
# Create scatter plot
plot(
mtcars$hp,
mtcars$mpg,
xlab = "Horsepower (hp)",
ylab = "Miles per Gallon (mpg)",
main = "MPG vs Horsepower: Vehicle Fuel Efficiency Analysis",
pch = 19 , col = "blue"
)