OFFSET
1,1
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..5000
EXAMPLE
11 is in the sequence because 11^2+1 = 2*61 and 12^2+1 = 5*29 => 61 > 29.
MATHEMATICA
f[n_]:=FactorInteger[n^2+1][[-1, 1]]; Select[Range[125], f[#]>f[#+1]&]
PROG
(PARI) r=2; for(k=1, 1e3, t=factor((k+1)^2+1)[, 1]; t=t[#t]; if(t<r, print1(k", ")); r=t) \\ Charles R Greathouse IV, Jan 23 2012
CROSSREFS
KEYWORD
nonn
AUTHOR
Michel Lagneau, Jan 23 2012
STATUS
approved