A065253 a(n) = 10*(A064823(n)-1) + A000796(n).

3, 1, 4, 11, 5, 9, 2, 6, 15, 13, 25, 8, 19, 7, 29, 23, 12, 33, 18, 14, 16, 22, 26, 24, 43, 53, 28, 63, 32, 17, 39, 35, 0, 42, 38, 48, 34, 21, 49, 27, 31, 36, 59, 73, 69, 79, 83, 37, 45, 41, 10, 55, 58, 52, 20, 89, 47, 44, 99, 54, 64, 65, 109, 62, 93, 30, 57, 68, 51, 46, 74, 40

Offset

1,1

Comments

The sequence would be a permutation of the naturals if each of the digits 0,1,..,9 occur infinitely often in the decimal expansion of Pi. "Inverse": A065254

Links

Reinhard Zumkeller, Table of n, a(n) for n = 1..10000

Index entries for sequences that are permutations of the natural numbers

Index entries for sequences related to the number Pi

Mathematica

terms = 100; Clear[cnt]; cnt[_] = n = 0;
Do[a[++n] = 10 (++cnt[k] - 1) + k, {k, RealDigits[Pi, 10, terms][[1]]}];
a /@ Range[terms] (* Jean-François Alcover, Nov 15 2019 *)

Prog

(Haskell)
a065253 n = a065253_list !! (n-1)
a065253_list = zipWith (+)
               (map ((* 10) . (subtract 1)) a064823_list) a000796_list
-- Reinhard Zumkeller, Jul 14 2013

Crossrefs

Cf. A064823, A000796, A065254.

Sequence in context: A054631 A180063 A125077 * A010756 A191857 A248044

Adjacent sequences: A065250 A065251 A065252 * A065254 A065255 A065256

Keyword

base,nice,nonn

Author

Klaus Strassburger (strass(AT)ddfi.uni-duesseldorf.de), Oct 26 2001

Status

approved