# noir: Neighbors non-local (p1), bleu: Neighbors local endo (p2), mauve: Neighbors local none (p3),
# vert: moyenne (p4), rouge: persistence (p5)
-i_np = which.min(e_n$abs$indices)
-i_p = which.max(e_n$abs$indices)
+i_np = which.min(e1$abs$indices)
+i_p = which.max(e1$abs$indices)
-----r
options(repr.plot.width=9, repr.plot.height=4)
par(mfrow=c(1,2))