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 A364543 #12 Aug 07 2023 14:55:04 %S A364543 1,3,5,9,17,33,35,65,67,69,129,131,133,135,137,257,259,261,263,265, %T A364543 267,273,289,385,513,515,517,519,521,523,525,527,529,531,545,577,641, %U A364543 769,1025,1027,1029,1031,1033,1035,1037,1039,1041,1043,1045,1047,1057,1059,1089,1091,1153,1281,1537,2049,2051,2053,2055 %N A364543 Odd numbers k for which A005940(k) <= k. %H A364543 Antti Karttunen, <a href="/A364543/b364543.txt">Table of n, a(n) for n = 1..11023; terms less than 2^23</a> %o A364543 (PARI) %o A364543 A005940(n) = { my(p=2, t=1); n--; until(!n\=2, if((n%2), (t*=p), p=nextprime(p+1))); t }; %o A364543 isA364543(n) = ((n%2)&&(A005940(n)<=n)); %Y A364543 Odd terms of A364541. %Y A364543 Cf. A005940, A364563 [= -A364499(a(n))]. %Y A364543 Subsequences: A364547, A364573. %Y A364543 Cf. also A364293. %K A364543 nonn %O A364543 1,2 %A A364543 _Antti Karttunen_, Aug 06 2023