[seqfan]回复：可爱的Superseeker

[阿隆索·德尔·阿特]

如果可以证明它是相同的，那么您已经找到了一种简化
5行程序转换为单行。
我有预感威尔逊定理可能是
在这里使用。
铝
2014年3月17日星期一上午7:44，Wouter Meeussen<
沃特·梅森在telenet.be
>
写的：
>
Amarnath Murthy的A061303（n）+1（参见
>
http://oeis.org/A061303
)带有
>
gcd（n！，Phi（n！））===gcd（（n+1）！，
Phi（（n+1）！）
>
>
或者用Mma语言：
>
选择[Range[120]，GCD[#！，EulerPhi[#！]]===GCD[（#+1）！，EulerPhi[（#+1）！]
>
]&  ]
>
{1,4,12,16,18,30,36,40,42,60,66,70,72,78,88,96,100,108,112}
>
我不清楚这是否是不言而喻的。
>
欢迎提供任何见解。
>
>
沃特。
>
>
_______________________________________________
>
>
Seqfan邮件列表-
网址：http://list.seqfan.eu/
>
--
阿隆索·德尔·阿特
SmashWords.com的作者<
https://www.mashwords.com/profile/view/AlonsoDelarte网站
>
ReverbNation.com上的音乐家<
http://www.混响.com/alonsodelarte
>