|
|
A329657
|
|
Positions of records in A329656.
|
|
0
|
|
|
1, 2, 6, 10, 14, 51, 87, 159, 177, 332, 517, 1757, 2867, 3959, 10919, 24463, 34423, 49582, 83099, 609023, 833039, 1429559, 2162159, 7792823, 13597139, 20252299, 20563194, 21146159, 32729759, 110159279, 244879751, 253436399
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
|
|
MAPLE
|
f:= proc(n) local s, t;
s:= convert(map(convert, ifactors(n)[2], `*`), `+`);
for t from 1 do
s:= n mod s;
if s = 0 then return t fi
od
end proc:
Res:= 1: count:= 1: vmax:= 0:
for n from 2 while count < 23 do
v:= f(n);
if v > vmax then
vmax:= v;
Res:= Res, n;
count:= count+1;
fi
od:
Res;
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|