# NOT RUN {
data(plodia)
y <- sqrt(plodia)
x <- 1:length(y)
#make some missing values
y[10:19] <- NA; x[10:19] <- NA
#omit NAs
y <- na.omit(y); x <- na.omit(x)
#the lomb p'gram
fit <- spec.lomb(y, x)
summary.lomb(fit)
# }
# NOT RUN {
plot.lomb(fit)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab