A323507 a(n) = A322827(n) / A322827(floor(n/2)).

1, 2, 3, 2, 6, 5, 3, 2, 6, 5, 7, 30, 6, 5, 3, 2, 6, 5, 7, 30, 210, 11, 7, 30, 6, 5, 7, 30, 6, 5, 3, 2, 6, 5, 7, 30, 210, 11, 7, 30, 210, 11, 13, 2310, 210, 11, 7, 30, 6, 5, 7, 30, 210, 11, 7, 30, 6, 5, 7, 30, 6, 5, 3, 2, 6, 5, 7, 30, 210, 11, 7, 30, 210, 11, 13, 2310, 210, 11, 7, 30, 210, 11, 13, 2310, 30030, 17, 13, 2310, 210, 11, 13, 2310

Offset

0,2

Links

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

Formula

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

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));
A323507(n) = A322827(n)/A322827(n>>1);

Crossrefs

Cf. A322827.

Cf. A323503, A323504 (bisections).

Sequence in context: A113710 A286587 A054126 * A144176 A307686 A077418

Adjacent sequences: A323504 A323505 A323506 * A323508 A323509 A323510

Keyword

nonn

Author

Antti Karttunen, Jan 17 2019

Status

approved