Włóż element pomiędzy każdymi dwoma sąsiednimi elementami SEQ

Question

Na przykład, mam sekw (1,2,3) i chcę dostać Seq (1,0,2,0,3)

Pierwszą rzeczą to przychodzi na myśl:

scala> Seq(1,2,3).flatMap(e => 0 :: e :: Nil).tail 
    res17: Seq[Int] = List(1, 0, 2, 0, 3) 

Czy jest jakaś lepsza/bardziej elegancka opcja?

Answer 1

spróbować zrozumieniem:

for(i <- list; p <- List(0, i)) yield p 

Jednak trzeba jakoś usunąć pierwszy element (to daje: 0,1,0,2,0,3), albo przez:

(for(i <- list; p <- List(0, i)) yield p).tail 

lub:

list.head :: (for(i <- list.tail; p <- List(0, i)) yield p) 

Answer 2

Tutaj to inne podejście:

def intersperse[E](x: E, xs:Seq[E]): Seq[E] = (x, xs) match { 
    case (_, Nil)  => Nil 
    case (_, Seq(x)) => Seq(x) 
    case (sep, y::ys) => y+:sep+:intersperse(sep, ys) 
} 

która jest bezpieczna również przy pustym Seq s.