login
A089168
Solutions x for x^3-1 = kp where p is prime and k=1,2...
0
3, 5, 15, 17, 7, 21, 27, 33, 13, 41, 19, 9, 57, 59, 5, 69, 11, 71, 75, 77, 89, 31, 99, 101, 9, 105, 111, 7, 117, 119, 43, 131, 141, 143, 147, 153, 23, 155, 161, 167, 173, 189, 11
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
Sequence in context: A066420 A102582 A351296 * A103127 A103192 A097856
KEYWORD
easy,nonn
AUTHOR
Cino Hilliard, Dec 07 2003
STATUS
approved