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 A003978 #17 Sep 04 2023 02:01:25
%S A003978 1,1,2,2,4,2,6,4,6,4,10,4,14,6,8,8,21,6,29,8,12,10,41,8,20,14,18,12,
%T A003978 55,8,76,16,20,21,24,12,100,29,28,16,134,12,175,20,24,41,230,16,42,20,
%U A003978 42,28,296,18,40,24,58,55,384,16,489,76,36,32,56,20,626,42,82,24,791,24
%N A003978 Möbius transform of A003964.
%F A003978 Multiplicative with a(p^e) = (q-1)q^(e-1) were q = partition(pi(p)+1) = A000041(A000720(p)+1). - _David W. Wilson_, Sep 01 2001
%t A003978 f[p_, e_] := Module[{q = PartitionsP[PrimePi[p] + 1]}, (q-1)*q^(e-1)]; a[n_] := Times @@ f @@@ FactorInteger[n]; a[1] = 1; Array[a, 100] (* _Amiram Eldar_, Sep 04 2023 *)
%Y A003978 Cf. A000041, A000720, A003964, A003979.
%K A003978 nonn,easy,mult
%O A003978 1,3
%A A003978 _Marc LeBrun_
%E A003978 More terms from _David W. Wilson_, Aug 29 2001