Cara de Boneco

sexta-feira, 12 de outubro de 2007

Esse foi um exercício dado em sala de pelo Prof Adilson, no segundo semestre de 2006.
Disciplina: Análise Gráfica.



CÓDIGOS PARA UTILIZAÇÃO NO SOFTWARE R
plot(1:10, 1:10, type = "n", ann = FALSE, axes = FALSE)
symbols(5, 5, 2, add = TRUE, inc = FALSE)
symbols(c(4, 6), c(6, 6), c(0.3, 0.3), add = TRUE, inc = FALSE)
points(c(4.041275, 6.086176), c(6.006826, 6.006826), pch = c(44,
44), cex = 4, col = "blue")
points(c(7.022771, 2.997524), c(4.974744, 5.011604), pch = c(41,
40), cex = 7)
segments(4.467296, 3.426621, 5.617553, 3.297611, col = "red")
segments(4.22, 7.1, 5.04, 9, 1)
segments(5.04, 9.01, 5.96, 7.02)
symbols(5.16, 8.97, 0.2, add = TRUE, inc = FALSE, bg = "yellow")
points(4.989172, 4.827304, pch = 94, cex = 3)
points(c(3.49, 3.54, 3.84, 4.07), c(4.71, 4.31, 4.21, 4.6),
pch = 42, col = 5:8)
points(c(5.81, 6.05, 6.41, 6.13), c(4.53, 4.01, 4.18, 4.66),
pch = 42, col = 5:8)

0 Observações: