R help - Apr 2011 - bwlpot problems: printing, and tick labels

Two problems with the code below. 

A. It produces empty JPEGs. When the 'bwplot' line alone is submitted,
the
plot duly shows up.
B. When the 'bwplot' line alone is submitted, y labels are values 1 to
6,
not actual distinct values of y$maxthreads.
(C. I would, of course, prefer to produce plots for all distinct values of
x$maxthreads in a single swoop, on a single figure). 

Can anyone help?

Thank you.



library(lattice)
options(stringsAsFactors = F)

x = structure(list(mode = c("serial", "parallel",
"parallel", "parallel",
"serial", "parallel", "parallel",
"parallel", "parallel", "serial",
"parallel", "parallel", "parallel",
"parallel", "parallel", "serial",
"parallel", "parallel", "parallel",
"serial", "parallel", "parallel",
"parallel", "parallel", "serial",
"parallel", "parallel", "parallel",
"parallel", "parallel"), tasks = c(4L, 4L, 4L, 4L, 8L, 8L,
8L,
8L, 8L, 16L, 16L, 16L, 16L, 16L, 16L, 4L, 4L, 4L, 4L, 8L, 8L, 
8L, 8L, 8L, 16L, 16L, 16L, 16L, 16L, 16L), maxthreads = c(0L, 
1L, 2L, 4L, 0L, 1L, 2L, 4L, 8L, 0L, 1L, 2L, 4L, 8L, 16L, 0L, 
1L, 2L, 4L, 0L, 1L, 2L, 4L, 8L, 0L, 1L, 2L, 4L, 8L, 16L), rep = c(1L, 
1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 2L, 2L, 
2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L), task = c(0L, 
0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 
0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L), time = c(1828L, 
1781L, 1656L, 2171L, 3281L, 3984L, 3468L, 2921L, 4015L, 7218L, 
7828L, 8093L, 6750L, 7515L, 8703L, 1734L, 2218L, 2343L, 2171L, 
3468L, 5281L, 3843L, 3687L, 3734L, 7156L, 8890L, 8937L, 7343L, 
7921L, 9203L), result = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, 
NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 
NA, NA, NA, NA, NA), success = c("True", "True",
"True", "True",
"True", "True", "True", "True",
"True", "True", "True", "True",
"True", "True", "True", "True",
"True", "True", "True", "True",
"True", "True", "True", "True",
"True", "True", "True", "True",
"True", "True")), .Names = c("mode",
"tasks", "maxthreads", "rep",
"task", "time", "result", "success"),
class = "data.frame", row.names c(NA,
-30L))

tt = unique(x$tasks)

for(i in 1:length(tt))
{
  y = subset(x, tasks = tt[i], select = c(maxthreads, rep, time)) 
  file = ...
  jpeg(file, height = 600, width = 1200)
  bwplot(maxthreads ~ time, 
       data = y,
       ylab = "maxthreads", 
       xlab = "time, ms")
  dev.off()
}

--
View this message in context:
http://r.789695.n4.nabble.com/bwlpot-problems-printing-and-tick-labels-tp3478504p3478504.html
Sent from the R help mailing list archive at Nabble.com.

> A. It produces empty JPEGs. When the 'bwplot' line alone is
submitted, the
> plot duly shows up.
See FAQ:

http://cran.r-project.org/doc/FAQ/R-FAQ.html#Why-do-lattice_002ftrellis-graphics-not-work_003f

BTW: don't use jpg for plotting if you can - they routinely look ugly.
> B. When the 'bwplot' line alone is submitted, y labels are values 1
to 6,
> not actual distinct values of y$maxthreads.
That's because maxthreads is not a factor - you can convert it to one.
See below.
> (C. I would, of course, prefer to produce plots for all distinct values of
> x$maxthreads in a single swoop, on a single figure). 
That's what I was about to suggest. Don't loop over the tasks - use
the power of lattice. I think this should be close to what you want:

bwplot(factor(maxthreads) ~ time | factor(tasks), x)

cu
	Philipp


-- 
Dr. Philipp Pagel
Lehrstuhl f?r Genomorientierte Bioinformatik
Technische Universit?t M?nchen
Wissenschaftszentrum Weihenstephan
Maximus-von-Imhof-Forum 3
85354 Freising, Germany
http://webclu.bio.wzw.tum.de/~pagel/