OFFSET
3,1
LINKS
Eric Weisstein's World of Mathematics, Prime Factor
Eric Weisstein's World of Mathematics, Polygonal Number
PROG
(PARI) a(n) = if(n<3, return()); for(k=1, oo, my(t=(k*(n*k - n - 2*k + 4))\2); if(bigomega(t) == n, return(k))); \\ Daniel Suteu, Dec 12 2022
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Ilya Gutkovskiy, Dec 12 2022
EXTENSIONS
a(29)-a(34) from Daniel Suteu, Dec 12 2022
STATUS
approved