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 A324108 #6 Feb 16 2019 20:39:06 %S A324108 1,3,4,7,6,12,13,15,8,18,24,28,31,39,24,31,12,24,32,42,52,72,78,60,57, %T A324108 93,124,91,156,72,121,63,96,36,78,56,72,96,124,90,96,156,192,168,48, %U A324108 234,240,124,133,171,48,217,342,372,144,195,128,468,624,168,781,363,104,127,186,288,56,84,312,234,156,120,112 %N A324108 Multiplicative with a(p^e) = A324054((p^e)-1). %H A324108 Antti Karttunen, <a href="/A324108/b324108.txt">Table of n, a(n) for n = 1..16384</a> %o A324108 (PARI) %o A324108 A324054(n) = { my(p=2,mp=p*p,m=1); while(n, if(!(n%2), p=nextprime(1+p); mp = p*p, if(3==(n%4),mp *= p,m *= (mp-1)/(p-1))); n>>=1); (m); }; %o A324108 A324108(n) = { my(f=factor(n)); prod(i=1, #f~, A324054((f[i,1]^f[i,2])-1)); }; %Y A324108 Cf. A000203, A005940, A324054, A324106, A324109, A324110. %K A324108 nonn,mult %O A324108 1,2 %A A324108 _Antti Karttunen_ and _David A. Corneth_, Feb 15 2019