解决欧拉项目的实用函数
用法
% egison -l lib/math/project-euler.egi
> (num-to-digits 12345)
{1 2 3 4 5}
> (digits-to-num {1 2 3 4 5})
12345
功能列表
sum-of-positive-divisors
> (sum-of-positive-divisors 3)
4 ; 1+3
> (sum-of-positive-divisors 12)
28 ; 1+2+3+4+6+12
sum-of-proper-divisors
> (sum-of-proper-divisors 3)
1
(sum-of-proper-divisors 12)
16 ; 1+2+3+4+6
num-to-digits
> (num-to-digits 12345)
{1
2021-07-20 15:03:31
2KB
Shell
1