Drop all but the k largest observations.

thin(ctre, k)

Arguments

ctre

A ctre object.

k

Discard all but the k largest magnitudes.

Value

A ctre object, with fewer (k) observations.

Examples

library(magrittr) flares %>% ctre() %>% plot(log = 'y')
flares %>% ctre() %>% thin(k=500) %>% plot(log = 'y')