OFFSET
1,1
REFERENCES
Antal Balog, On the largest prime factor of consecutive integers, Abstracts Amer. Math. Soc., 25 (No. 2, 2002), p. 337, #975-11-76.
LINKS
T. D. Noe, Table of n, a(n) for n = 1..1000
P. Erdős and C. Pomerance, On the largest prime factors of n and n+1, Aequationes Math. 17 (1978), p. 311-321. [alternate link]
MATHEMATICA
pflist=Select[Partition[Table[{n, lpf[n]}, {n, 400}], 3, 1], #[[3, -1]]< #[[1, -1]]< #[[2, -1]]&]; Table[pflist[[n, 1, 1]], {n, Length[pflist]}] (* Harvey P. Dale, Oct 25 2011 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Apr 25 2003
STATUS
approved