login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A234928 Primes which become cubes when the digits are rotated once to the right. 2

%I #13 Oct 28 2018 08:13:11

%S 251,433,73369,126739,144323,579113,786887,1248641,2250431,2417923,

%T 2950291,3013847,4428971,5208751,6430321,6453737,7715611,8698933,

%U 8805997,9443123,10895671,16970831,31442561,33862483,35600597,35766649,36519191,41963759

%N Primes which become cubes when the digits are rotated once to the right.

%H Alois P. Heinz, <a href="/A234928/b234928.txt">Table of n, a(n) for n = 1..1000</a>

%e The prime 126739 is in the sequence because 912673 = 97^3.

%t Select[Prime[Range[26*10^5]],IntegerQ[Surd[FromDigits[ RotateRight[ IntegerDigits[ #]]], 3]]&] (* _Harvey P. Dale_, Oct 28 2018 *)

%o (PARI) rotr(a) = if(a<10, a, eval(Str(a%10, a\10)))

%o s=[]; forprime(n=2, 50000000, if(ispower(rotr(n),3), s=concat(s, n))); s

%Y Cf. A234929.

%K nonn,base

%O 1,1

%A _Colin Barker_, Jan 01 2014

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified April 14 04:54 EDT 2024. Contains 371655 sequences. (Running on oeis4.)