多个hist图叠加怎么做？

yimengchangh

各位大侠，请教下：

多个hist 图叠加在一起怎么做呢？

比如

a=c(1,2,2,3,2,1,3,5,7,5,3,2)

b=c(2,2,1,2,4,6,7,4,3,7,10)

c=c(2,2,4,1,3,4,2,4,2)

只知道做单个的时候很好做，如plot(density(a))，但是多个叠加的话，就不行了。我试了这样的方法：

par(new=T)

plot(density(a))

plot(density(b),add=T)

但是还是不行，提示错误是：

警告信息：

1: In plot.window(...) : "add"不是图形参数

2: In plot.xy(xy, type, ...) : "add"不是图形参数

3: In axis(side = side, at = at, labels = labels, ...) : "add"不是图形参数

4: In axis(side = side, at = at, labels = labels, ...) : "add"不是图形参数

5: In box(...) : "add"不是图形参数

6: In title(...) : "add"不是图形参数

我该怎么办……

求指点，谢谢。

luzifer

<br />
a=c(1,2,2,3,2,1,3,5,7,5,3,2)<br />
b=c(2,2,1,2,4,6,7,4,3,7,10)<br />
c=c(2,2,4,1,3,4,2,4,2)</p>
<p>plot(density(a))<br />
lines(density(b),col="red")<br />
lines(density(c),col="blue")<br />

</p>

yimengchangh

回复第2楼的 luzifer：谢谢，再请教个，是不是有点得寸进尺……（忍忍），那加入是hist呢？hist(a)之后怎么在一张图上hist(b)?

luzifer

回复第3楼的 yimengchangh：

做到是可以做到，但

hist 叠加在一块会不会很乱啊？

<br />
a=c(1,2,2,3,2,1,3,5,7,5,3,2)<br />
b=c(2,2,1,2,4,6,7,4,3,7,10)<br />
c=c(2,2,4,1,3,4,2,4,2)</p>
<p>hist(a, plot=F)->inter.a<br />
hist(b, plot=F)->inter.b<br />
hist(c, plot=F)->inter.c</p>
<p>plot(inter.a)<br />
graphics:::plot.histogram(inter.b, add=T,col="red")<br />
graphics:::plot.histogram(inter.c, add=T,col="yellow")</p>
<p>

</p>

ming_uld

试试ggplot2吧～

<br />
aa <- data.frame(value=c(a,b,c),group=c(rep("a",length(a)),rep("b",length(b)),rep("c",length(c))))<br />
library(ggplot2)<br />
dplot <- ggplot(aa, aes(value, fill = group))<br />
dplot+geom_bar()</p>
<p>dplot + geom_line(aes(x=value,y=..density..,colour=group),stat="density",position = "identity")<br />
dplot + geom_line(aes(x=value,y=..density..,colour=group),stat="density",position = "stack")<br />

</p>