search for: tppos

Happy New Year, r-helpers! I am using lowess to smooth a scatter plot, xx<-lowess(xinput,f=.04) #defaults for other args followed by turnpoints(xx$y) #defaults for other args I plot the smoothed result as well as turnpoints (using yy$tppos) on top of raw data plot. Result is exactly as expected, graphically. For another purpose, I calcuate the difference between turnpoints (representing time intervals between turnspoints in my applicaiton), e.g. aduration[j]<-yy$tppos[i+1]-yytppos[i] This also appears to work as expected, HOWEV...