This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A323507 #5 Jan 17 2019 17:20:09 %S A323507 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, %T A323507 2,6,5,7,30,210,11,7,30,210,11,13,2310,210,11,7,30,6,5,7,30,210,11,7, %U A323507 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 %N A323507 a(n) = A322827(n) / A322827(floor(n/2)). %H A323507 Antti Karttunen, <a href="/A323507/b323507.txt">Table of n, a(n) for n = 0..16383</a> %F A323507 a(n) = A322827(n) / A322827(floor(n/2)). %o A323507 (PARI) %o A323507 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)); %o A323507 A323507(n) = A322827(n)/A322827(n>>1); %Y A323507 Cf. A322827. %Y A323507 Cf. A323503, A323504 (bisections). %K A323507 nonn %O A323507 0,2 %A A323507 _Antti Karttunen_, Jan 17 2019