horizon=length(data$getSerie(1)), simtype="endo", local=FALSE, h_window=1)
f = computeFilaments(data, pred, 1, 8, limit=60, plot=FALSE)
# Expected output: 50-3-10 series of type 2, then 23 series of type 3 (closest next)
expect_identical(length(f$neighb_indices), as.integer(60))
expect_identical(length(f$colors), as.integer(60))
horizon=length(data$getSerie(1)), simtype="endo", local=FALSE, h_window=1)
f = computeFilaments(data, pred, 1, 8, limit=60, plot=FALSE)
# Expected output: 50-3-10 series of type 2, then 23 series of type 3 (closest next)
expect_identical(length(f$neighb_indices), as.integer(60))
expect_identical(length(f$colors), as.integer(60))