OFFSET
1,1
PROG
(PARI) xpm1(n, m, pow) = { forstep(k=2, m, 2, forstep(x=1, n, 2, y= x^pow - 1; z=floor(y/k); if(floor(y/k)*k==y, if(isprime(z), print1(x", ") ) ) ) )
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Cino Hilliard, Dec 07 2003
STATUS
approved