%I #13 Jan 04 2014 19:43:46
%S 251,3491,7219,10133,12979,20051,30491,54287,61757,205487,231443,
%T 300491,585737,714887,949303,1000133,1002979,1035791,1075357,1224809,
%U 2031443,2068147,3091267,3386989,5152087,5993837,6001757,6009733,6156089,6752953,7000219,7144289
%N Primes which become cubes when the digits are rotated once to the left.
%e The prime 7219 is in the list because 2197 = 13*13*13.
%o (PARI) rotl(a) = my(b,c,d); b=#Str(a); c=floor(a/(10^(b-1))); d=a-c*(10^(b-1)); 10*d+c
%o s=[]; forprime(n=2, 40000000, if(ispower(rotl(n),3), s=concat(s, n))); s
%o (Sage)
%o [i for i in primes_first_n(1000000) if Integer((int(str(i)[1:]+str(i)[:1]))).nth_root(3,True)[1]] # _Tom Edgar_, Jan 03 2014
%Y Cf. A234928.
%K nonn,base
%O 1,1
%A _Colin Barker_, Jan 01 2014