私はクラスを持っている1つのベクトル

Question

を返すために、カスタムタイプの2つのベクトルを組み合わせる：

これら二つのリストを考えると

case class Custom(label: String, num: Long) 

：

val l1 = Vector(Custom("a", 1), Custom("aa", 1)) 
val l2 = Vector(Custom("a", 1)) 

私は結果のリストを取得したい：

val l3 = Vector(Custom("a", 2), Custom("aa", 1)) 

私はこのようにfoldを使用しようとしました：

l1.foldLeft(l2)((acc: List[Custom], el: Custom) => { 
    val itemWithIndex: Option[(Custom, Int)] = acc.zipWithIndex.find(_._1.label == el.label) 
    itemWithIndex match { 
    case Some(x) => acc.updated(x._2, Custom(el.label, acc(x._2).num + el.num)) 
    case None => el :: acc 
    } 
}) 

この実装は、アキュムレータ（l2）を3回、l1を1回反復します。私はより効率的なソリューションを探しています。

Answer 1

import scalaz.syntax.monoid._ 
    case class Custom(label: String, num: Long) 
    val l1 = Vector(Custom("a", 1), Custom("aa", 1)) 
    val l2 = Vector(Custom("a", 1)) 

    def toM(v: Vector[Custom]): Map[String, Long] = { 
    (v map (cus ⇒ cus.label → cus.num)).toMap 
    } 

    def fromM(m: Map[String, Long]): Vector[Custom] = { 
    m.map{case (l , num) ⇒ Custom(l, num)}.toVector 
    } 

    implicit val myMonoid = new Monoid[Vector[Custom]] { 
    import scalaz.std.anyVal.longInstance 
    val mm = scalaz.std.map.mapMonoid[String, Long] 

    override def zero: Vector[Custom] = fromM(mm.zero) 

    override def append(f1: Vector[Custom], f2: ⇒ Vector[Custom]): Vector[Custom] = fromM(mm.append(toM(f1), toM(f2))) 
    } 



    println(l1 |+| l2) \\Vector(Custom(a,2), Custom(aa,1)) 

あなたがより明確になりたい場合は、同型のインスタンスにtoMとfromMを抽出することができます。

Answer 2

は、ブライアンは、単純にそうように手の前にリストを組み合わせるための素敵な提案を与えた：

(l1 ++ l2) 
    .groupBy(_.label) 
    .map { 
    case (label, customs) => Custom(label, customs.map(_.num).sum) 
    } 

をgroupByは私たちにList[Custom]が同じラベルを持つすべてのオブジェクトCustomあるMap[String, List[Custom]]を与えます。残ってすべてのことはListことをまとめると、各ラベルについては、この合計と新しいCustomオブジェクトを作成することです。

これが削減されるので、モノイドにすることができます。

implicit def customMonoid = new Monoid[Vector[Custom]] { 
    override def append(l1: Vector[Custom], l2: => Vector[Custom]): Vector[Custom] = 
    (l1 ++ l2) 
     .groupBy(_.label) 
     .map { 
     case (a, b) => Custom(a, b.map(_.num).sum) 
     }.toVector 

    override def zero: Vector[Custom] = Vector.empty[Custom] 
}