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 A238528 #17 May 17 2021 04:10:18
%S A238528 2,3,5,7,11,17,29,41,59,71,101,107,137,149,179,191,197,227,239,269,
%T A238528 281,311,347,419,431,461,521,569,599,617,641,659,809,821,827,857,881,
%U A238528 1019,1031,1049,1061,1091,1151,1229,1277,1289,1301,1319,1427,1451
%N A238528 Record prime values of A238525.
%C A238528 The prime values in A238526.
%H A238528 Amiram Eldar, <a href="/A238528/b238528.txt">Table of n, a(n) for n = 1..10000</a>
%t A238528 Union @ FoldList[Max, Select[Table[Mod[n, Plus @@ Times @@@ FactorInteger[n]], {n, 2, 3000}], PrimeQ]] (* _Amiram Eldar_, May 17 2021 *)
%Y A238528 Cf. A238525, A238526, A238527.
%K A238528 nonn
%O A238528 1,1
%A A238528 _J. Stauduhar_, Feb 28 2014