A323503 - OEIS

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

(list; graph; refs; listen; history; text; internal format)

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