first of all: thank you for your replies!
hadley wrote: > > On Thu, Oct 16, 2008 at 11:42 AM, x0rr0x <[EMAIL PROTECTED]> wrote: >> >> Hi all, >> >> I'm trying to create a histogram which shows the frequency of variables >> within a certain timeframe. >> >> I've been using SPSS before, but I didn't quite like it... >> >> To describe my problem further here are some example variables: >> >> the "event" is actually a string which I recoded using: >> [code] >> data$event_class = as.numeric(as.factor(data$event)) >> [/code] >> I've recoded them into numerics >> >> >> csv: >> [code] >> time,event,event_class >> 01,cookies,1 >> 05,cookies,1 >> 06,pie,2 >> 07,coffee,3 >> 08,cookies,1 >> 30,pie,2 >> 31,coffee,3 >> [/code] >> and so on... >> >> Now I'd like to create a histogram where X is the time, the color of the >> area is the event_class >> and Y is defined by the frequency of event_class around some accumulated >> time > > install.packages("ggplot2") > library(ggplot2) > > qplot(time, fill = event, data = mydata, geom = "histogram") > > You can find out more about ggplot2 at http://had.co.nz/ggplot2 - it's > inspired by the Grammar of Graphics, which is also the theory that > underlies SPSS's plotting systems. > > Hadley > > -- > http://had.co.nz/ > > ______________________________________________ > 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. > > In install.packages("ggplot2") : package ‘ggplot2’ is not available strange.... Greg Snow-2 wrote: > > Does this do what you want? > > colhist <- function(x,col){ > tmp <- hist(x,plot=F) > br <- tmp$breaks > w <- as.numeric(cut(x,br,include.lowest=TRUE)) > sy <- unlist(lapply(tmp$counts,function(x)seq(length=x))) > sy <- sy[order(order(x))] > plot( range(br), range( 0, sy ), xlab=deparse(substitute(x)), > ylab='Frequency', type='n') > rect(br[w], sy-1, br[w+1], sy, > col=col, > border=NA) > rect(br[-length(br)], 0, br[-1], tmp$counts) > } > > x <- rnorm(75, rep( c(90,100,110), each=25), 5 ) > g <- rep( c('red','green','blue'), each=25 ) > > colhist(x,g) > > note: this colhist function is a modified version of the one from the help > file for the tkBrush function in the TeachingDemos package. > > -- > Gregory (Greg) L. Snow Ph.D. > Statistical Data Center > Intermountain Healthcare > [EMAIL PROTECTED] > 801.408.8111 > > >> -----Original Message----- >> From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] >> project.org] On Behalf Of x0rr0x >> Sent: Thursday, October 16, 2008 10:42 AM >> To: r-help@r-project.org >> Subject: [R] Grouped Histogram (colored) >> >> >> Hi all, >> >> I'm trying to create a histogram which shows the frequency of variables >> within a certain timeframe. >> >> I've been using SPSS before, but I didn't quite like it... >> >> To describe my problem further here are some example variables: >> >> the "event" is actually a string which I recoded using: >> [code] >> data$event_class = as.numeric(as.factor(data$event)) >> [/code] >> I've recoded them into numerics >> >> >> csv: >> [code] >> time,event,event_class >> 01,cookies,1 >> 05,cookies,1 >> 06,pie,2 >> 07,coffee,3 >> 08,cookies,1 >> 30,pie,2 >> 31,coffee,3 >> [/code] >> and so on... >> >> Now I'd like to create a histogram where X is the time, the color of >> the >> area is the event_class >> and Y is defined by the frequency of event_class around some >> accumulated >> time >> >> >> >> In SPSS I used this: >> Graphs -> Chart Builder >> Gallery->Histogram >> use some horizontal histogram >> put "time" on the x-axis >> select "grouping/stacking variables" in the "groups/point id" tab >> and then set "Stack: set-color" to event_class >> the y-axis will be automatically set to "histogram" >> >> thanks a lot in advance! >> >> Regards, >> - x0rr0x >> -- >> View this message in context: http://www.nabble.com/Grouped-Histogram- >> %28colored%29-tp20015941p20015941.html >> Sent from the R help mailing list archive at Nabble.com. >> >> ______________________________________________ >> 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. > > ______________________________________________ > 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. > > not quiet. maybe I described it wrong. the occurences of event_class shouldn't add up till the end. the graph should create blocks in certain time frames and then display how often the event_class turn up during this timeframe. also, is there a way to label the colors, preferably with their "data$event" strings? -- View this message in context: http://www.nabble.com/Grouped-Histogram-%28colored%29-tp20015941p20029605.html Sent from the R help mailing list archive at Nabble.com. ______________________________________________ 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.