如何让这段代码更实用？

Question

我是功能性编程的新手。我只是试图解决以下问题：

[ a rough specification ] 

e.g.1: 
dividend : {3,5,9} 
divisor : {2,2} 
radix = 10 
ans (remainder) : {7} 

Procedure : 
dividend = 3*10^2+5*10^1+9*10^0 = 359 
similarly, divisor = 22 
so 359 % 22 = 7 

e.g.2: 
dividend : {555,555,555,555,555,555,555,555,555,555} 
divisor: {112,112,112,112,112,112,112,112,112,112} 
radix = 1000 
ans (remainder) : {107,107,107,107,107,107,107,107,107,107} 

我对这个问题的解决方案是：

object Tornedo { 
    def main(args: Array[String]) { 
    val radix: BigInt = 1000 
    def buildNum(segs: BigInt*) = (BigInt(0) /: segs.toList) { _ * radix + _ } 
    val dividend = buildNum(555,555,555,555,555,555,555,555,555,555) 
    val divisor = buildNum(112,112,112,112,112,112,112,112,112,112) 
    var remainder = dividend % divisor 
    var rem = List[BigInt]() 
    while(remainder > 0) { 
     rem = (remainder % radix) :: rem 
     remainder /= radix 
    } 
    println(rem) 
    } 
} 

虽然我非常满意这个代码，我想知道如何消除while循环&两个可变变量并使这个代码更加有用。

任何帮助将不胜感激。

谢谢。在斯卡拉2.8 :)

Answer 1

这尾递归函数删除你的两个可变var和循环：

object Tornedo { 
    def main(args: Array[String]) { 
    val radix: BigInt = 1000 
    def buildNum(segs: BigInt*) = (BigInt(0) /: segs.toList) { _ * radix + _ } 
    val dividend = buildNum(555,555,555,555,555,555,555,555,555,555) 
    val divisor = buildNum(112,112,112,112,112,112,112,112,112,112) 
    def breakup(n: BigInt, segs: List[BigInt]): List[BigInt] = 
     if (n == 0) segs else breakup(n/radix, n % radix :: segs) 
    println(breakup(dividend % divisor, Nil)) 
    } 
} 

Answer 2

尾递归解决方案：

def reradix(value: BigInt, radix: BigInt, digits:List[BigInt] = Nil): List[BigInt] = { 
    if (remainder==0) digits 
    else reradix(value/radix ,radix ,(value % radix) :: digits) 
} 

的想法通常是一段时间转换到您跟踪沿途您的解决方案的递归解决方案（因此它可以是尾递归，因为它在这里）。如果改为使用

(value % radix) :: reradix(value/radix, radix) 

也将计算的解决方案，但它不会是尾递归，因此部分答案将得到压入堆栈。使用默认参数，添加一个允许您存储累积答案并使用尾递归的最终参数在语法上很好，因为您可以拨打reradix(remainder,radix)并免费传入Nil。

Answer 3

我认为这是解决问题相当昂贵的方式，但很直观的一个恕我直言：

scala> Stream.iterate(255)(_/10).takeWhile(_ > 0).map(_ % 10).reverse 
res6: scala.collection.immutable.Stream[Int] = Stream(2, 5, 5) 

Answer 4

拉胡尔，正如我所说的，在Scala中有不是和unfold函数。在Scalaz中有一个，所以我要使用那个来展示解决方案。下面的解决方案是简单地适应Patrick'sanswer使用展开而不是递归。

import scalaz.Scalaz._ 

object Tornedo { 
    def main(args: Array[String]) { 
    val radix: BigInt = 1000 
    def buildNum(segs: BigInt*) = (BigInt(0) /: segs.toList) { _ * radix + _ } 
    val dividend = buildNum(555,555,555,555,555,555,555,555,555,555) 
    val divisor = buildNum(112,112,112,112,112,112,112,112,112,112) 
    val unfoldingFunction = (n: BigInt) => 
     if (n == 0) None else Some((n % radix, n/radix)) 
    println((dividend % divisor).unfold[List, BigInt](unfoldingFunction)) 
    } 
}