使用ggplots（R）显示条形而不是线条

Question

我正在尝试将此直方图显示为填充条，而不是将覆盖的线条。我试图为geom_bar（alpha = .5）更改“geom_line（alpha = .5）”，但没有成功。

在这种情况下显示条形的正确方法是什么？

require(reshape2)
library(ggplot2)

fileName <- paste("/degree_hist-104-50.csv", sep = "")

mydata = read.csv(fileName,sep=",", header=TRUE, check.names=FALSE)
dataM = melt(mydata,c("F"))

ggplot(data=dataM, aes(x= F, y=value, colour=variable, fill=variable)) +
geom_line(alpha=.5) +
theme_bw() +
theme(plot.background = element_blank(), panel.grid.minor = element_blank(), #panel.grid.major = element_blank(),
axis.line = element_blank(),
legend.key = element_blank(), legend.title = element_blank()) +
scale_y_continuous("Density", expand=c(0,0)) + 
scale_x_continuous("Value", expand=c(0,0)) +
theme(legend.position="bottom") +
theme(axis.title.x = element_text(vjust=-0.3, face="bold", size=12)) + 
theme(axis.title.y = element_text(vjust=1.5, face="bold", size=12)) +
theme(plot.title = element_text(lineheight=.8, face="bold"))

以下是数据：https://dl.dropboxusercontent.com/u/73950/degree_hist-104-50.csv

任何线索都表示赞赏！谢谢！