%I #3 Oct 01 2013 17:57:47
%S 3,5,15,17,7,21,27,33,13,41,19,9,57,59,5,69,11,71,75,77,89,31,99,101,
%T 9,105,111,7,117,119,43,131,141,143,147,153,23,155,161,167,173,189,11
%N Solutions x for x^3-1 = kp where p is prime and k=1,2...
%o (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",") ) ) ) )
%K easy,nonn
%O 1,1
%A _Cino Hilliard_, Dec 07 2003