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 A357853 #10 Oct 28 2022 20:53:02 %S A357853 1,1,2,1,2,2,3,1,4,2,4,2,5,3,4,1,6,4,8,2,6,4,10,2,4,5,8,3,12,4,15,1,8, %T A357853 6,6,4,18,8,10,2,22,6,27,4,8,10,32,2,9,4,12,5,38,8,8,3,16,12,46,4,54, %U A357853 15,12,1,10,8,64,6,20,6,76,4,89,18,8,8,12,10 %N A357853 Fully multiplicative with a(prime(k)) = A000009(k+1). %e A357853 We have 525 = prime(2)*prime(3)*prime(3)*prime(4) so a(525) = Q(3)*Q(4)*Q(4)*Q(5) = 2*2*2*3 = 24, where Q = A000009. %t A357853 primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]]; %t A357853 ptf[f_][n_]:=Product[f[i],{i,primeMS[n]}]; %t A357853 Array[ptf[PartitionsQ[#+1]&],100] %Y A357853 Other multiplicative sequences: A003961, A064988, A064989, A357852, A357980. %Y A357853 The non-strict version is A003964. %Y A357853 The unshifted horizontal version is A357978, non-strict A357977. %Y A357853 The unshifted version is A357982. %Y A357853 A000040 lists the primes. %Y A357853 A056239 adds up prime indices, row-sums of A112798. %Y A357853 Cf. A000009, A000720, A076610, A273873, A296150, A357979. %K A357853 nonn,mult %O A357853 1,3 %A A357853 _Gus Wiseman_, Oct 28 2022