A004680 Primes written in base 6.
2, 3, 5, 11, 15, 21, 25, 31, 35, 45, 51, 101, 105, 111, 115, 125, 135, 141, 151, 155, 201, 211, 215, 225, 241, 245, 251, 255, 301, 305, 331, 335, 345, 351, 405, 411, 421, 431, 435, 445, 455, 501, 515, 521, 525, 531, 551, 1011, 1015, 1021, 1025, 1035
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Crossrefs
Programs
-
Magma
[Seqint(Intseq(NthPrime(n),6)): n in [1..60]]; // G. C. Greubel, Oct 10 2018
-
Mathematica
FromDigits/@IntegerDigits[Prime[Range[50]], 6] (* Vincenzo Librandi, Sep 03 2016 *)
-
PARI
a(n)=subst(Pol(digits(prime(n),6)),'x,10) \\ Charles R Greathouse IV, Nov 06 2013
-
PARI
vector(60, n, fromdigits(digits(prime(n), 6))) \\ G. C. Greubel, Oct 10 2018
Formula
a(n) = A007092(prime(n)). - Michel Marcus, Sep 03 2016