如何在R中使用相同的坐标系覆盖多个子图

Question

我想建立一个子图，其中覆盖几个hystograms并且没有标准化每个hystogram。 所以，我想使用库的功能subplot（）＆＃34; TeachingDemos＆＃34;，编写第一个hystogram的功能，并为其他hystograms的绘图添加循环：

filelog<- (Sys.glob("*.log"))
y<- read.table(file="data.log",skip=2,head=T)  
ffl<- filelog[!Sys.glob("*.log") %in% "data.log"]  
subplot(hist(y,breaks=(seq(0,10,by=1),main="",xlab="",xlim=c(0,10), ylab=""
        for i in 1:length(ffl)){
        x<-read.table(file=ffl[i],skip=2,head=T)
        hist(x[,"trees"],breaks=(seq(0,10,by=1)),main="",xlab="",xlim=c(0,10),        ylab="",axes=FALSE),
grconvertX(c(.7, .9), "user"), grconvertY(c(.1, .4), "user"))}
}
dev.off()

它不起作用。你知道为什么吗？ 我在想，也许我错过了在另一个函数中执行函数的方法。