Question

I have a data that looks like this.

And I intend to create multiple density curve into one plot, where each curve
correspond to the unique ID.

I tried to use “sm” package, with this code, but without success.

library(sm)
dat <- read.table("mydat.txt");
plotfn <- ("~/Desktop/flowgram_superimposed.pdf");
pdf(plotfn);

sm.density.compare(dat$V1,dat$V2, xlab = "Flow Signal")
colfill <- c(2:10);
legend(locator(1), levels(dat$V2), fill=colfill)

dev.off();

Please advice what’s the right way to do it or if there is
alternative way to do it?

I am trying to get this kind of plot at the end.
figure http://img524.imageshack.us/img524/2736/testl.png

Answer 1

Try using ggplot2:

dnow <- read.table("http://dpaste.com/88561/plain/")
library(ggplot2)
qplot(V1, colour=factor(V2), data=dnow, geom="density")