Dear Gundala, It's just a starting points. I'm sure it could be better. Try this:
set.seed(123) x=c(rgamma(30,shape=.2,scale=14),rgamma(30,shape=12,scale=10),rgamma(30,shape=5,scale=6)) plot(density(x[1:30]),col=2,xlim=range(0,max(density(x)$x)),type='l',main="Density for your vector") points(density(x[31:60]),col=1,type='l') points(density(x[61:90]),col=4,type='l') legend("topright",paste('Type',1:3,sep=""),col=c(2,1,4),lty=1) HTH, Jorge On Sun, Jul 6, 2008 at 11:24 PM, Gundala Viswanath <[EMAIL PROTECTED]> wrote: > Hi, > > I have the following vector > which is created from 3 distinct distribution (three components) of gamma: > > > x=c(rgamma(30,shape=.2,scale=14),rgamma(30,shape=12,scale=10),rgamma(30,shape=5,scale=6)) > > I want to plot the density curve of X, in a way that it shows > a distinct 3 curves that represent each component. > > How can I do that? > > I tried this but doesn't work: > > lines(density(x)) > > Please advise. > > - Gundala Viswanath > Jakarta - Indonesia > > ______________________________________________ > R-help@r-project.org mailing list > https://stat.ethz.ch/mailman/listinfo/r-help > PLEASE do read the posting guide > http://www.R-project.org/posting-guide.html > and provide commented, minimal, self-contained, reproducible code. > [[alternative HTML version deleted]] ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.