Hi Phil,
Thanks for the quick response. Here's a minimal dput of my dataset. Along with previous info, is this enough to reproduce?
Best,
-Kevin
> dput(e7060[1:50,])
structure(list(da = c(3L, 5L, 8L, 6L, 8L, 7L, 6L,
8L, 8L, 4L, 6L, 5L, 5L, 6L, 6L, 6L, 4L, 6L, 6L, 5L, 5L, 5L, 6L,
6L, 5L, 5L, 6L, 6L, 5L, 5L, 5L, 5L, 5L, 5L, 6L, 5L, 6L, 3L, 5L,
7L, 6L, 5L, 0L, 6L, 3L, 8L, 7L, 8L, 3L, 3L), ps = c(5L,
5L, 1L, 7L, 8L, 2L, 3L, 7L, 5L, 5L, 6L, 5L, 6L, 6L, 6L, 4L, 5L,
5L, 7L, 6L, 6L, 6L, 6L, 6L, 5L, 5L, 6L, 6L, 6L, 5L, 6L, 5L, 2L,
5L, 6L, 6L, 6L, 5L, 6L, 6L, 6L, 5L, 0L, 7L, 2L, 7L, 4L, 7L, 4L,
3L), pm = c(2L, 3L, 8L, 3L, 1L, 7L, 6L, 6L, 8L,
4L, 6L, 6L, 4L, 6L, 6L, 8L, 5L, 6L, 6L, 5L, 4L, 5L, 6L, 3L, 6L,
6L, 8L, 6L, 4L, 6L, 3L, 4L, 0L, 6L, 6L, 6L, 6L, 7L, 7L, 6L, 8L,
7L, 0L, 6L, 2L, 8L, 8L, 6L, 1L, 3L), ru = c(4L,
2L, 1L, 6L, 1L, 2L, 3L, 5L, 5L, 6L, 6L, 5L, 3L, 5L, 5L, 5L, 3L,
5L, 8L, 6L, 6L, 5L, 6L, 7L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 5L, 0L,
6L, 6L, 5L, 6L, 5L, 6L, 4L, 6L, 6L, 0L, 7L, 3L, 7L, 4L, 5L, 3L,
2L), hcp = c(2L, 5L, 5L, 5L, 8L, 2L, 3L, 4L,
8L, 4L, 6L, 5L, 5L, 6L, 5L, 4L, 5L, 5L, 7L, 7L, 6L, 6L, 6L, 7L,
5L, 5L, 6L, 6L, 6L, 5L, 6L, 5L, 0L, 5L, 6L, 6L, 6L, 6L, 6L, 6L,
6L, 5L, 0L, 7L, 2L, 7L, 8L, 4L, 2L, 2L), ircs = c(4L,
4L, 8L, 4L, 8L, 7L, 6L, 5L, 5L, 5L, 6L, 6L, 6L, 6L, 6L, 5L, 0L,
6L, 7L, 6L, 6L, 7L, 6L, 3L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 0L,
6L, 6L, 5L, 7L, 7L, 4L, 6L, 6L, 6L, 0L, 7L, 1L, 8L, 8L, 5L, 2L,
2L), cp = c(2L, 5L, 1L, 5L, 1L,
2L, 3L, 6L, 8L, 4L, 6L, 4L, 7L, 6L, 6L, 4L, 0L, 7L, 6L, 7L, 5L,
6L, 6L, 6L, 7L, 7L, 5L, 6L, 5L, 7L, 5L, 6L, 0L, 7L, 5L, 6L, 6L,
6L, 5L, 6L, 7L, 7L, 0L, 6L, 2L, 8L, 5L, 6L, 2L, 2L), cc = c(4L,
4L, 8L, 4L, 1L, 7L, 6L, 7L, 5L, 4L, 6L, 6L, 6L, 6L, 6L, 8L, 0L,
6L, 6L, 6L, 6L, 6L, 0L, 7L, 6L, 6L, 6L, 8L, 6L, 6L, 3L, 5L, 0L,
6L, 6L, 5L, 6L, 6L, 6L, 6L, 6L, 6L, 0L, 6L, 2L, 8L, 8L, 7L, 3L,
2L)), .Names = c("da", "ps", "pm",
"ru", "hcp", "ircs", "cp", "cc"), row.names = c(NA,
50L), class = "data.frame")