OFFSET
1,1
EXAMPLE
a(1) = Gpf(2*2+3) = Gpf(7) = 7.
a(2) = Gpf(2*3+3) = Gpf(9) = 3.
MAPLE
f:= n -> max(numtheory:-factorset(2*ithprime(n)+3)):
map(f, [$1..100]); # Robert Israel, Nov 12 2025
MATHEMATICA
a[n_] := FactorInteger[2*Prime[n] + 3][[-1, 1]]; Array[a, 65] (* Amiram Eldar, Nov 12 2025 *)
PROG
(PARI) a(n) = vecmax(factor(2*prime(n) + 3)[, 1]);
CROSSREFS
KEYWORD
nonn
AUTHOR
Alain Rocchelli, Nov 12 2025
STATUS
approved
