Summarize the solution to an L0 segmentation problem

# S3 method for spike_estimates
summary(object, ...)

Arguments

object	output from running spike_estimates
...	to be passed to methods

Value

A data frame with a column of estimated spikes

Examples

gam <- 0.98
LAMBDA <- 0.7
sigma <- 0.3
n_length <- 1000
curr_sim <- simulate_ar1(n = n_length, gam = gam, poisMean = 0.01, sd = sigma, seed = 2)
curr_fit_spike <- spike_estimates(dat = curr_sim$fl, decay_rate = gam, tuning_parameter = LAMBDA)
summary(curr_fit_spike)
#>    spikes
#> 1      95
#> 2     237
#> 3     369
#> 4     463
#> 5     503
#> 6     515
#> 7     538
#> 8     561
#> 9     571
#> 10    610
#> 11    627
#> 12    662
#> 13    781
#> 14    914
#> 15    924
#> 16    946