Cars EDA

Dataset

MPG vs Weight vs Horsepower

ggplot(cars, aes(mpg, wt, color=as.factor(hp))) +
  geom_point() +
  ggtitle("Miles per gallon vs Weight vs Horsepower") +
  guides(color = guide_legend(title="Horsepower")) +
  xlab("Miles per gallon") +
  ylab("Weight in tons")

Common names in cars

wordcloud(cars$car, min.freq=1, colors=rainbow(length(cars$car) / 2))

Cylinders vs weight

ggplot(cars, aes(cyl, wt, alpha=0.6)) +
  geom_point(position = position_jitter(width=0.2, height=0.04, seed=0)) +
  ggtitle("Cylinders vs weight") +
  xlab("Cylinders") +
  ylab("Weight") +
  guides(alpha="none")