|
%I #8 Jan 04 2014 14:42:26
%S 61,601,619,6067,6211,6547,6577,6883,62131,63097,63841,64579,66553,
%T 69859,600577,600883,601849,602689,604243,604579,605953,609241,609859,
%U 611833,616321,619009,624601,627667,629593,637699,644089,649843,652417,654169,655651
%N Primes which become squares when the digits are rotated once to the left.
%C Every term in the sequence begins with the digit 6.
%e The prime 611833 is in the list because 118336 = 344*344.
%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, 700000, if(issquare(rotl(n)), s=concat(s, n))); s
%Y Cf. A234925.
%K nonn,base
%O 1,1
%A _Colin Barker_, Jan 01 2014
|
