[R] Color of the plot which correspond to the group of the observations

[Richard M. Heiberger]

It is easier in lattice

dp <- c(1,4,3,2,5,7,9,8,9,2)
tp <- 1:10
gg <- rep(1:3, c(3,3,4))
ddff <- data.frame(dp=dp, tp=tp, gg=gg)
xyplot(dp ~ tp, groups=gg, data=ddff)