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 A118749 #23 Jan 08 2024 07:04:01
%S A118749 3,5,7,11,13,17,19,23,23,29,31,31,37,41,43,47,47,53,53,59,61,61,67,71,
%T A118749 73,73,79,83,83,89,89,89,97,101,103,107,109,113,113,113,113,113,127,
%U A118749 131,131,137,139,139,139,149,151,151,157,157,163,167,167,173,173,179,181
%N A118749 Largest prime <= 3*n.
%C A118749 Analogous to A060308 largest prime <= 2*k.
%F A118749 a(n) = A007917(A008585(n)). - _Michel Marcus_, Nov 25 2015
%t A118749 Table[Max[FactorInteger[(3 n)!/(n!)^3]], {n, 1, 70}] (* _Vincenzo Librandi_, Nov 25 2015 *)
%t A118749 NextPrime[3*Range[70]+1,-1] (* _Harvey P. Dale_, Nov 12 2017 *)
%o A118749 (Magma) [NthPrime(#PrimesUpTo(3*n)): n in [1..100]]; // _Vincenzo Librandi_, Nov 25 2015
%o A118749 (PARI) vector(100, n, precprime(3*n)) \\ _Altug Alkan_, Nov 25 2015
%Y A118749 Cf. A007917 (largest prime <= n), A008585 (3n).
%Y A118749 Cf. A060308, A118750, A118751, A118752.
%Y A118749 Essentially the same as A081259.
%K A118749 easy,nonn
%O A118749 1,1
%A A118749 _Jonathan Vos Post_, Apr 29 2006