Como me encuentro hoy, con rstats
Gráfico absurdo con R y un buen ejemplo de las cosas que hace $\pi$. Tras 2 meses de dolores intensos en mi hombro, hoy solo noto una molestia y, claro… plot(rep(10, 10), rep(10, 10), ann = FALSE, type = "n", xlim = c(-1, 1), ylim = c(-1, 1), axes = FALSE) radio <- 1 theta <- seq(0, 2 * pi, length = 200) lines(x = radio * cos(theta), y = radio * sin(theta)) radio <- 1.1 theta <- seq(-0.75, -3 * pi / 4, length = 100) lines(x = radio * cos(theta), y = radio * sin(theta) + 0.5) points(-0.5, 0.5, pch = 1, cex = 3) points(0.5, 0.5, pch = 1, cex = 3)