Vizualizare intermediară a datelor cu ggplot2
Rick Scavetta
Founder, Scavetta Academy
| Cauza suprapunerii | Soluții | |
|---|---|---|
| 1. | Seturi de date mari | Transparență, cercuri goale, dimensiunea punctului |
| 2. | Valori aliniate pe o axă | Ca mai sus, plus schimbarea poziției |
| 3. | Date cu precizie scăzută | Poziție: jitter |
| 4. | Date întregi | Poziție: jitter |
| Cauza suprapunerii | Soluții | Aici... | |
|---|---|---|---|
| 1. | Seturi de date mari | Transparență, cercuri goale, dimensiunea punctului | |
| 2. | Valori aliniate pe o axă | Ca mai sus, plus schimbarea poziției | |
| 3. | Date cu precizie scăzută | Poziție: jitter | geom_count() |
| 4. | Date întregi | Poziție: jitter | geom_count() |
p <- ggplot(iris, aes(Sepal.Length,
Sepal.Width))
p + geom_point()

p + geom_jitter(alpha = 0.5,
width = 0.1,
height = 0.1)

p +
geom_count()

| geom_ | stat_ |
|---|---|
geom_count() |
stat_sum() |
p +
stat_sum()

ggplot(iris, aes(Sepal.Length,
Sepal.Width,
color = Species)) +
geom_count(alpha = 0.4)

ggplot(iris, aes(Sepal.Length,
Sepal.Width,
color = Species)) +
geom_count(alpha = 0.4)
library(AER)
data(Journals)
p <- ggplot(Journals,
aes(log(price/citations),
log(subs))) +
geom_point(alpha = 0.5) +
labs(...)
p

p +
geom_quantile(quantiles =
c(0.05, 0.50, 0.95))

| geom_ | stat_ |
|---|---|
geom_count() |
stat_sum() |
geom_quantile() |
stat_quantile() |
Vizualizare intermediară a datelor cu ggplot2