Как сделать гистограмму из tibble df 3x2?

Question

Мне нужна помощь в составлении гистограммы из таблицы 3х2. Я усреднил 3 образца в каждой группе (Expt и Ctrl) и теперь пытаюсь построить их гистограммы на одном графике. Также я хотел бы добавить легенду, содержащую окраску и название каждой группы.

Получение ошибки: Ошибка: Эстетика должна иметь длину 1 или совпадать с данными (3): y

Таблица выглядит следующим образом. 3x2

control.average exp.average

[- 0.01280627, -1.014465]

[99.93987077, 10.009083]

[6.02685326, 3.995733]

library(ggplot2)
# Create Histogram
ggplot(sample.average, aes(x = rownames(sample.average), y = colnames(sample.average))) + geom_histogram()+ stat = "identity"+ position = "dodge"        

Answer 1

Я не уверен, что у вас есть в вашем фрейме данных. Это должно помочь вам начать, а вы можете help(ggplot) прочитать справочное руководство.

library(ggplot2)
ggplot(df, aes(x = exp.average, y = control.average, fill=factor(index))) + geom_histogram(stat = "identity", position = "dodge") + guides(fill=guide_legend(title="Group")) + labs(x = "Experimenatal", y="Control")

Вывод

data

df <- structure(list(control.average = c(-0.01280627, 99.93987077, 
6.02685326), exp.average = c(-1.014465, 10.009083, 3.995733), 
    index = c(1, 2, 1)), row.names = c(NA, -3L), class = "data.frame")

Надеюсь, это поможет.