加入收藏 | 设为首页 | 会员中心 | 我要投稿 李大同 (https://www.lidatong.com.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 大数据 > 正文

与Perl 6序列相乘无论(…)运算符

发布时间:2020-12-15 21:52:39 所属栏目:大数据 来源:网络整理
导读:我已经看到了序列中Perl 6无论(…)运算符的例子,我试图找出如何进行涉及乘法的序列. 运算符执行以下操作,如果以某些数字开头,则可以指定其后的数字序列. @natural = 1,2 ... *;@powersOfTwo = 1,2,4 ... *; 等等. 也可以使用序列中的先前数字定义序列,如斐波
我已经看到了序列中Perl 6无论(…)运算符的例子,我试图找出如何进行涉及乘法的序列.

运算符执行以下操作,如果以某些数字开头,则可以指定其后的数字序列.

@natural = 1,2 ... *;
@powersOfTwo = 1,2,4 ... *;

等等.
也可以使用序列中的先前数字定义序列,如斐波那契数字(在此question中所示),其中一个执行以下操作:

@fibonacci = 1,1,*+* ... *;

问题是乘法运算符是*,前面的数字也用*表示.

虽然我可以使用,和/来定义序列,但我似乎找不到使用*定义序列的方法.

我尝试过以下方法:

@powers = 1,*** ... *;

但它显然不起作用.

有谁知道怎么做?

解决方法

首先,Perl 6对空白很敏感.
1,* * * ... *

是完全合法的,并产生一个类似于乘法斐波那契的序列;它只是有点难以阅读. ***和* * *表示不同的东西.

如果歧义困扰你,你可以使用一个显式的块,而不是使用“任何星号”给你的隐式块:

1,-> $a,$b { $a * $b } ... *

1,{ $^a * $^b } ... *

两者都产生与1,* * * …… *相同的序列(在Rakudo中测试).

(编辑:李大同)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章
      热点阅读