%I #12 May 17 2021 04:10:01
%S 0,1,2,3,5,7,9,11,15,17,21,27,29,35,39,41,45,51,57,59,65,69,71,77,81,
%T 87,95,99,101,105,107,111,125,129,135,137,147,149,155,161,165,171,177,
%U 179,189,191,195,197,209,221,225,227,231,237,239,249,255,261,267,269,275,279,281,291,305,309,311,315,329,335,345,347,351,357,365,371,377,381,387,395,399,407,417,419,429,431,437
%N Record values of A238525.
%H Amiram Eldar, <a href="/A238526/b238526.txt">Table of n, a(n) for n = 1..10000</a>
%t Union @ FoldList[Max, Table[Mod[n, Plus @@ Times @@@ FactorInteger[n]], {n, 2, 1000}]] (* _Amiram Eldar_, May 17 2021 *)
%Y Cf. A238525, A238527, A238528.
%K nonn
%O 1,3
%A _J. Stauduhar_, Feb 28 2014