search for: gehist

...png(out_fname) par(mfrow = c(2,1)) scat <- plot(gexp.arr, type = "l", col="red", xlab="Sample", ylab="Exp Lvl", main="My Plot", split=c(1,1,1,2), more = TRUE ) gehist <- hist(gexp.arr, col="blue", main = "Density Plot", xlab = "Exp Level", freq=FALSE ) lines(density(gexp.arr), col = "red",lwd = 3, split=c(1,2,1,2)) dev.off() __END__ - Gundala Viswanath Jakarta - I...

...d curve also has two peaks). But the gamma curve there only has one curve. Is there a way I can fit the gamma function such that it also yields two peaks? Below is my code that generate the graph: __BEGIN__ dgexp <- density(gexp.arr) gexp.ymax <- max(dgexp$y) # Histograms gehist <- hist(gexp.arr, col="blue", main=paste(genm,"-",desc, ", Mean=",ge_mean, ", SD=",ge_sd, ", Krt=",ge_kurt, ", AIC=",aic, ", BIC=",bic, sep=""), more...