Как реализовать функцию "geom_density_ridges" - PullRequest
Новая
       23

Как реализовать функцию "geom_density_ridges"

0 голосов
/ 08 июня 2019

Я бы хотел сгенерировать с моими данными график, подобный показанному с этим набором данных радужной оболочки.

ggplot(iris, aes(x = Sepal.Length, y = Species)) +
  geom_density_ridges(aes(fill = Species)) +
  scale_fill_manual(values = c("#00AFBB", "#E7B800", "#FC4E07"))

Здесь вы можете увидеть вырез из моего набора данных.

ratio = c(0, 0.05, 0.1, 0.15, 0.2, 0.25, 0, 0.05, 0.1, 0.15, 0.2, 0.25)
frequency = c(12000, 12300, 9000, 4300, 2434, 18000, 11000, 12200, 8000, 4100, 2400, 15900)
concentration = c("200", "200", "200", "200", "200", "200", "100", "100", "100", "100", "100", "100")
df = cbind(ratio, frequency, concentration)
View(df)
df = as.data.frame(df)

ggplot(df, aes(x = ratio, y = frequency)) +
  geom_density_ridges(aes(fill = df$concentration)) +
  scale_fill_manual(values = c("#00AFBB", "#E7B800"))

К сожалению, мой код не работает.Я не знаю, где моя ошибка.

1 Ответ

0 голосов
/ 08 июня 2019

Это то, что вы ищете? 

library(ggplot2); library(ggridges)
ggplot(df, aes(x = ratio, y = concentration, 
               height = frequency/10000, fill = concentration)) +
  geom_ridgeline() +
  scale_fill_manual(values = c("#00AFBB", "#E7B800"))

enter image description here

данные: 

df = data.frame(stringsAsFactors = F,
                ratio = c(0, 0.05, 0.1, 0.15, 0.2, 0.25, 0, 0.05, 0.1, 0.15, 0.2, 0.25),
                frequency = c(12000, 12300, 9000, 4300, 2434, 18000, 11000, 12200, 8000, 4100, 2400, 15900),
                concentration = c("200", "200", "200", "200", "200", "200", "100", "100", "100", "100", "100", "100"))
...