\begin{Schunk}
\begin{Sinput}
 plot(salary ~ age, data = mydf)
 plot(salary ~ age, data = mydf, cex = 2)
 plot(salary ~ age, data = mydf, col = "pink", cex = 2, pch = 16)
 plot(salary ~ age, data = mydf, col = as.numeric(sex), cex = salary, pch = 16)
 plot(salary ~ age, data = mydf, type = "l")
 plot(salary ~ age, data = mydf, type = "b")
 plot(salary ~ age, data = mydf, type = "h")
 plot(salary ~ age, data = mydf, type = "s")
 plot(salary ~ age, data = mydf, type = "c")
 text(salary ~ age, data = mydf, labels = 1:8)
\end{Sinput}
\end{Schunk}
