A101212 - OEIS

A101212

a(1) = 1; for n>=2, a(n) = A001222(n)th positive integer not yet in the sequence.

1, 2, 3, 5, 4, 7, 6, 10, 9, 11, 8, 14, 12, 15, 16, 19, 13, 20, 17, 22, 21, 23, 18, 27, 25, 26, 29, 30, 24, 32, 28, 36, 33, 34, 35, 39, 31, 38, 40, 43, 37, 44, 41, 46, 47, 45, 42, 52, 49, 51, 50, 54, 48, 57, 55, 59, 56, 58, 53, 63, 60, 62, 65, 69, 64, 67, 61, 70, 68, 72, 66, 76

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,2

COMMENTS

A permutation of the positive integers.

LINKS

Table of n, a(n) for n=1..72.

Index entries for sequences that are permutations of the natural numbers

MATHEMATICA

terms = 72; a[1] = 1; a[n_] := a[n] = Complement[Range[Ceiling[6n/5]], Array[a, n-1]][[PrimeOmega[n]]]; Array[a, terms] (* Jean-François Alcover, Jun 06 2017 *)

CROSSREFS

Cf. A001222.

Inverse: A102454; A102453(n) = a(a(n)).

Cf. A102455.

Sequence in context: A072061 A255557 A261102 * A232641 A258746 A064706

Adjacent sequences: A101209 A101210 A101211 * A101213 A101214 A101215

KEYWORD

nonn

AUTHOR

Leroy Quet, Dec 13 2004

EXTENSIONS

More terms from Reinhard Zumkeller, Jan 09 2005

STATUS

approved