Dear Maarten xyplot has the argument groups which allows you to create nested groupings.
data$subjectID <- paste(data$groups, data$subjects) # create a character label xyplot(responses~time|subjectID, groups = groups, data = data, aspect="xy") # or change to a factor to define the plot order Hope this helps. Chris Campbell MANGOSOLUTIONS, R Consulting and Training T: +44 (0)1249 767700 Ext: 233 F: +44 (0)1249 767707 M: +44 (0)7967 028876 www.mango-solutions.com -----Original Message----- From: r-help-boun...@r-project.org [mailto:r-help-boun...@r-project.org] On Behalf Of Maarten van Iterson Sent: 06 December 2010 08:32 To: r-help@r-project.org Subject: [R] lattice: strip panel function question Dear list, If have some repeated measurement data which looks something like: time <- rep(1:5 , each=2*4) groups <- rep(c("Case", "Control"), each=4) subjects <- factor(rep(1:(2*4), 5)) responses <- time + rnorm(5*2*4) + as.integer(factor(groups)) data <- data.frame(responses, time, groups, subjects) Now I want to plot each subject in a separate panel: library(lattice) xyplot(responses~time|subjects*groups, data = data, aspect="xy") but this introduces empty panels. I tried this: data$subjectID <- factor(rep(1:4, 2*5)) xyplot(responses~time|subjectID*groups, data = data, aspect="xy") This is what I want but now I don't have the correct subject id's. I couldn't find a solution in the help of strip.default. Does anyone has a solution to this? Thanks in advance, Maarten > sessionInfo() R version 2.12.0 (2010-10-15) Platform: x86_64-unknown-linux-gnu (64-bit) locale: [1] LC_CTYPE=en_US.UTF-8 LC_NUMERIC=C [3] LC_TIME=en_US.UTF-8 LC_COLLATE=en_US.UTF-8 [5] LC_MONETARY=C LC_MESSAGES=en_US.UTF-8 [7] LC_PAPER=en_US.UTF-8 LC_NAME=C [9] LC_ADDRESS=C LC_TELEPHONE=C [11] LC_MEASUREMENT=en_US.UTF-8 LC_IDENTIFICATION=C attached base packages: [1] stats graphics grDevices utils datasets methods base other attached packages: [1] lattice_0.19-13 loaded via a namespace (and not attached): [1] grid_2.12.0 tools_2.12.0 -- Maarten van Iterson Center for Human and Clinical Genetics Leiden University Medical Center (LUMC) Research Building, Einthovenweg 20 Room S-04-038 Phone: 071-526 9439 E-mail: m.van_iterson...@lumc.nl --------------- Postal address: Postzone S-04-P Postbus 9600 2300 RC Leiden The Netherlands ______________________________________________ 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. LEGAL NOTICE This message is intended for the use o...{{dropped:9}} ______________________________________________ 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.
