在直方图中绘制平均值的R程序

我正在尝试编写一个程序，用于为每列的平均值绘制条形图。我有一个数据集“Dummy”，包含100行和50列，我想绘制每列的平均值，并分别保存此条形图。所以我想要一个平均值为50个不同的列，在一个条形图中，并保存在一个特定的位置，那么我该怎么做呢

---

感谢高级

我同意你的评论，从你的问题来看，你更可能在寻找条形图。但是，以下是获得列平均值直方图的示例：

#Make an empty dataframe with 100 observations for 50 columns
DF<-data.frame(matrix(rep(0,50*100),nrow=100,ncol=50))

#Fill in with random values
for (i in 1:ncol(DF)){
    DF[,i]=rnorm(100,0,1)
}

#generate histogram
hist(colMeans(DF))

#为50列创建一个包含100个观察值的空数据框
DFSo是否要为数据帧中的每列绘制直方图？到目前为止，您在R中尝试过什么吗？此列（名称）的每个列的平均值只是一个值，因此直方图不是这样。你能给出一个你预期结果的例子（甚至只是画出来）吗？显然你把柱状图和条形图搞混了。一个令人惊讶的常见错误。@Roland，即使是“按列名[…]计算的每列平均数”的条形图也没有意义。@m-dz为什么没有？我可以将列的意思绘制为条形图（我不会，但我可以）。为什么我们在这里使用rnorm函数？这只是为了创建一个示例数据库。您要查找的代码只是最后一行
hist（colMeans（DF））
，它创建了数据帧的列平均值的直方图（用数据帧的名称替换
DF
）
I am trying this syntax for plotting the Average of each column of my data set, but it shows an error

library(ggplot2)
for(i in 2:ncol(Dummy))
{
  jpeg(file="d:/R Data/Barplot/.jpeg")
}
barplot(colMeans(Dummy), ylim=c(0,50))
dev.off()

Here error is: Error in jpeg(file = "d:/R Data/Barplot/hist.jpeg") : 
  too many open devices and Error in colMeans(Dummy) : 'x' must be numeric`enter code here`