Следующий скрипт
library(ggplot2)
dat<-rnorm(80)
dat<-data.frame(dat)
p<-ggplot(dat, aes(x=dat))+geom_histogram()
p<-p+geom_rug(sides="b", colour="blue")
p
делает эту красивую картину:
Но многие из этих синих линий пересекаются. Я хотел бы добавить немного дрожи! Я пробовал использовать:
p<-p+geom_rug(sides="b", position="jitter", colour="blue")
Но мне выдается сообщение об ошибке:
stat_bin: ширина бина по умолчанию равна диапазону/30. Используйте «binwidth = x», чтобы настроить это. Ошибка: position_jitter требует следующей отсутствующей эстетики: y
Координата y
для гистограммы — это отсчет, который гистограмма должна делать автоматически.
Как я могу избавиться от дрожи?