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 A353562 #11 May 20 2022 05:19:41 %S A353562 1,2,3,4,6,10,9,14,12,20,18,28,30,42,40,36,56,60,84,100,132,140,156, %T A353562 126,120,196,198,168,200,264,280,312,252,440,392,396,520,336,400,528, %U A353562 560,624,504,880,784,792,1040,840,936,1360,1320,1176,1120,1560,1008,1760,1568,1584,2080,1680,1872,2720,2640,2352,2240,3120 %N A353562 Prime shadows of highly composite numbers, A002182. %C A353562 Sequence is injective (no duplicate values occur) because A002182 is a subsequence of A025487. %H A353562 Amiram Eldar, <a href="/A353562/b353562.txt">Table of n, a(n) for n = 1..10000</a> %F A353562 a(n) = A181819(A002182(n)). %F A353562 a(n) = A122111(A329902(n)). %o A353562 (PARI) %o A353562 v002182 = readvec("b002182_to.txt"); \\ Prepared from b-file of A002182 with gawk ' { print $2 } ' %o A353562 A002182(n) = v002182[n]; %o A353562 A181819(n) = factorback(apply(e->prime(e),(factor(n)[,2]))); %o A353562 A353562(n) = A181819(A002182(n)); %Y A353562 Cf. A002182, A025487, A122111, A181819, A329902. %Y A353562 Cf. also A353561, A353568. %K A353562 nonn %O A353562 1,2 %A A353562 _Antti Karttunen_, Apr 29 2022