[R] lattice, xyplot, lend=1, type="h"

[Andy Bunn]

Is there is a way to make square bars in xyplot with type="h"?

dat <- data.frame(foo = rep(1:10,2), bar = rep(1:10,2))
xyplot(foo~bar, data = dat, type="h",lwd=20)

Thanks! Andy