Influence.measures using LOESS

Is it possible to use influence.measures from the result obtained with LOESS? For example, be the following excerpt:

x <- 1:120 
y <- sin(2*pi*x/period) + runif(length(x),-1,1)
plot(x,y, main="Sine Curve + 'Uniform' Noise")
y.loess <- loess(y ~ x, span=0.75, data.frame(x=x, y=y))
xl <- seq(min(x),max(x), (max(x) - min(x))/1000)
y.predict <- predict(y.loess, xl)
lines(xl,y.predict);

I want to know what are the outliers of the sample, such as we get in the influence.measures. Using LOESS is it possible to know?