Dear all, I cannot find a function which would allow drawing hist and density on the same graph. x <- seq(1,40,1) y <- 2*x+1+5*rnorm(length(x)) hist(y,freq = FALSE) plot(density(y)) thanks a lot for the help [[alternative HTML version deleted]]
Dear all, I cannot find a function which would allow drawing hist and density on the same graph. x <- seq(1,40,1) y <- 2*x+1+5*rnorm(length(x)) hist(y,freq = FALSE) plot(density(y)) thanks a lot for the help [[alternative HTML version deleted]]
The lattice function panel.identify() allows the labeling of mouse-selected plot points. But ... how does one save the resulting plot? E.g., to png() or pdf() Thank you! # example code library(lattice) xyplot(rnorm(10,0,1)~rnorm(10,0,1)) trellis.focus() # left click on plot panel to select panel.identify() # left click on selected points. Right click to exit process trellis.unfocus() Derek N. Eder Gothenburg University "The most dangerous thing in the jungle is not the snakes, the spiders, the tigers, ... The most dangerous thing in the jungle is your mind!"
On 30-Nov-09 11:09:12, Trafim wrote:> Dear all, > I cannot find a function which would allow drawing hist and density > on the same graph. > > x <- seq(1,40,1) > y <- 2*x+1+5*rnorm(length(x)) > > hist(y,freq = FALSE) > plot(density(y)) > > thanks a lot for the helpplot() initiates a completely new plot, and therefore erases what was there before. Use lines(), or points(), instead: x <- seq(1,40,1) y <- 2*x+1+5*rnorm(length(x)) hist(y,freq = FALSE) lines(density(y)) lines() *adds* extra elements (line segments) to an *existing* plot. See ?plot abd ?lines (and also ?points) for more explanation. Ted. -------------------------------------------------------------------- E-Mail: (Ted Harding) <Ted.Harding at manchester.ac.uk> Fax-to-email: +44 (0)870 094 0861 Date: 30-Nov-09 Time: 11:27:49 ------------------------------ XFMail ------------------------------
It's easy with the ggplot2 package set.seed(1234) dataset <- data.frame(x = seq(1,40,1)) dataset$Response <- with(dataset, 2*x+1+5*rnorm(length(x))) library(ggplot2) ggplot(dataset, aes(x = Response)) + geom_histogram(aes(y ..density..)) + geom_density(colour = "red") HTH, Thierry ------------------------------------------------------------------------ ---- ir. Thierry Onkelinx Instituut voor natuur- en bosonderzoek team Biometrie & Kwaliteitszorg Gaverstraat 4 9500 Geraardsbergen Belgium Research Institute for Nature and Forest team Biometrics & Quality Assurance Gaverstraat 4 9500 Geraardsbergen Belgium tel. + 32 54/436 185 Thierry.Onkelinx at inbo.be www.inbo.be To call in the statistician after the experiment is done may be no more than asking him to perform a post-mortem examination: he may be able to say what the experiment died of. ~ Sir Ronald Aylmer Fisher The plural of anecdote is not data. ~ Roger Brinner The combination of some data and an aching desire for an answer does not ensure that a reasonable answer can be extracted from a given body of data. ~ John Tukey -----Oorspronkelijk bericht----- Van: r-help-bounces at r-project.org [mailto:r-help-bounces at r-project.org] Namens Trafim Verzonden: maandag 30 november 2009 12:01 Aan: r-help at r-project.org Onderwerp: [R] Histogram and Density on the the same graph Dear all, I cannot find a function which would allow drawing hist and density on the same graph. x <- seq(1,40,1) y <- 2*x+1+5*rnorm(length(x)) hist(y,freq = FALSE) plot(density(y)) thanks a lot for the help [[alternative HTML version deleted]] ______________________________________________ R-help at 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. Druk dit bericht a.u.b. niet onnodig af. Please do not print this message unnecessarily. Dit bericht en eventuele bijlagen geven enkel de visie van de schrijver weer en binden het INBO onder geen enkel beding, zolang dit bericht niet bevestigd is door een geldig ondertekend document. The views expressed in this message and any annex are purely those of the writer and may not be regarded as stating an official position of INBO, as long as the message is not confirmed by a duly signed document.
On Mon, Nov 30, 2009 at 12:01:12PM +0100, Trafim wrote:> Dear all, > > I cannot find a function which would allow drawing hist and density on the > same graph. > > x <- seq(1,40,1) > y <- 2*x+1+5*rnorm(length(x)) > > hist(y,freq = FALSE) > plot(density(y))The package descr has the function histkdnc() which plots a histogram with kernel density and normal curve. I mantain the package but this function was written by Dirk Enzmann. -- Jakson