编辑:澄清问题的描述
是否有解决以下问题的快速算法?
而且,也适用于将自然数替换为 Z/(2^n Z) 的问题的扩展版本?(这个问题太复杂了,无法在一个地方添加更多问题,IMO。)
问题:
对于给定的一组自然数,如 {7, 20, 17, 100},所需的算法返回最短的加法、乘法和幂计算所有给定数字的序列。序列的每一项都是(正确的)方程式,符合以下模式:
<number> = <number> <op> <number>
其中 <number> 是一个自然数,<op> 是 {+, *, ^} 之一。
在序列中,<op> 的每个操作数都应该是
- 1
- 已经出现在等号左侧的数字。
例子:
Input: {7, 20, 17, 100}
Output:
2 = 1 + 1
3 = 1 + 2
6 = 2 * 3
7 = 1 + 6
10 = 3 + 7
17 = 7 + 10
20 = 2 * 10
100 = 10 ^ 2
我在 Haskell 中编写了回溯算法。它适用于像上面这样的小输入,但我的真实查询是在 [0,255] 中随机分布约 30 个数字。对于真正的查询,以下代码在我的电脑中需要 2~10 分钟。
我当前的(伪)代码:
-- generate set of sets required to compute n.
-- operater (+) on set is set union.
requiredNumbers 0 = { {} }
requiredNumbers 1 = { {} }
requiredNumbers n =
{ {j, k} | j^k == n, j >= 2, k >= 2 }
+ { {j, k} | j*k == n, j >= 2, k >= 2 }
+ { {j, k} | j+k == n, j >= 1, k >= 1 }
-- remember the smallest set of "computed" number
bestSet := {i | 1 <= i <= largeNumber}
-- backtracking algorithm
-- from: input
-- to: accumulator of "already computed" number
closure from to =
if (from is empty)
if (|bestSet| > |to|)
bestSet := to
return
else if (|from| + |to| >= |bestSet|)
-- cut branch
return
else
m := min(from)
from' := deleteMin(from)
foreach (req in (requiredNumbers m))
closure (from' + (req - to)) (to + {m})
-- recoverEquation is a function converts set of number to set of equation.
-- it can be done easily.
output = recoverEquation (closure input {})
附加说明:
像这样的答案
- 没有快速的算法,因为...
- 有一种启发式算法,它是...
也受到欢迎。现在我觉得没有快速准确的算法......
我认为,答案 #1 可以用作启发式方法。