Средство, с помощью которого вы можете указать CI, немного странно, но это можно легко сделать, если вы знаете, как.
См. Функцию crit<-
, страница справки которой иллюстрирует ее использование в этом примере.
library(locfit)
data(ethanol)
fit <- locfit(NOx~E,data=ethanol)
crit(fit) <- crit(fit,cov=0.99)
plot(fit,band="local")