登录
A323356型
对于有理数p/q,设f(p/q)=(p+q)/(A000120号(p)+A000120号(q) );a(n)是通过迭代f获得的,从n/1开始,直到达到一个整数(然后a(n。
1
1, 2, 2, 2, 2, 2, 2, -1, 7, -1, 3, 7, 7, -1, 7, -1, 6, -1, 5, 7, 7, -1, -1, -1, -1, 8, -1, -1, 6, 8, -1, 8, 11, 8, 9, 8, -1, 8, 8, 11, -1, 11, 11, 11, -1, 11, 8, -1, 8, 11, -1, -1, 11, 11, 8, 16, -1, 15, 10, 16, -1, -1, 15, 14, 22, 14, 17, 23, 11, 15, 11, 11, 8, 12, 11, 11, 16, 12, 11
抵消
1,2
例子
13/1->14/4=7/2->9/4->13/3->16/5->21/3=7,因此a(13)=7。
8/1->9/2->11/3->14/5->19/5->24/5->29/4->33/5->38/4=19/2->21/4->25/4->29%4,5个循环重复,因此a(8)=-1。
数学
数组[SelectFirst[Rest@NestWhileList[(#1+#2)/(DigitCount[#1,2,1]+Digit计数[#2,2,1')&@@{Numerator@#,Denominator@#}&,#,UnsameQ,All],IntegerQ]/。k_/;MissingQ@k->-1&,79](*迈克尔·德弗利格2019年1月18日*)
关键词
签名,基础
作者
Ctibor O.齐兹卡2019年1月18日
状态
经核准的