Rozwiń zestaw [Ustaw [ciąg]] na produkt kartezjański w Scali

Question

Mam następujący zestaw zestawów. Nie wiem z góry, jak długo to potrwa.

val sets = Set(Set("a","b","c"), Set("1","2"), Set("S","T")) 

Chciałbym rozszerzyć go na iloczyn kartezjański:

Set("a&1&S", "a&1&T", "a&2&S", ..., "c&2&T") 

Jak to zrobić?

Answer 1

Chyba wymyśliłem, jak to zrobić.

def combine(acc:Set[String], set:Set[String]) = for (a <- acc; s <- set) yield { 
    a + "&" + s 
} 

val expanded = sets.reduceLeft(combine) 

expanded: scala.collection.immutable.Set[java.lang.String] = Set(b&2&T, a&1&S, 
    a&1&T, b&1&S, b&1&T, c&1&T, a&2&T, c&1&S, c&2&T, a&2&S, c&2&S, b&2&S) 

Answer 2

Ładne pytanie. Oto jeden ze sposobów:

scala> val seqs = Seq(Seq("a","b","c"), Seq("1","2"), Seq("S","T"))     
seqs: Seq[Seq[java.lang.String]] = List(List(a, b, c), List(1, 2), List(S, T)) 

scala> val seqs2 = seqs.map(_.map(Seq(_))) 
seqs2: Seq[Seq[Seq[java.lang.String]]] = List(List(List(a), List(b), List(c)), List(List(1), List(2)), List(List(S), List(T))) 

scala> val combined = seqs2.reduceLeft((xs, ys) => for {x <- xs; y <- ys} yield x ++ y) 
combined: Seq[Seq[java.lang.String]] = List(List(a, 1, S), List(a, 1, T), List(a, 2, S), List(a, 2, T), List(b, 1, S), List(b, 1, T), List(b, 2, S), List(b, 2, T), List(c, 1, S), List(c, 1, T), List(c, 2, S), List(c, 2, T)) 

scala> combined.map(_.mkString("&"))    
res11: Seq[String] = List(a&1&S, a&1&T, a&2&S, a&2&T, b&1&S, b&1&T, b&2&S, b&2&T, c&1&S, c&1&T, c&2&S, c&2&T) 

Answer 3

Przyszedł po Batle;) ale jeszcze jeden:

sets.reduceLeft((s0,s1)=>s0.flatMap(a=>s1.map(a+"&"+_))) 

Answer 4

Rozszerzając @Patrick's answer. Teraz jest bardziej ogólny i leniwy:

def combine[A](f:(A, A) => A)(xs:Iterable[Iterable[A]]) = 
    xs.reduceLeft { (x, y) => x.view.flatMap {a => y.map(f(a, _)) } } 

Mając to leń pozwala zaoszczędzić miejsce, ponieważ nie przechowywać wykładniczo wiele przedmiotów w rozszerzonym zestawie; zamiast tego generujesz je w locie. Ale jeśli rzeczywiście chcą pełny zestaw, nadal można dostać go tak:

val expanded = combine{(x:String, y:String) => x + "&" + y}(sets).toSet 

Answer 5

Rozszerzając dsg's answer, można napisać jaśniej (chyba) w ten sposób, jeśli nie przeszkadza curry funkcja:

def combine[A](f: A => A => A)(xs:Iterable[Iterable[A]]) = 
    xs reduceLeft { (x, y) => x.view flatMap { y map f(_) } } 

Inną alternatywą (nieco dłużej, ale o wiele bardziej czytelny):

def combine[A](f: (A, A) => A)(xs:Iterable[Iterable[A]]) = 
    xs reduceLeft { (x, y) => for (a <- x.view; b <- y) yield f(a, b) } 

Zastosowanie:

combine[String](a => b => a + "&" + b)(sets) // curried version 

combine[String](_ + "&" + _)(sets)    // uncurried version