A328047 Permutation of positive integers: a(1) = 1. For n > 1, a(n) is the smallest positive integer not already in the sequence such that bigomega(a(n)) != bigomega(a(n-1)), where bigomega(i) is A001222(i).

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

Offset

1,2

Links

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

Prog

(PARI) my(v=[1], terms=40); print1(1, ", "); while(1, if(#v > terms-1, break); for(k=1, oo, if(bigomega(k)!=bigomega(v[#v]) && !setsearch(vecsort(v), k), print1(k, ", "); v=concat(v, k); break)))

Crossrefs

Cf. A001222, A328048, A328049, A328050.

Sequence in context: A227370 A135761 A086305 * A073898 A067747 A073846

Adjacent sequences: A328044 A328045 A328046 * A328048 A328049 A328050

Keyword

nonn,easy

Author

Felix Fröhlich, Oct 03 2019

Status

approved