Yep, that was it. Needed to remove neg freq from opposite end of s[] coef<- 1-(((1:n)>8-1) & ((1:n)<8+1) | (((1:n)>(n-6)-1) & ((1:n)<(n-6)+1)) )
Sorry to bother you. Cheers Bill ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
