Проблема в том, что вы передаете фрейм данных в функцию hist()
, когда для аргумента x
требуется вектор (см. ?hist
). Исходя из вашего отредактированного сообщения, вы хотели бы:
hist(as.numeric(data[1,]))
Где data[1,]
создает вектор из первой строки вашего фрейма данных.
Хотя кажется, что вы действительно ищете барный сюжет. В этом случае попробуйте:
plot_data <- data.frame(t(data)) %>%
tibble::rownames_to_column()
ggplot(plot_data,aes(x = rowname,y=t.data.)) +
stat_identity(geom = "bar")
От @ user2554330, более простой базовый графический метод:
f <- as.numeric(data[1,])
names(f) <- names(data)
barplot(f)