A323503 a(n) = A322827(2n) / A322827(n).

1, 3, 6, 3, 6, 7, 6, 3, 6, 7, 210, 7, 6, 7, 6, 3, 6, 7, 210, 7, 210, 13, 210, 7, 6, 7, 210, 7, 6, 7, 6, 3, 6, 7, 210, 7, 210, 13, 210, 7, 210, 13, 30030, 13, 210, 13, 210, 7, 6, 7, 210, 7, 210, 13, 210, 7, 6, 7, 210, 7, 6, 7, 6, 3, 6, 7, 210, 7, 210, 13, 210, 7, 210, 13, 30030, 13, 210, 13, 210, 7, 210, 13, 30030, 13, 30030, 19, 30030, 13

Offset

0,2

Links

Antti Karttunen, Table of n, a(n) for n = 0..16383

Formula

a(n) = A322827(2*n) / A322827(n).

Prog

(PARI)
A322827(n) = if(!n, 1, my(bits = Vecrev(binary(n)), rl=1, o = List([])); for(i=2, #bits, if(bits[i]==bits[i-1], rl++, listput(o, rl))); listput(o, rl); my(es=Vecrev(Vec(o)), m=1); for(i=1, #es, m *= prime(i)^es[i]); (m));
A323503(n) = A322827(2*n)/A322827(n);

Crossrefs

Cf. A322827, A323504.

Bisection of A323507.

Sequence in context: A038138 A010704 A338947 * A303129 A170859 A123146

Adjacent sequences: A323500 A323501 A323502 * A323504 A323505 A323506

Keyword

nonn

Author

Antti Karttunen, Jan 17 2019

Status

approved