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 A324653 #8 Mar 10 2019 19:32:44 %S A324653 1,3,4,12,13,39,6,18,24,72,78,234,31,93,124,372,403,1209,156,468,624, %T A324653 1872,2028,6084,781,2343,3124,9372,10153,30459,8,24,32,96,104,312,48, %U A324653 144,192,576,624,1872,248,744,992,2976,3224,9672,1248,3744,4992,14976,16224,48672,6248,18744,24992,74976,81224,243672,57,171,228 %N A324653 a(n) = A000203(A276086(n)). %H A324653 Antti Karttunen, <a href="/A324653/b324653.txt">Table of n, a(n) for n = 0..2310</a> %H A324653 <a href="/index/Pri#primorialbase">Index entries for sequences related to primorial base</a> %H A324653 <a href="/index/Pri#primorial_numbers">Index entries for sequences related to primorial numbers</a> %H A324653 <a href="/index/Si#SIGMAN">Index entries for sequences related to sigma(n)</a> %F A324653 a(n) = A000203(A276086(n)). %F A324653 For n >= 1, a(A002110(n-1)) = 1+A000040(n). %o A324653 (PARI) %o A324653 A276086(n) = { my(i=0,m=1,pr=1,nextpr); while((n>0),i=i+1; nextpr = prime(i)*pr; if((n%nextpr),m*=(prime(i)^((n%nextpr)/pr));n-=(n%nextpr));pr=nextpr); m; }; %o A324653 A324653(n) = sigma(A276086(n)); %Y A324653 Cf. A000203, A002110, A276086. %Y A324653 Cf. A267263, A276150, A324650, A324655 for omega, bigomega, phi and tau analogs, and also A324654. %Y A324653 Cf. also A324054. %K A324653 nonn %O A324653 0,2 %A A324653 _Antti Karttunen_, Mar 10 2019