[go: up one dir, main page]

login
A065649
Permutation of nonnegative integers based on Champernowne's constant 0.123456789101112131415...
7
0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 11, 10, 21, 31, 41, 12, 51, 13, 61, 14, 71, 15, 81, 16, 91, 17, 101, 18, 111, 19, 22, 20, 32, 121, 42, 52, 62, 23, 72, 24, 82, 25, 92, 26, 102, 27, 112, 28, 122, 29, 33, 30, 43, 131, 53, 132, 63, 73, 83, 34, 93, 35, 103, 36, 113, 37, 123, 38
OFFSET
0,3
COMMENTS
A261293(n) = a(a(n)). - Reinhard Zumkeller, Aug 14 2015
FORMULA
a(n) = if n = 0 then 0 else 10*(A065648(n)-1) + A033307(n-1).
PROG
(Haskell)
a065649 n = a065649_list !! n
a065649_list = zipWith (+)
(map ((* 10) . subtract 1) a065648_list) (0 : a033307_list)
-- Reinhard Zumkeller, Aug 13 2015
CROSSREFS
Cf. A261279 (fixed points), A261293, A261333.
Sequence in context: A296423 A065650 A358386 * A338830 A262037 A262039
KEYWORD
base,nice,nonn,look
AUTHOR
Klaus Strassburger (strass(AT)ddfi.uni-duesseldorf.de), Nov 09 2001
EXTENSIONS
Offset and defining formula adjusted by Reinhard Zumkeller, Aug 13 2015
STATUS
approved