Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A238526
Record values of A238525.
6
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, 87, 95, 99, 101, 105, 107, 111, 125, 129, 135, 137, 147, 149, 155, 161, 165, 171, 177, 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
OFFSET
1,3
LINKS
MATHEMATICA
Union @ FoldList[Max, Table[Mod[n, Plus @@ Times @@@ FactorInteger[n]], {n, 2, 1000}]] (* Amiram Eldar, May 17 2021 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
J. Stauduhar, Feb 28 2014
STATUS
approved