data(PalateData)
res <- levelplot(PalateData[, c(1,5,9,2:4,6:8)],
channel="G", group="probe.type",
subset=c("MMU miRNAs", "Other miRNAs", "Control", "Empty"),
scales = list(rot=c(45, 45)))
print(res)
Run the code above in your browser using DataLab