A004681 Primes written in base 7.

2, 3, 5, 10, 14, 16, 23, 25, 32, 41, 43, 52, 56, 61, 65, 104, 113, 115, 124, 131, 133, 142, 146, 155, 166, 203, 205, 212, 214, 221, 241, 245, 254, 256, 302, 304, 313, 322, 326, 335, 344, 346, 362, 364, 401, 403, 421, 436, 443, 445, 452, 461, 463, 506, 515, 524

Offset

1,1

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Formula

a(n) = A007093(prime(n)). - Michel Marcus, Sep 03 2016

Mathematica

FromDigits/@IntegerDigits[Prime[Range[1000]], 7] (* Vincenzo Librandi, Sep 03 2016 *)

Prog

(PARI) a(n)=subst(Pol(digits(prime(n), 7)), 'x, 10) \\ Charles R Greathouse IV, Nov 06 2013
(PARI) vector(60, n, fromdigits(digits(prime(n), 7))) \\ G. C. Greubel, Oct 10 2018
(Magma) [Seqint(Intseq(NthPrime(n), 7)): n in [1..60]]; // G. C. Greubel, Oct 10 2018

Crossrefs

Cf. similar sequences listed in A004680.

Cf. A007093.

Sequence in context: A120938 A120610 A090859 * A338589 A222406 A044953

Adjacent sequences: A004678 A004679 A004680 * A004682 A004683 A004684

Keyword

nonn,easy,base

Author

N. J. A. Sloane

Status

approved