The output here is not as desired. The initial dotchart prints properly, but
the subsequent points are off - as if the points function cannot determine
the grouping. If I change the grouping to the trivial: grp <-
as.factor(c(rep(c('Small'),9))), the chart works as expected. I am
obviously missing something simple. Any ideas?