OFFSET
2,2
LINKS
Amiram Eldar, Table of n, a(n) for n = 2..626 (terms 2..200 from Vincenzo Librandi)
FORMULA
MATHEMATICA
PrimeFactors[n_] := Flatten[ Table[ # [[1]], {1}] & /@ FactorInteger[n]]; Table[ PrimeFactors[2^n - 3][[1]], {n, 2, 60}] (* Robert G. Wilson v, May 24 2004 *)
FactorInteger[#][[1, 1]]&/@(2^Range[2, 60]-3) (* Harvey P. Dale, Aug 21 2016 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Yasutoshi Kohmoto, May 11 2004
EXTENSIONS
More terms from Robert G. Wilson v, May 24 2004
STATUS
approved