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.

Responder a