Open andrejadd opened 7 years ago
Its inside the function for the panel argument of xyplot. I commented it out for now.
lattice::xyplot(Result.Corr.ND ~ as.Date(SampleDate) | WellName, | data = Cont.Data, | groups = as.character(Cont.Data$ND), | panel = function(x, y,groups,subscripts) { |
groupNDx <- x[groups[subscripts] == "TRUE"] | groupNDy <- y[groups[subscripts] == "TRUE"] | panel.xyplot(groupNDx,groupNDy,col = "orange", pch = 19, cex = 1.0) |
Its inside the function for the panel argument of xyplot. I commented it out for now.
lattice::xyplot(Result.Corr.ND ~ as.Date(SampleDate) | WellName, | data = Cont.Data, | groups = as.character(Cont.Data$ND), | panel = function(x, y,groups,subscripts) { |
try(csite.grid(h = -1, v = 2)) |