# 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"
)

Interpretation

There is a slight negative correlation between MPG and HP.