login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A245607 Permutation of natural numbers, the even bisection of A245605 halved: a(n) = A245605(2*n)/2. 13
1, 2, 3, 5, 4, 9, 13, 6, 17, 37, 8, 25, 7, 10, 69, 33, 26, 11, 41, 16, 277, 45, 18, 65, 21, 14, 1109, 15, 52, 73, 57, 74, 35, 209, 82, 293, 141, 34, 53, 329, 12, 1173, 31, 36, 213, 149, 104, 43, 49, 20, 145, 173, 138, 81, 581, 114, 553, 71, 90, 133, 101, 282, 19, 325, 24, 457, 165, 50, 77, 97, 62, 105, 555, 42 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

Antti Karttunen, Table of n, a(n) for n = 1..10001

Index entries for sequences that are permutations of the natural numbers

FORMULA

a(n) = A245605(2*n)/2.

As a composition of related permutations:

a(n) = A245605(A064216(n)).

a(n) = A245705(A245707(n)).

PROG

(PARI)

A064989(n) = my(f = factor(n)); for(i=1, #f~, if((2 == f[i, 1]), f[i, 1] = 1, f[i, 1] = precprime(f[i, 1]-1))); factorback(f);

A245605(n) = if(1==n, 1, if(0==(n%2), 2*A245605(A064989(n-1)), 1+(2*A245605(A064989(n)-1))));

A245607(n) = A245605(2*n)/2;

for(n=1, 10001, write("b245607.txt", n, " ", A245607(n)));

(Scheme) (define (A245607 n) (A245605 (A064216 n)))

CROSSREFS

Inverse: A245608.

Cf. A064216, A064989, A245705, A245707, A245605, A245609-A245610, A245611, A244153, A243065-A243066.

Sequence in context: A060030 A081025 A329811 * A251604 A307023 A307024

Adjacent sequences:  A245604 A245605 A245606 * A245608 A245609 A245610

KEYWORD

nonn

AUTHOR

Antti Karttunen, Jul 29 2014

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified April 10 22:05 EDT 2021. Contains 342856 sequences. (Running on oeis4.)