OFFSET
1,1
COMMENTS
a(4), if it exists, is larger than 10^7.
a(4) > 5*10^14, if it exists. - Giovanni Resta, Jul 14 2018
EXAMPLE
MATHEMATICA
DeleteCases[#, 0] &@ MapIndexed[Boole[#1 == First@ #2] First@ #2 &, Map[FactorInteger[Total@ #][[-1, 1]] &, Partition[Prime@ Range[10^6], 2, 1]]] (* Michael De Vlieger, Aug 09 2017 *)
CROSSREFS
KEYWORD
nonn,bref,more
AUTHOR
Labos Elemer, May 17 2002
EXTENSIONS
Edited by N. J. A. Sloane, Aug 09 2017
STATUS
approved