Мне трудно получить ggplots geom_bar, чтобы предоставить мне полный сюжет!Я действительно не уверен, что я делаю неправильно, но когда я помещаю те же данные в барплот, я получаю правильный график, но я не могу внести изменения, которые я хочу, в свой график.То, что я пытаюсь сделать, это взять набор данных о последовательности митохондриального генома и создать график средних SNP на число регионов.Затем я хочу, чтобы столбцы были окрашены по имени гена, и, наконец, я хотел бы поместить вторую метку оси x ниже метки номера региона, в которой есть имя гена с цветом.Обратите внимание, что это довольно много данных, поэтому мой номер региона (x) изменяется от 1 до 19524, а среднее значение от 0 до 20000 (y) в зависимости от региона.
Когда я строю графикв barplot это выглядит так:
, а в ggplot это выглядит так:
Код, который я сейчас использую, выглядит так: Как вы можете видеть, я не закончил с вычислением ggplotо том, как сделать дополнительные метки оси X, которые я хочу, но так как я не могу отобразить все столбцы, кажется немного неправильным пытаться получить больше о них в данный момент.
data2<-aggregate(data_sub[, 7], list(data_sub$regnum), mean)
barplot(names=data2$Group.1, height = data2$x, width = 30, ylim=c(0,24000), xlim=c(0,19525))
ggplot(data=data_sub) +
geom_bar(aes(x=regnum, y=Coverage,fill = as.factor(mtDNA_sequence_Gene)), stat = "summary", fun.y = "mean", width=5) +
scale_x_discrete( expand = c(0, 0))
Этобыло бы трудно создать поддельный набор данных для этих данных, потому что я думаю, что объем данных может быть большой частью проблемы.Но, надеюсь, у кого-то будут какие-то идеи для меня:)