## this example shows a problem in key.
tmp <- data.frame(y=rnorm(10), g=rep(ordered(c("A","B")), 5))
bwplot(y ~ g, data=tmp,
       key=list(
         text=list(c("A","B"), col=c("blue","red")),
         points=list(pch=c(17, 16), col=c("blue","red")),
         space="top", columns=2, border=TRUE,
         title="Treatment", cex.title=.9
         )
       )
## The example works without warning messages in 2.15.1.
## I first detected the problem in
##### R Under development (unstable) (2012-07-24 r59961) ## windows
##### R Under development (unstable) (2012-08-02 r60091) ## macintosh
## The problem still exists in
## R Under development (unstable) (2012-08-13 r60245) -- "Unsuffered
Consequences"
## downloaded from lib.stat.cmu.edu Wed Aug 15 2012 11PM EST


> tmp <- data.frame(y=rnorm(10), g=rep(ordered(c("A","B")), 5))
> bwplot(y ~ g, data=tmp,
+        key=list(
+          text=list(c("A","B"), col=c("blue","red")),
+          points=list(pch=c(17, 16), col=c("blue","red")),
+          space="top", columns=2, border=TRUE,
+          title="Treatment", cex.title=.9
+          )
+        )
Warning messages:
1: In FUN(X[[9L]], ...) : 'x' is NULL so the result will be NULL
2: In FUN(X[[9L]], ...) : 'x' is NULL so the result will be NULL
3: In FUN(X[[9L]], ...) : 'x' is NULL so the result will be NULL
4: In FUN(X[[9L]], ...) : 'x' is NULL so the result will be NULL
5: In FUN(X[[9L]], ...) : 'x' is NULL so the result will be NULL
> version
               _
platform       i386-w64-mingw32
arch           i386
os             mingw32
system         i386, mingw32
status         Under development (unstable)
major          2
minor          16.0
year           2012
month          08
day            13
svn rev        60245
language       R
version.string R Under development (unstable) (2012-08-13 r60245)
nickname       Unsuffered Consequences
>

	[[alternative HTML version deleted]]

