curve(cos(x), 0, 2*pi,) curve(cos(x), 0, 4*pi,) curve(sin(x), 0, 4*pi, col='blue', add=TRUE) T=1; om=2*pi/T; curve(cos(om*t), name='t', 0, 4*pi,) ?curve T=1; om=2*pi/T; curve(cos(om*t), 0, 4*pi, name='t') ?curve T=1; om=2*pi/T; curve(cos(om*t), 0, 4*pi, xname='t') T=1; om=2*pi/T; curve(cos(om*t), 0, 2, xname='t') ?curve T=1; om=2*pi/T; curve(cos(om*t), 0, 2, xname='t', n=501) T=1; om=2*pi/T; curve(cos(om*t), 0, 4, xname='t', n=501) curve(sin(om*t), 0, 4, xname='t', n=501, add=TRUE, col='blue') curve(-cos(om*t), 0, 4, xname='t', n=501, add=TRUE, col='red') T=1; om=2*pi/T; curve(cos(om*t), 0, 2, xname='t') curve(sin(om*t), 0, 2, xname='t', n=501, add=TRUE, col='blue') curve(-cos(om*t), 0, 2, xname='t', n=501, add=TRUE, col='red') source("curve_test_ingresso.R") source("curve_test_ingresso_1.R") source("curve_test_ingresso_ll.R") th = 0.1; sin(th); cos(th) th = 0.01; sin(th); cos(th) th = 0.001; sin(th); cos(th) curve( cos(x), 0, 4*pi, lwd=2 ) curve( cos(x), 0, 2*pi, lwd=2 ) curve( cos(x), 0, pi, lwd=2 ) curve( sin(x), 0, pi, lwd=2 )