|
%I #10 Jul 31 2014 23:50:17
%S 1,3,2,6,9,26,8,5,56,344,21,36,4,11,204,86,25,16,176,39,518,24,125,
%T 1376,14,7,1268,10,51,3186,126,1015,298,476,305,3204,590,115,50,5636,
%U 15,7118,22,825,162,2388,153,34,626,45,4356,144,301,156,4374,131,816,454,49,260,44,995,52,168,81
%N Permutation of natural numbers: a(n) = A244319(A064216(n)).
%H Antti Karttunen, <a href="/A245609/b245609.txt">Table of n, a(n) for n = 1..10001</a>
%H <a href="/index/Per#IntegerPermutation">Index entries for sequences that are permutations of the natural numbers</a>
%F a(n) = A244319(A064216(n)).
%o (PARI)
%o A064216(n) = A064989((2*n)-1);
%o A245609(n) = A244319(A064216(n)); \\ For the other needed functions, see A244319.
%o for(n=1, 10001, write("b245609.txt", n, " ", A245609(n)));
%o (Scheme) (define (A245609 n) (A244319 (A064216 n)))
%Y Inverse: A245610.
%Y Cf. A064216, A064989, A244319, A245607-A245608.
%K nonn
%O 1,2
%A _Antti Karttunen_, Jul 29 2014
|
