Coordenadas en R

coord_flip, acercarse sin descartar datos y relaciones de aspecto fijas.

library(ggplot2)
library(tibble)

runs <- tibble(x = 1:20, y = (1:20) * 1.5 + c(rep(0, 19), 40))

zoomed <- ggplot(runs, aes(x, y)) +
  geom_point() +
  geom_smooth(method = "lm", formula = y ~ x, se = FALSE) +
  coord_cartesian(ylim = c(0, 40))

clipped <- ggplot(runs, aes(x, y)) +
  geom_point() +
  geom_smooth(method = "lm", formula = y ~ x, se = FALSE) +
  ylim(0, 40)

square <- ggplot(runs, aes(x, y)) + geom_point() + coord_fixed(ratio = 1)

print(class(zoomed$coordinates)[1])
print(class(square$coordinates)[1])
ggsave(tempfile(fileext = ".png"), clipped, width = 4, height = 3, dpi = 100)

Cómo funciona

coord_cartesian hace zoom; ylim descarta las filas que quedan fuera.
Esa diferencia cambia lo que ajusta un suavizador.
coord_fixed mantiene una unidad igual en ambos ejes.

El intento, en números

Líneas: 20
Caracteres a escribir: 588
Tokens: 201
Ritmo de tres estrellas: 105 tpm

Al ritmo de tres estrellas de 105 tokens por minuto, este intento toma unos 115 segundos.

Escribe este fragmento

Paso 4 de 4 en Paneles y escalas; paso 11 de 15 en ggplot2.

← Anterior Siguiente →