login
A245610
Permutation of natural numbers: a(n) = A048673(A244319(n)).
8
1, 3, 2, 13, 8, 4, 26, 7, 5, 28, 14, 172, 149, 25, 41, 18, 635, 102, 113, 1194, 11, 43, 428, 22, 17, 6, 77, 88, 71, 259, 527, 130, 227, 48, 74, 12, 677, 235, 20, 688, 68, 634, 5711, 61, 50, 1593, 1490, 27612, 59, 39, 29, 63, 11438, 10119, 4748, 9, 344, 238, 413, 1602, 941, 69
OFFSET
1,2
FORMULA
a(n) = A048673(A244319(n)).
PROG
(PARI)
A048673(n) = (1+A003961(n))/2;
A245610(n) = A048673(A244319(n)); \\ For the other needed functions, see under A244319.
for(n=1, 10001, write("b245610.txt", n, " ", A245610(n)));
(Scheme) (define (A245610 n) (A048673 (A244319 n)))
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Jul 29 2014
STATUS
approved