%I
%S 2,3,10,12,21,23,32,34,43,104,111,122,131,133,142,203,214,221,232,241,
%T 243,304,313,324,342,401,403,412,414,423,1002,1011,1022,1024,1044,
%U 1101,1112,1123,1132,1143,1204,1211,1231,1233,1242,1244,1321,1343,1402,1404,1413,1424,1431
%N Primes written in base 5.
%H Vincenzo Librandi, <a href="/A004679/b004679.txt">Table of n, a(n) for n = 1..1000</a>
%F a(n) = A007091(A000040(n)). - _Michel Marcus_, Sep 03 2016
%t FromDigits/@IntegerDigits[Prime[Range[50]],5] (* _Harvey P. Dale_, Dec 09 2010 *)
%o (PARI) a(n)=subst(Pol(digits(prime(n),5)),'x,10) \\ _Charles R Greathouse IV_, Nov 06 2013
%o (MAGMA) [Seqint(Intseq(NthPrime(n), 5)): n in [1..60]]; // _G. C. Greubel_, Oct 12 2018
%Y Cf. similar sequences listed in A004680.
%Y Cf. A000040, A007091.
%K nonn,easy,base
%O 1,1
%A _N. J. A. Sloane_
|