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 A304743 #5 May 18 2018 19:45:51
%S A304743 1,2,3,2,4,5,2,4,6,3,2,4,7,2,4,6,4,6,8,4,6,4,2,2,4,9,6,2,4,10,2,4,11,
%T A304743 5,3,4,9,12,2,4,8,6,2,4,6,4,4,6,8,4,6,8,3,2,4,13,6,2,4,14,2,4,9,6,2,4,
%U A304743 9,9,4,6,15,6,4,4,4,9,13,4,8,12,4,9,13,4,9,16,2,4,8,9,11,2,4,6,4,7,2,4,6,12,2,4,15,4,6
%N A304743 Restricted growth sequence transform of A046523(A280866(n)).
%H A304743 Antti Karttunen, <a href="/A304743/b304743.txt">Table of n, a(n) for n = 1..65539</a>
%o A304743 (PARI)
%o A304743 \\ Needs also code from A280866:
%o A304743 A046523(n) = { my(f=vecsort(factor(n)[, 2], , 4), p); prod(i=1, #f, (p=nextprime(p+1))^f[i]); }; \\ From A046523
%o A304743 rgs_transform(invec) = { my(om = Map(), outvec = vector(length(invec)), u=1); for(i=1, length(invec), if(mapisdefined(om,invec[i]), my(pp = mapget(om, invec[i])); outvec[i] = outvec[pp] , mapput(om,invec[i],i); outvec[i] = u; u++ )); outvec; };
%o A304743 v304743 = rgs_transform(vector(65539,n,A046523(A280866(n))));
%o A304743 A304743(n) = v304743[n];
%Y A304743 Cf. A046523, A280866, A304742.
%K A304743 nonn
%O A304743 1,2
%A A304743 _Antti Karttunen_, May 18 2018