Olá, Fernando! As figuras estão distorcidas. Tente o primeiro código definindo 'asp=1' em plot(). Aqui deu certo!
require(plotrix) #x11() plot(c(-1.2, 1.2), c(-1.2, 1.2), type = 'n', axes = FALSE, xlab = '', ylab = '', asp=1) rect(-1, -1, 1, 1, lwd = 1.5) draw.circle(0, 0, 1) Éder Comunello <c <[email protected]>[email protected]> Dourados, MS - [22 16.5'S, 54 49'W] Em 14 de novembro de 2013 19:58, FHRB Toledo <[email protected]>escreveu: > Obtive uma resposta correta... > > plot(c(-1.2, 1.2), c(-1.2, 1.2), type = 'n', axes = FALSE, xlab = '', ylab > = '') > rect(-1, -1, 1, 1, lwd = 1.5) > x <- cos(seq(0, 2 * pi, length = 1000)) > y <- sin(seq(0, 2 * pi, length = 1000)) > polygon(x, y, lwd = 1.5) > > att, > FH > > > 2013/11/14 FHRB Toledo <[email protected]> > >> Senhores, >> >> Segue um CMR extremamente simples... a pergunta o resultado está certo? >> >> require(plotrix) >> plot(c(-1.2, 1.2), c(-1.2, 1.2), type = 'n', axes = FALSE, xlab = '', >> ylab = '') >> rect(-1, -1, 1, 1, lwd = 1.5) >> draw.circle(0, 0, 1) >> >> Por que será que obtenho um gráfico em que o círculo ultrapassa o limite >> superior do quadrado? >> >> att, >> FH >> > > > _______________________________________________ > R-br mailing list > [email protected] > https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br > Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça > código mínimo reproduzível. >
_______________________________________________ R-br mailing list [email protected] https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
