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 A053024 #14 Jul 02 2025 16:01:59
%S A053024 2,4,9,20,25,42,49,88,99,110,121,156,169,238,255,272,289,342,361,460,
%T A053024 483,506,529,696,725,754,783,812,841,930,961,1184,1221,1258,1295,1332,
%U A053024 1369,1558,1599,1640,1681,1806,1849,2068,2115,2162,2209,2544,2597,2650
%N A053024 a(n) = n*p where p is the next prime >= n.
%p A053024 seq(nextprime(i)*(i+1),i=0..49); # _Zerinvary Lajos_, Jan 23 2007
%t A053024 NextPrim[n_] := Block[{k = n + 1}, While[ !PrimeQ[k], k++ ]; k]; Table[n*NextPrim[n - 1], {n, 10}] (* _Robert G. Wilson v_, Aug 20 2006 *)
%t A053024 Array[ #If[PrimeQ@#, #, Prime[PrimePi@# + 1]] &, 50] (* _Zak Seidov_, Aug 21 2006 *)
%K A053024 easy,nonn
%O A053024 1,1
%A A053024 Jeff Choate (bopeton(AT)gmail.com), Feb 24 2000
%E A053024 Corrected and extended by _James Sellers_, Feb 25 2000