Works beautifully.

Thanks!

--
Noah Silverman
UCLA Department of Statistics
8117 Math Sciences Building
Los Angeles, CA 90095

On Oct 24, 2011, at 1:32 PM, (Ted Harding) wrote:

>  ix <- which(Seg[1013:1046] > 0)
>  lines((1013:1046)[ix], Seg[1013:1046][ix], col=2)


	[[alternative HTML version deleted]]

