A064959 Inverse permutation to A064419.

1, 2, 3, 4, 5, 11, 23, 18, 14, 6, 33, 12, 40, 24, 7, 19, 62, 13, 68, 8, 25, 34, 87, 17, 9, 41, 15, 26, 104, 10, 111, 20, 35, 63, 22, 16, 133, 69, 42, 21, 144, 27, 162, 36, 30, 88, 172, 28, 47, 31, 64, 43, 197, 29, 32, 46, 70, 105, 215, 38, 237, 112, 48, 52, 39, 37, 248, 65

Offset

1,2

Links

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

J. C. Lagarias, E. M. Rains and N. J. A. Sloane, The EKG sequence, Exper. Math. 11 (2002), 437-446.

Index entries for sequences related to EKG sequence

Index entries for sequences that are permutations of the natural numbers

Prog

(Haskell)
import Data.List (elemIndex)
import Data.Maybe (fromJust)
a064959 n = a064959_list !! (n-1)
a064959_list = map ((+ 1) . fromJust . (`elemIndex` a064419_list)) [1..]
-- Reinhard Zumkeller, Sep 17 2001

Crossrefs

Cf. A064419, A064413.

Sequence in context: A083160 A123823 A274837 * A217650 A032988 A280206

Adjacent sequences: A064956 A064957 A064958 * A064960 A064961 A064962

Keyword

nonn,easy

Author

N. J. A. Sloane, Oct 30, 2001

Extensions

More terms from Naohiro Nomoto, Oct 31 2001

Status

approved