title: How can I specify a specific 'fill' for points in a lattice plot key?
body: <p>A simple example of what I hope would work:</p>
  
  <pre><code>library(lattice)
  xyplot(1~1, 
    key=list( 
      text=list( c("a", "b") ), 
      points=list(pch=21, fill=c("red", "blue")) ## note pch=21 =&gt; filled circle
    )
  )
  </code></pre>
  
  <p>One would expect the points being used in the legend would be filled red, but this doesn't seem to be the case. As a parallel, this code works as expected:</p>
  
  <pre><code>xyplot(1~1, 
    key=list( 
      text=list( c("a", "b") ), 
      points=list(pch=21, col=c("red", "blue"))
    )
  )
  </code></pre>
  
  <p>Any ideas how I can force lattice to use a specific fill for the legend points?</p>