add a line between all archetypes

.archLines(arc_data, arc_lab = "archetypes", pch_fit = TRUE,
  type = c("average", "all")[1], average_func = mean)

Arguments

arc_data	data.table that contains positions of archetypes
arc_lab	labels for archetypes
pch_fit	not used
type	average across arc_lab (average)?