data(cars)
head(cars)
##   speed dist
## 1     4    2
## 2     4   10
## 3     7    4
## 4     7   22
## 5     8   16
## 6     9   10
plot(cars$speed, cars$dist)

IyctLS0KIycgdGl0bGU6ICJTcGluIFRlc3QiCiMnIGF1dGhvcjogIiIKIycgZGF0ZTogIiIKIycgb3V0cHV0OgojJyAgIGh0bWxfZG9jdW1lbnQ6CiMnICAgICBjb2RlX2Rvd25sb2FkOiB0cnVlCiMnLS0tCiMrCmRhdGEoY2FycykKCiMrCmhlYWQoY2FycykKCiMrCnBsb3QoY2FycyRzcGVlZCwgY2FycyRkaXN0KQo=