login
Fixed points of the permutation A254649.
3

%I #4 Feb 04 2015 09:16:39

%S 1,2,3,4,5,6,7,8,9,10,11,14,20,21,22,50,55,61,66,68,77,90,97,158,181,

%T 185,218,247,248,271,285,292,293,304,310,354,358,364,375,461,480,490,

%U 499,504,509,529,547,572,580,588,607,608,629,652,653,665,679,689

%N Fixed points of the permutation A254649.

%C Also fixed points of A254650;

%C A254649(a(n)) = A254650(a(n)) = a(n).

%H Reinhard Zumkeller, <a href="/A254656/b254656.txt">Table of n, a(n) for n = 1..1000</a>

%o (Haskell)

%o a254656 n = a254656_list !! (n-1)

%o a254656_list = [x | x <- [1..], a254649 x == x]

%Y Cf. A254649, A254650.

%K nonn

%O 1,2

%A _Reinhard Zumkeller_, Feb 04 2015