x <- read.table("a.csv", header=TRUE)
x <- x[,1]
x <- x[-which(x==0)]
plot(density(x),main="",xlim = c(0,30000))
b <- read.table("b.csv", header=TRUE)
b <- b[,1]
b <- b[-which(b==0)]
plot(density(b),main="",xlim = c(0,30000))
如何把上面的2个plot放到一个图里,试过用par(mfrow=c(1,1))
但是放到前面没有反应,该怎么实现呢?
谢大神们


雷达卡





京公网安备 11010802022788号







