A193865 a(n) = (A187108(n+1)-A187108(n))/2.

1, 2, 1, 3, 2, 1, 2, 1, 3, 2, 1, 2, 1, 3, 2, 1, 3, 3, 2, 1, 2, 1, 3, 3, 2, 1, 3, 2, 1, 2, 1, 3, 2, 1, 2, 1, 3, 2, 1, 2, 1, 3, 2, 1, 2, 1, 3, 2, 1, 2, 1, 3, 2, 1, 3, 3, 2, 1, 2, 1, 3, 2, 1, 2, 1, 3, 3, 2, 1, 3, 2, 1, 2, 1, 3, 2, 1, 2, 1, 3, 2, 1, 2, 1, 3, 3

Offset

1,2

Links

Table of n, a(n) for n=1..86.

Prog

(AS3)
var a:Array=new Array();
var i:int;
var n:int=0;
var ni:int;
var b:Array = new Array();
for (i=0; i<=1000; i++){
while(a[n]!=undefined) n++;
b.push(String(2*n+1));
a[n]=1;
ni=2*n+1;
while(ni>=2*n+1&&ni>1){
ni=3*ni+1;
while(ni%2==0)ni/=2;
a[(ni-1)/2]=1;
}}
for(i=0; i<1000; i++)b[i]=(b[i+1]-b[i])/2; b.pop();
trace(b);

Crossrefs

Sequence in context: A166948 A325532 A180075 * A026171 A026176 A026141

Adjacent sequences: A193862 A193863 A193864 * A193866 A193867 A193868

Keyword

nonn

Author

Jimin Park, Aug 07 2011

Status

approved