This post is based on the book of Think Stats 2e by Allen B. Downey.
Load package and data:
library(ggplot2)
df <- read.csv("../../../../static/files/selfie-data.csv")Plotting
Scatter plot
ggplot(df, aes(x=height, y=weight)) + geom_point() + xlab("Height (in …