search for: cellipse

...left corner. I want to know how to superimpose that histogram on a similar plot, such as the following: groups = as.factor(c(rep(1,2), rep(2,4), rep(3,4))) s.arrow(dfxy=nipmat$co[,1:2]*8, sub="Day 10", possub="bottomleft", csub=3) s.class(dfxy=nipmat$li[,1:2], fac=groups, cellipse=2, axesell=F, cstar=0 , col=c(2:3), add.plot=T) I can create the histogram using: plot(nipmat$eig/sum(nipmat$eig), type='h') but I don't know how to superimpose it on the above graph. Thanks for any help! Best, Jennie Jennie Lavine PhD Candidate Center for Infectious Disease D...

...erimpose that histogram on a similar plot, such as the following: >> >> groups = as.factor(c(rep(1,2), rep(2,4), rep(3,4))) >> s.arrow(dfxy=nipmat$co[,1:2]*8, sub="Day 10", possub="bottomleft", >> csub=3) >> s.class(dfxy=nipmat$li[,1:2], fac=groups, cellipse=2, axesell=F, >> cstar=0 , col=c(2:3), add.plot=T) >> >> I can create the histogram using: >> >> plot(nipmat$eig/sum(nipmat$eig), type='h') >> >> but I don't know how to superimpose it on the above graph. >> >> Thanks for any help!...