cp's OEIS Frontend

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.

A322813 a(n) = A001227(A122111(n)).

This page as a plain text file.
%I A322813 #8 Dec 27 2018 22:05:03
%S A322813 1,1,1,2,1,2,1,2,3,2,1,2,1,2,3,2,1,4,1,2,3,2,1,2,4,2,3,2,1,4,1,2,3,2,
%T A322813 4,4,1,2,3,2,1,4,1,2,3,2,1,2,5,6,3,2,1,4,4,2,3,2,1,4,1,2,3,2,4,4,1,2,
%U A322813 3,6,1,4,1,2,6,2,5,4,1,2,3,2,1,4,4,2,3,2,1,4,5,2,3,2,4,2,1,8,3,6,1,4,1,2,6
%N A322813 a(n) = A001227(A122111(n)).
%H A322813 Antti Karttunen, <a href="/A322813/b322813.txt">Table of n, a(n) for n = 1..20000</a>
%H A322813 <a href="/index/Pri#prime_indices">Index entries for sequences computed from indices in prime factorization</a>
%F A322813 a(n) = A001227(A122111(n)).
%o A322813 (PARI)
%o A322813 A001227(n) = numdiv(n>>valuation(n, 2));
%o A322813 A064989(n) = {my(f); f = factor(n); if((n>1 && f[1,1]==2), f[1,2] = 0); for (i=1, #f~, f[i,1] = precprime(f[i,1]-1)); factorback(f)};
%o A322813 A122111(n) = if(1==n,n,prime(bigomega(n))*A122111(A064989(n)));
%o A322813 A322813(n) = A001227(A122111(n));
%Y A322813 Cf. A001227, A122111, A322819.
%K A322813 nonn
%O A322813 1,4
%A A322813 _Antti Karttunen_, Dec 27 2018