|
%I #8 Jul 31 2013 14:42:53
%S 1,4,8,12,16,23,28,32,36,43,51,59,64,71,76,80,84,91,99,107,115,126,
%T 135,143,148,155,163,171,176,183,188,192,196,203,211,219,227,238,247,
%U 255,263,274,286,298,307,318,327,335,340,347,355,363,371,382,391,399,404
%N Fixed points of permutation A227741.
%H Antti Karttunen, <a href="/A227742/b227742.txt">Table of n, a(n) for n = 1..1000</a>
%F a(n) = A173318(2*(n-1)) + (1/2)*(1 + A005811((2n)-1)).
%o (Scheme) (define (A227742 n) (+ (A173318 (* 2 (- n 1))) (/ (+ 1 (A005811 (- (* 2 n) 1))) 2)))
%K nonn
%O 1,2
%A _Antti Karttunen_, Jul 25 2013
|
