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 A161346 #16 Apr 17 2024 02:35:12
%S A161346 3,4,5,6,7,9,11,13,17,19,23,29,31,37,41,43,47,53,59,61,67,71,73,79,83,
%T A161346 89,97,101,103,107,109,113,127,131,137,139,149,151,157,163,167,173,
%U A161346 179,181,191,193,197,199,211,223,227,229,233,239,241,251,257,263,269,271
%N A161346 a(n) = A161345(n)/3.
%C A161346 Union of {4, 6, 9} and all the odd primes. - _Amiram Eldar_, Apr 17 2024
%H A161346 Michael De Vlieger, <a href="/A161346/b161346.txt">Table of n, a(n) for n = 1..10000</a>
%t A161346 Select[Range[271], Function[{n, s}, Max[TakeWhile[Divisors[n], # <= s &]] == 3] @@ {#, Sqrt@ #} &[3 #] &] (* _Michael De Vlieger_, Feb 14 2020 *)
%Y A161346 Cf. A018253, A160811, A160812, A161205, A161344, A161345.
%K A161346 easy,nonn
%O A161346 1,1
%A A161346 _Omar E. Pol_, Jun 20 2009
%E A161346 Terms beyond a(10) from _R. J. Mathar_, Jun 24 2009