You can do this: hh <- lapply(h, head, mh) hh$breaks <- head(h$breaks, mh + 1) class(hh) <- "histogram" plot(hh)
On Mon, Sep 1, 2008 at 10:44 AM, Antje <[EMAIL PROTECTED]> wrote: > Hi there, > > I hope this question is not as stupid as the one before ... > I tried to shorten my histogram (because the distribution is quite skewed > and I simply don't want to see the long tail but still use the histogram > plot). How can I do something like this? (The example does not work but I > don't know why...) > > data <- rnorm(100) # as example, of course this is not skewed... > > h <- hist(data, plot=FALSE) > mh <- 5 > hh <- list(h$breaks[0:(mh+1)], > h$counts[0:mh],h$intensities[0:mh],h$density[0:mh],h$mids[0:mh],h$xname,h$equidist) > names(hh) <- names(h) > plot(hh) > > > Antje > > ______________________________________________ > 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. > -- Henrique Dallazuanna Curitiba-Paraná-Brasil 25° 25' 40" S 49° 16' 22" O [[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.