Gráficas - Parte 1

Cargue los paquetes en su sesión de R

library(ggplot2)
library(datos)

Un histograma usando geom_histogram() - 1 variable continua.Pruebe cambiar precios con otras variables, como: - quilate - profundidad - tabla

ggplot(data = diamantes) +
  geom_histogram(aes(precio), color = "white", bins = 10) +
  labs(y = "") +
  theme_minimal()

ggplot(data = diamantes) +
  geom_histogram(aes(quilate), color = "white", bins = 10) +
  labs(y = "") +
  theme_minimal()

ggplot(data = diamantes) +
  geom_histogram(aes(profundidad), color = "white", bins = 10) +
  labs(y = "") +
  theme_minimal()

ggplot(data = diamantes) +
  geom_histogram(aes(tabla), color = "white", bins = 10) +
  labs(y = "") +
  theme_minimal()

Un diagrama de cajas - 1 variable continua y 1 variable discreta. Pruebe cambiar precios con otras variables, como: - quilate - profundidad - tabla

Pruebe cambiar corte con otras variables, como: - color - claridad

ggplot(data = diamantes) +
  geom_boxplot(aes(corte, precio)) +
  theme_minimal()

ggplot(data = diamantes) +
  geom_boxplot(aes(color, quilate)) +
  theme_minimal()

ggplot(data = diamantes) +
  geom_boxplot(aes(claridad, profundidad)) +
  theme_minimal()

ggplot(data = diamantes) +
  geom_boxplot(aes(corte, tabla)) +
  theme_minimal()

Agregemos color. Pruebe cambiar claridad con otras variables, como: - color - corte

ggplot(data = diamantes) +
  geom_point(aes(precio, quilate, color = claridad), alpha = 0.3) +
  theme_minimal()

ggplot(data = diamantes) +
  geom_point(aes(precio, quilate, color = corte), alpha = 0.3) +
  theme_minimal()

ggplot(data = diamantes) +
  geom_point(aes(precio, quilate, color = color), alpha = 0.3) +
  theme_minimal()

Agregemos un modelo

ggplot(data = diamantes, aes(precio, quilate)) +
  geom_point(aes(color = claridad), alpha = 0.3) +
  geom_smooth(method = "lm") +
  theme_minimal()

## `geom_smooth()` using formula 'y ~ x'