login
This site is supported by donations to The OEIS Foundation.

 

Logo

Thanks to everyone who made a donation during our annual appeal!
To see the list of donors, or make a donation, see the OEIS Foundation home page.

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A036552 List of pairs (m,2m) where m is the least unused positive number. 5
1, 2, 3, 6, 4, 8, 5, 10, 7, 14, 9, 18, 11, 22, 12, 24, 13, 26, 15, 30, 16, 32, 17, 34, 19, 38, 20, 40, 21, 42, 23, 46, 25, 50, 27, 54, 28, 56, 29, 58, 31, 62, 33, 66, 35, 70, 36, 72, 37, 74, 39, 78, 41, 82, 43, 86, 44, 88, 45, 90, 47, 94, 48, 96, 49, 98, 51, 102 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

COMMENTS

A permutation of the natural numbers. Inverse permutation is A065037.

LINKS

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

P. Erdős, R. Freud, and N. Hegyvári, Arithmetical properties of permutations of integers, Acta Mathematica Hungarica 41:1-2 (1983), pp 169-176.

Index entries for sequences that are permutations of the natural numbers

MATHEMATICA

w = {}; Do[ w = If[ FreeQ[w, k], w = Join[w, {k, 2k}], w], {k, 100}]; w

(* Jean-François Alcover, Nov 04 2011, after Wouter Meeussen *)

PROG

(Haskell)

import Data.List (delete)

a036552 n = a036552_list !! (n-1)

a036552_list = g [1..] where

   g (x:xs) = x : (2*x) : (g $ delete (2*x) xs)

-- Reinhard Zumkeller, Feb 07 2011

CROSSREFS

Alternating merge of A003159 and A036554. Cf. A064736, A065037.

Sequence in context: A082332 A154285 A258078 * A257987 A132169 A273666

Adjacent sequences:  A036549 A036550 A036551 * A036553 A036554 A036555

KEYWORD

nonn,easy,nice

AUTHOR

Tom Verhoeff

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified January 20 03:32 EST 2019. Contains 319323 sequences. (Running on oeis4.)