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 A345046 #9 May 12 2024 16:00:47
%S A345046 1,1,2,1,4,2,6,1,4,4,10,2,12,6,4,1,16,4,18,4,6,10,22,2,16,12,8,6,28,4,
%T A345046 30,1,10,16,12,4,36,18,12,4,40,6,42,10,4,22,46,2,36,16,16,12,52,8,20,
%U A345046 6,18,28,58,4,60,30,12,1,12,10,66,16,22,12,70,4,72,36,16,18,30,12,78,4,16,40,82,6,16,42,28,10
%N A345046 If n = Product p(k)^e(k) then a(n) = LCM (p(k)-1)^e(k).
%H A345046 Antti Karttunen, <a href="/A345046/b345046.txt">Table of n, a(n) for n = 1..16384</a>
%H A345046 <a href="/index/Lc#lcm">Index entries for sequences related to lcm's</a>
%o A345046 (PARI) A345046(n) = { my(f=factor(n)~); lcm(vector(#f, i, (f[1, i]-1)^f[2, i])); };
%Y A345046 Cf. A003958, A345047.
%Y A345046 Cf. also A345044, A353783.
%K A345046 nonn
%O A345046 1,3
%A A345046 _Antti Karttunen_, Jun 07 2021