Scalaz 将计算拆分为子部分

Question

我有一个非常大的 List[A] 和一个函数 f: List[A] =>;列表[B]。我想将原始列表拆分为具有最大大小的子列表，依次将函数应用于每个子列表，然后取消将结果拆分为一个大列表[B]。这很简单：

def split[T](l : List[T], max : Int) : List[List[T]] = //TODO

def unsplit[T](l : List[List[T]]) : List[T] = //TODO

def apply[A, B](l : List[A], f : List[A] => List[B], max : Int) : List[B] = {
  unsplit(split(l, max).map(f(_)))
}

我想知道 scalaz 是否提供了开箱即用的标准内容？特别是 apply 方法？

Answer 1

unsplit 它只是 MA#join，对于任何 M[M[A]]，其中 M 是 >单子。

split 并不现成存在。以下是一种绕行的方法，更多地演示了一些 Scalaz 概念。它实际上在编译器中触发了堆栈溢出！

val ls = List(1, 2, 3, 4, 5)
val n = 5

def truesAndFalses(n: Int): Stream[Boolean] = 
  Stream.continually(true.replicate[Stream](n) |+| false.replicate[Stream](n)).join

val grouped: List[List[Int]] = {
  var zipped: List[(Int, Boolean)] = ls.zip(truesAndFalses(2))
  var groupedWithBools: List[List[(Int, Boolean)]] = zipped splitWith {_._2}
  groupedWithBools ∘∘ {pair: (Int, _) => pair._1}
}

val joined: List[Int] = grouped ∘∘ {_ * 2} join

Answer 2

这个怎么样：

def split[T](ls: List[T],max: Int): List[List[T]] = ls.grouped(max).toList

def unsplit[T](ls: List[List[T]]): List[T] = ls.flatMap(identity)