泛函编程（8）－数据结构－Tree

上节介绍了泛函数据结构List及相关的泛函编程函数设计使用，还附带了少许多态类型（Polymorphic Type）及变形（Type Variance）的介绍。有关Polymorphism的详细介绍会放在typeclass讨论中。为了更多了解泛函数据结构（Functional Data Structure）,想在这个章节把另一个我们熟悉的数据结构-Tree做些简单介绍。

Tree的状态不是枝（Branch）就是叶（Leaf），这个很容易理解。那么就按照上节设计List那样设计Tree类型：

   trait Tree[+A]
   case class Leaf[A](value: A) extends Tree[A]
   case class Branch[A](left: Tree[A], right: Tree[A]) extends Tree[A]

类参数+A代表协变（covariant），这个在上节List中已经介绍过了。先创建一个Tree实例（Tree Instance）：

  val tree = Branch(Branch(Leaf(1),Leaf(2)),Branch(Branch(Leaf(10),Leaf(8)),Leaf(3)))
                                                   //> tree  : ch3.tree.Branch[Int] = Branch(Branch(Leaf(1),Leaf(2)),Branch(Branch(
                                                   //| Leaf(10),Leaf(8)),Leaf(3)))

创建了一个Tree Instance tree，如下图：

数数有几个节点：

       def size: Int = this match {
           case Leaf(_) => 1
           case Branch(l,r) => 1 + l.size + r.size
       }

   tree size                                       //> res0: Int = 9

这是所有branch + leaf 总数。

分开计算branch 和 leaf 数量：

       def countLeafs: Int = this match {
           case Leaf(_) => 1
           case Branch(l,r) => 0 + l.size + r.size
       }
        def countBranches: Int = this match {
           case Leaf(_) => 0
           case Branch(l,r) => 1 + l.size + r.size
       }
  

   tree.countLeafs                                 //> res1: Int = 8
   tree.countBranches                              //> res2: Int = 9

探探最深有多深：

       def depth: Int = this match {
           case Leaf(_) => 0
           case Branch(l,r) => 1 + (l.depth max r.depth)
       }

   tree depth                                      //> res1: Int = 3

找出最大值的Leaf：

       def maxValue: Int = this match {
           case Leaf(a: Int) => a
           case Branch(l,r) => l.maxValue max r.maxValue
       }

  tree maxValue                                   //> res2: Int = 10

可以从以上这些函数得出一下共性。把共性抽象出来用fold来实现：

         def fold[B](f: A => B)(g: (B,B) => B): B = this match {
             case Leaf(n) => f(n)
             case Branch(l,r) => g(l.fold(f)(g), r.fold(f)(g))
         }

函数fold分别收到两个方法f,g：f用来处理Leaf，g用来处理Branch。看看用fold来实现上面的函数：

         def sizeByfold = fold(a => 1)(1 + _ + _)
         def maxValueByfold(l: Tree[Int]) = l.fold(a => a)((x,y) => 0 + (x max y))
         def depthByfold = fold(a => 0)((x,y) => 1 + (x max y))

   tree sizeByfold                                 //> res3: Int = 9

   tree depthByfold                                //> res4: Int = 3

   tree.maxValueByfold(tree)                       //> res5: Int = 10

可能这个 tree.maxValueByfold(tree) 有点怪，但如果把函数实现放到 object Tree里然后import Tree._就可以了。

下面把map和flatMap实现了：

       def map[B](f: A => B): Tree[B] = this match {
           case Leaf(a) => Leaf(f(a))
           case Branch(l,r) => Branch(l.map(f),r.map(f))
       }
       def flatMap[B](f: A => Tree[B]): Tree[B] = this match {
           case Leaf(a) => f(a)
           case Branch(l,r) => Branch(l.flatMap(f), r.flatMap(f))
       }