Joseph Lo (PID:A18121493)
x <- 1:50 plot(x, sin(x))
plot(x, sin(x), typ="l", col="blue", lwd=2)
log(10, base = 10)
[1] 1
