OFFSET
1,1
LINKS
Karl Hovekamp, Table of n, a(n) for n=1..39168
EXAMPLE
a(1)=5 because the largest prime divisor of 4 is less than the largest prime divisor of 6.
MATHEMATICA
Select[Prime[Range[2, 200]], Max[Transpose[FactorInteger[#-1]][[1]]]< Max[Transpose[FactorInteger[#+1]][[1]]]&] (* Harvey P. Dale, Apr 26 2011 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Hugo Pfoertner, Feb 19 2005
STATUS
approved