Re: [R] how to make the far right section of a smoother line look different from the rest of that line?

Where did you get panel.smoother()? There is no such panel function in lattice. Is something like this what you want? x <- 1:100 y <- rnorm(100, mean =5) end <- 91 # tentative smooth after this xyplot(y ~x, cutoff = end, col1 = "black", col2 = "red" , panel = function(x, y, col1, col2,

[R] how to make the far right section of a smoother line look different from the rest of that line?

eclrs.3 %>% mutate(start.week = floor_date(realCollectionDate, unit = "week")) %>% group_by(start.week, k12) %>% summarise(n = n(), pctpos = 100 * mean(realResult)) %>% xyplot(pctpos ~ start.week | k12, col = "red", data = ., layout = c(1,2), ylab = "percent of test results positive", xlab =