A004683 Primes written in base 9.

2, 3, 5, 7, 12, 14, 18, 21, 25, 32, 34, 41, 45, 47, 52, 58, 65, 67, 74, 78, 81, 87, 102, 108, 117, 122, 124, 128, 131, 135, 151, 155, 162, 164, 175, 177, 184, 201, 205, 212, 218, 221, 232, 234, 238, 241, 254, 267

Offset: 1

Author

N. J. A. Sloane

Keywords

• nonn
• easy
• base

Links

• Zak Seidov, Table of n, a(n) for n = 1..1000

Crossrefs

Subsequence of A007095.

Programs

Magma

[Seqint(Intseq(NthPrime(n),9)): n in [1..50]]; // G. C. Greubel, Oct 09 2018

Mathematica

Table[FromDigits[IntegerDigits[Prime[n], 9]], {n, 100}] (* Zak Seidov, Apr 25 2016 *)

PARI

a(n)=subst(Pol(digits(prime(n),9)),'x,10) \\ Charles R Greathouse IV, Nov 06 2013

PARI

vector(50, n, fromdigits(digits(prime(n), 9))) \\ G. C. Greubel, Oct 09 2018