wayne 发表于 2012-12-21 12:31:13

16# chyanog
仔细看了你的代码,
发现有很多闪光的地方. 非常不错!
我上面贴的是最原始的代码,是C语言实现的原型.

wayne 发表于 2012-12-21 13:05:37

这是一个彻底字符串处理的版本,有点长:f :=
Module[{a = a0, b = b0, n = n0, i, t, tmp},
tmp = NestWhile[# <>ToString@Tr@ToExpression]] &,
    "baiduStar" <> ToString <> ToString, StringFreeQ @@ StringSplit] &];
tmp = IntegerDigits@ToExpression@First@StringCases;
t = StringJoin;
t = StringPosition][];
tmp[ - t - 1] + t]]]]

chyanog 发表于 2012-12-21 17:49:30

用字符串处理也不错；xx我习惯写成Table的
PS ：python的字符串操作很方便，我估计mathematica6引入的Span就是借鉴了py的切片，py中的字符串和列表一样都能用切片的

chyanog 发表于 2012-12-21 18:03:28

21# wayne
这就过奖了，几行代码会有几个闪光点，

wayne 发表于 2012-12-21 21:13:33

23# chyanog
谁借鉴谁还不一定吧,你查过先后顺序吗.
Table 或者
ConstantArray 或者
0 IdentityMatrix 都可以

chyanog 发表于 2012-12-21 21:18:51

25# wayne
貌似Array最短

wayne 发表于 2012-12-21 21:24:58

26# chyanog

哈哈, 这个相当于是没有输入参数的纯函数了!漂亮!
没想到还可以玩这个小trick 呢!

wayne 发表于 2012-12-21 21:32:46

发现跟chyanog比起来,我的代码很中规中矩阿.
有兴趣可以关注一下官网举办的one-liner比赛吧.

chyanog 发表于 2012-12-21 21:37:39

28# wayne
我也是中规中矩啊，one-liner比赛也听说过，还没怎么关注

chyanog 发表于 2012-12-21 21:47:12

23# chyanog
谁借鉴谁还不一定吧,你查过先后顺序吗.
Table 或者
ConstantArray 或者
0 IdentityMatrix 都可以
wayne 发表于 2012-12-21 21:13 http://bbs.emath.ac.cn/images/common/back.gif
先后顺序已经考察过了，Python的早一些
http://emath.5d6d.net/wowo/attachment/201212/21/23488266_1356097290n1tR.png
页: 1 2 [3] 4
查看完整版本: 百度之星的一道与斐波那契数列有关的题