|
|
A346601
|
|
Record values in A346599.
|
|
3
|
|
|
1, 3, 4, 5, 15, 45, 91, 187, 703, 1891, 2701, 3337, 12403, 18721, 38503, 49141, 79003, 88831, 104653, 146611, 188191, 218791, 226801, 269011, 286903, 385003, 497503, 597871, 665281, 721801, 736291, 765703, 873181, 954271, 1056331, 1314631, 1373653, 1537381, 1755001
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
These are the values of m (see A344005) that take a record number of steps to appear. See A346600 for their indices.
|
|
LINKS
|
|
|
MATHEMATICA
|
max=0; lst={}; Do[g=(k=1; n=1; While[m=1; While[!Divisible[m(m+1), n], m++]; m!=i, n++]; n); If[g>max, AppendTo[lst, n]; max=g], {i, 100}]; lst (* Giorgos Kalogeropoulos, Jul 29 2021 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|