Summarizes information about ds_radf object.
Usage
# S3 method for class 'ds_radf'
tidy(x, ...)Examples
# \donttest{
rsim_data <- radf(sim_data)
ds_data <- datestamp(rsim_data)
#> Using `radf_crit` for `cv`.
# One row per detected explosive episode, across all series
tidy(ds_data)
#> # A tibble: 8 × 7
#> id Start Peak End Duration Signal Ongoing
#> <fct> <dbl> <dbl> <dbl> <dbl> <chr> <lgl>
#> 1 psy1 44 48 56 12 positive FALSE
#> 2 psy2 22 40 41 19 positive FALSE
#> 3 psy2 62 70 71 9 positive FALSE
#> 4 evans 20 20 21 1 positive FALSE
#> 5 evans 44 44 45 1 positive FALSE
#> 6 evans 66 67 68 2 positive FALSE
#> 7 blan 34 36 37 3 positive FALSE
#> 8 blan 84 86 87 3 positive FALSE
# Feeds straight into ggplot2 if autoplot()'s default layout isn't wanted
library(ggplot2)
tidy(ds_data) %>%
ggplot(aes(y = id)) +
geom_segment(aes(x = Start, xend = End, yend = id), linewidth = 3)
# }