Script – Parte 20 (Série R na Prática)

A explicação do script a seguir está no artigo R na Prática – Parte 20.

#setwd("C:\\geoStats\\figuras\\chap3")
#jpeg("Fig3_4.jpeg",width=5,height=5,
#units="in",res=300)
x=seq(-pi,pi,0.1)
plot(x,sin(x))
#dev.off()