%I#9 2016年8月28日18:18:34

%S 0,3,2,6,6,5,3,4,4,4，7,1,4,7,25,6,24,7,3,7,11,25,8,4,23,7,6,3,24,8,11,5，

%电话20,7,9,3,22,25,2,6,11,5,24,1,9,10,20,3,20,26,7,8,19,11,21,26,15,2,8，

%U 5,10,20,13,23,12,26,9,7,9,20,13C3,3,20,26,24,7,3,8,18,12,13,20,5,24,15,12

%3x+1问题中2n+1轨道上素数的个数。

%H T.D.Noe，n表，n=0..10000的a（n）</a>

%H<a href=“/index/3#3x1”>与3x+1（或Collatz）问题相关的序列的索引条目</a>

%e轨道（3）=3->10->5->16->8->4->2->1。它包含3个素数，3、5和2。

%o（ARIBAS）：函数轨道（n：整数）：数组；var stk：堆栈；开始stack_push（stk，n）；当n<>1时，如果n mod 2=0，则n：=n div 2；否则n:=3*n+1；结束；堆栈推送（stk，n）；结束；返回堆栈2阵列（stk）；结束；函数primesfilter（ar:array）：数组；var j，k：整数；stk：堆栈；从j:=0开始到长度（ar）-1 do k:=prime32test（ar[j]）；如果k=1，则堆栈push（stk，ar[j]）；结束；结束；返回堆栈2阵列（stk）；结束；函数a064684（maxarg：整数）；var n：整数；从n开始：=1到maxarg乘以2写（长度（质数过滤器（轨道（n））），“”）；结束；结束；a064684（190）。

%K nonn，简单

%O 0,2

%A _Jon Perry_，2001年10月10日

%E更多来自Klaus Brockhaus的条款，2001年10月13日