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 <comunello.eder@gmail.com>omunello.eder@gmail.com> Dourados, MS - [22 16.5'S, 54 49'W] Em 14 de novembro de 2013 19:58, FHRB Toledo <fernandohtoledo@gmail.com>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 <fernandohtoledo@gmail.com>
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 R-br@listas.c3sl.ufpr.br 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.