Smooth longitude, latitude and altitude.
smooth_positions(df, n = 5, type = "t")
a data frame of trajectory positions
from pracma::movavg
from pracma::movavg
return a smoothed trajectory
Other analysis:
cumulative_distance()
,
cumulative_time()
,
extract_segment()
,
filter_outlier()
data(list = c("egll_positions_fr24"), package = "trrrj")
smooth_positions(egll_positions_fr24)
#> # A tibble: 12,483 × 8
#> # Groups: flight_id [37]
#> flight_id event_time longitude latitude altitude speed on_ground
#> <chr> <dttm> <dbl> <dbl> <dbl> <dbl> <dbl>
#> 1 e5259c3 2017-08-02 07:28:14 50.6 26.3 1975 196 0
#> 2 e5259c3 2017-08-02 07:29:29 50.6 26.3 2244. 272 0
#> 3 e5259c3 2017-08-02 07:39:11 50.5 26.4 4307. 410 0
#> 4 e5259c3 2017-08-02 07:38:50 50.4 26.6 8379. 418 0
#> 5 e5259c3 2017-08-02 07:25:10 50.3 26.8 11933. 15 1
#> 6 e5259c3 2017-08-02 07:24:01 50.3 26.8 11261. 18 1
#> 7 e5259c3 2017-08-02 07:30:48 50.4 26.6 7178. 274 0
#> 8 e5259c3 2017-08-02 07:42:42 50.5 26.5 6142. 447 0
#> 9 e5259c3 2017-08-02 07:28:50 50.4 26.6 7619. 238 0
#> 10 e5259c3 2017-08-02 07:40:27 50.2 26.9 12389. 427 0
#> # ℹ 12,473 more rows
#> # ℹ 1 more variable: vert_speed <dbl>