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 A127150 #11 Jul 29 2025 08:35:40
%S A127150 1,2,3,4,9,10,19,20,22,23,24,25,26,48,54,55,56,57,62,63,67,68,70,72,
%T A127150 127,128,129,130,131,133,134,136,138,139,140,142,147,151,155,157,158,
%U A127150 159,162,163,166,167,168,169,173,176,178,182,187,188,189,298,300,310,311,313,320
%N A127150 Where records occur in A004648.
%H A127150 Seiichi Manyama, <a href="/A127150/b127150.txt">Table of n, a(n) for n = 1..10000</a>
%t A127150 Module[{r = -1, v}, Table[If[(v = Mod[Prime[k], k]) > r, r = v; k, Nothing], {k, 500}]] (* _Paolo Xausa_, Jul 29 2025 *)
%Y A127150 Cf. A004648, A127149.
%K A127150 nonn
%O A127150 1,2
%A A127150 _N. J. A. Sloane_, Mar 25 2007