Разверните Set [Set [String]] в декартово произведение в Scala

У меня есть следующий набор множеств. Я не знаю заранее, как долго это будет.

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

Я хотел бы разложить его на декартово произведение:

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

Как вы это сделаете?

Ответ 1

Думаю, я понял, как это сделать.

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)

Ответ 2

Хороший вопрос. Здесь один из способов:

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)

Ответ 3

Пришел после батла;), но еще один:

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

Ответ 4

Расширение на @Patrick answer. Теперь он более общий и ленивый:

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

Наличие ленив позволяет вам экономить место, поскольку вы не храните экспоненциально много элементов в расширенном наборе; вместо этого вы создаете их на лету. Но, если вы действительно хотите полный набор, вы все равно можете получить его так:

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

Ответ 5

Развернувшись на dsg answer, вы можете записать его более четко (я думаю) таким образом, если вы не против функции карри:

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

Другая альтернатива (немного длиннее, но гораздо более читаемая):

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) }

Использование:

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

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