编号：A271973-OEIS

搜索： 编号：a271973

显示1-1个结果（共1个）。

第页1

排序：关联|参考文献|数|被改进的|创建格式：长的|短的|数据

A271973型

最小数k，使得gcd（s1，s2）=n，其中s1是奇数之和，s2是k的Collatz（3x+1）轨迹中偶数之和。

+0
1

1, 10, 9, 30, 65, 5, 74, 86, 368, 135, 970, 50, 95, 101, 1045, 178, 793, 7, 214, 196, 18, 423, 133, 200, 2572, 629, 621, 358, 700, 451, 3167, 1924, 3611, 1926, 662, 510, 6688, 437, 1525, 5072, 3724, 3161, 1034, 240, 5848, 2487, 704, 442, 19120, 1230, 5138, 3524

(列表;图表;参考;听;历史;文本;内部格式)

抵消

1,2

链接

n=1..52时的n，a（n）表。

例子

a（6）=5，因为5的Collatz轨迹是5->16->8->4->2->1，其中s1=5+1=6和s2=16+8+4+2=30=>gcd（6,30）=6。

MAPLE公司

nn:=10^8:

对于从1到60的n，do：

ii:=0：

对于从1到nn的k，而（ii＝0）do：

kk:=1:m:=k:T[kk]：=k:it:=0:

对于i从1到nn，而（m<>1）则：

如果irem（m，2）=0

然后

m： =米/2:kk:=kk+1:T[kk]：=米：

其他的

m： =3*m+1:kk:=kk+1:T[kk]：=m：

图1：

日期：

s1:=0:s2:=0:

对于从1到kk的j，do：

如果irem（T[j]，2）=1

然后

s1：=s1+T[j]：

其他的

s2:=s2+T[j]：

图1：

日期：

g： =gcd（s1，s2）：

如果g=n

然后

ii:=1:printf（“%d%d\n”，n，k）：

其他fi：

日期：

数学

表[k=1；While[n！=GCD[Total@Select[#，OddQ]，Total@Select[#，EvenQ]]&@NestWhileList[If[EevenQ@#，#/2，3#+1]&，k，#>1&]，k++]；k、 {编号，52}](*迈克尔·德弗利格2016年7月13日*）

交叉参考

囊性纤维变性。A213909型,A213916型.

关键字

非n

作者

米歇尔·拉格诺，2016年7月13日

状态

经核准的

第页1

搜索在0.004秒内完成