A247871 Least prime factor of A247679.

5, 5, 11, 7, 5, 7, 5, 17, 11, 13, 5, 7, 5, 7, 5, 13, 17, 5, 11, 5, 7, 5, 29, 7, 5, 23, 19, 5, 7, 13, 5, 11, 7, 5, 17, 5, 13, 11, 19, 5, 23, 7, 31, 5, 11, 7, 5, 5, 7, 19, 11, 5, 41, 13, 7, 23, 5, 17, 5, 29, 37, 5, 19, 7, 5, 11, 17, 7, 5, 23, 13, 5, 7, 11, 5, 7, 5, 13, 41, 11, 43, 5, 31, 37, 5, 7, 11, 5, 17, 7, 5, 5, 7, 13, 29, 5

Offset: 1

Author

Odimar Fabeny, Sep 25 2014

Keywords

• nonn
• easy

Links

• Odimar Fabeny, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A056608, A247679.

Programs

Mathematica

FactorInteger[#][[1,1]]&/@Select[Range[17,4000,18],CompositeQ] (* Harvey P. Dale, Jun 19 2022 *)