OFFSET
2,1
LINKS
Hugo Pfoertner, Table of n, a(n) for n = 2..10000
PROG
(PARI) gpf(x) = {my (f=factor(x)); f[#f[, 2], 1]};
a023517(pmax) = {my(pp=2); forprime (p=3, pmax, print1(gpf(pp*p-1), ", "); pp=p)};
a023517(300) \\ Hugo Pfoertner, Oct 09 2022
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
a(1)=2 removed by Sean A. Irvine, Jun 05 2019
STATUS
approved