Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #12 Jun 25 2024 01:28:49
%S 1,2,6,10,14,51,87,159,177,332,517,1757,2867,3959,10919,24463,34423,
%T 49582,83099,609023,833039,1429559,2162159,7792823,13597139,20252299,
%U 20563194,21146159,32729759,110159279,244879751,253436399
%N Positions of records in A329656.
%C Numbers n such that A329656(n) > A329656(k) for all k < n.
%e a(3) = 6 is a member because A329656(6)=2 and A329656(k)<2 for k<6.
%p f:= proc(n) local s, t;
%p s:= convert(map(convert,ifactors(n)[2],`*`),`+`);
%p for t from 1 do
%p s:= n mod s;
%p if s = 0 then return t fi
%p od
%p end proc:
%p Res:= 1: count:= 1: vmax:= 0:
%p for n from 2 while count < 23 do
%p v:= f(n);
%p if v > vmax then
%p vmax:= v;
%p Res:= Res, n;
%p count:= count+1;
%p fi
%p od:
%p Res;
%Y Cf. A329656.
%K nonn,more
%O 1,2
%A _J. M. Bergot_ and _Robert Israel_, Nov 18 2019
%E a(29)-a(32) from _Michael S. Branicky_, Jun 24 2024