Displaying 1 result from an estimated 1 matches for "f_k3".
Did you mean:
f_3
2011 Jul 01
0
How to filter XY pairs of inacurate gps position along track, taking into account the time index to not mix track from different days in one average track
...plot(Raw$Lon,Raw$Lat,type="l",main = "lowess()")
f_k2=0.3
Raw$Lon_v2<-(lowess(x=Raw$Lon, y=Raw$Lat,f=f_k2))$x
Raw$Lat_v2<-(lowess(x=Raw$Lon, y=Raw$Lat,f=f_k2))$y
points(Raw$Lon_v2,Raw$Lat_v2,col=2,pch='+')
lines(Raw$Lon_v2,Raw$Lat_v2,col=2)
f_k3=0.6
Raw$Lon_v2<-(lowess(x=Raw$Lon, y=Raw$Lat,f=f_k3))$x
Raw$Lat_v2<-(lowess(x=Raw$Lon, y=Raw$Lat,f=f_k3))$y
points(Raw$Lon_v2,Raw$Lat_v2,col=3,pch='x')
lines(Raw$Lon_v2,Raw$Lat_v2,col=3,lwd=2)
legend(Raw$Lon_v2[1],Raw$Lat_v2[1], c(paste("f = ", c(rou...