cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-5 of 5 results.

A065649 Permutation of nonnegative integers based on Champernowne's constant 0.123456789101112131415...

Original entry on oeis.org

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

Views

Author

Klaus Strassburger (strass(AT)ddfi.uni-duesseldorf.de), Nov 09 2001

Keywords

Comments

A261293(n) = a(a(n)). - Reinhard Zumkeller, Aug 14 2015

Crossrefs

Cf. A261279 (fixed points), A261293, A261333.

Programs

  • Haskell
    a065649 n = a065649_list !! n
    a065649_list = zipWith (+)
                   (map ((* 10) . subtract 1) a065648_list) (0 : a033307_list)
    -- Reinhard Zumkeller, Aug 13 2015

Formula

a(n) = if n = 0 then 0 else 10*(A065648(n)-1) + A033307(n-1).

Extensions

Offset and defining formula adjusted by Reinhard Zumkeller, Aug 13 2015

A065650 Inverse permutation to A065649.

Original entry on oeis.org

0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 11, 10, 15, 17, 19, 21, 23, 25, 27, 29, 31, 12, 30, 37, 39, 41, 43, 45, 47, 49, 51, 13, 32, 50, 59, 61, 63, 65, 67, 69, 71, 14, 34, 52, 70, 81, 83, 85, 87, 89, 91, 16, 35, 54, 72, 90, 103, 105, 107, 109, 111, 18, 36, 56, 74, 92, 110, 125, 127
Offset: 0

Views

Author

Klaus Strassburger (strass(AT)ddfi.uni-duesseldorf.de), Nov 09 2001

Keywords

Crossrefs

Cf. A261279 (fixed points), A261294.

Programs

  • Haskell
    import Data.List (elemIndex); import Data.Maybe (fromJust)
    a065650 = fromJust . (`elemIndex` a065649_list)
    -- Reinhard Zumkeller, Aug 13 2015

Extensions

Offset changed by Reinhard Zumkeller, Aug 13 2015

A261293 a(n) = A065649(A065649(n)).

Original entry on oeis.org

0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 15, 20, 25, 21, 30, 31, 35, 41, 40, 12, 45, 51, 50, 13, 115, 61, 60, 14, 81, 71, 32, 165, 92, 43, 103, 16, 54, 91, 114, 17, 65, 101, 125, 18, 76, 111, 126, 19, 121, 22, 26, 70, 131, 87, 36, 141, 46, 42, 151, 52, 56, 62
Offset: 0

Views

Author

Reinhard Zumkeller, Aug 14 2015

Keywords

Comments

Permutation of the nonnegatve integers with inverse A261294;
a(A065650(n)) = A065650(a(n)) = A065649(n).

Crossrefs

Cf. A065649, A065650, A261294 (inverse), A261279 (fixed points).

Programs

  • Haskell
    a261293 = a065649 . a065649

A261294 a(n) = A065650(A065650(n)).

Original entry on oeis.org

0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 21, 25, 29, 12, 37, 41, 45, 49, 13, 15, 51, 65, 69, 14, 52, 81, 85, 89, 16, 17, 32, 91, 109, 18, 56, 92, 125, 129, 20, 19, 59, 35, 131, 22, 58, 96, 132, 169, 24, 23, 61, 72, 38, 171, 62, 100, 136, 172, 28, 27, 63, 103
Offset: 0

Views

Author

Reinhard Zumkeller, Aug 14 2015

Keywords

Comments

Permutation of the nonnegatve integers with inverse A261293;
a(A065649(n)) = A065649(a(n)) = A065650(n).

Crossrefs

Cf. A065650, A065649, A261293 (inverse), A261279 (fixed points).

Programs

  • Haskell
    a261294 = a065650 . a065650

A261335 Fixed points of permutations A261333, A261334.

Original entry on oeis.org

53, 334, 522, 1194, 2869, 3036, 20825, 29757, 38649, 42376, 206634, 779484, 2501844, 3179745, 6144896, 7489482, 71814716, 74518733, 114518733, 427670705, 821804556, 826199354, 851684546, 1276199354, 4825184535, 9444444445, 9592618243, 14592618243, 592213913815
Offset: 1

Views

Author

Reinhard Zumkeller, Aug 15 2015

Keywords

Crossrefs

Programs

  • Haskell
    a261335 n = a261335_list !! (n-1)
    a261335_list = [x | x <- [0..], a261333 x == x]

Extensions

a(13)-a(29) from Hiroaki Yamanouchi, Aug 21 2015
Showing 1-5 of 5 results.