The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A269857 (Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing all changes.

A269857

Permutation of natural numbers: a(1) = 1; if n is an odd prime, a(n) = A250469(a(A026233(n))), else a(n) = 2*(a(A026233(n))).
(history; published version)

#9 by Andrey Zabolotskiy at Wed Dec 13 08:23:02 EST 2023

STATUS

editing

approved

#8 by Andrey Zabolotskiy at Wed Dec 13 08:22:59 EST 2023

FORMULA

a(1) = 1; if n is an odd prime, a(n) = A250469(a(A026233(n)), ), else a(n) = 2*(a(A026233(n))).

STATUS

approved

editing

#7 by Andrey Zabolotskiy at Wed Dec 13 08:22:10 EST 2023

STATUS

editing

approved

#6 by Andrey Zabolotskiy at Wed Dec 13 08:22:08 EST 2023

NAME

Permutation of natural numbers: a(1) = 1; if n is an odd prime, a(n) = A250469(a(A026233(n)), ), else a(n) = 2*(a(A026233(n))).

STATUS

approved

editing

#5 by N. J. A. Sloane at Mon Mar 07 12:32:21 EST 2016

STATUS

proposed

approved

#4 by Antti Karttunen at Sun Mar 06 15:11:11 EST 2016

STATUS

editing

proposed

#3 by Antti Karttunen at Sun Mar 06 14:55:41 EST 2016

LINKS

Antti Karttunen, <a href="/A269857/b269857.txt">Table of n, a(n) for n = 1..2662</a>

#2 by Antti Karttunen at Sun Mar 06 14:30:09 EST 2016

NAME

allocated for Antti KarttunenPermutation of natural numbers: a(1) = 1; if n is an odd prime, a(n) = A250469(a(A026233(n)), else a(n) = 2*(a(A026233(n))).

DATA

1, 2, 3, 4, 5, 6, 9, 8, 10, 12, 7, 18, 15, 16, 20, 24, 25, 14, 21, 36, 30, 32, 27, 40, 48, 50, 28, 42, 33, 72, 11, 60, 64, 54, 80, 96, 51, 100, 56, 84, 35, 66, 45, 144, 22, 120, 57, 128, 108, 160, 192, 102, 69, 200, 112, 168, 70, 132, 49, 90, 39, 288, 44, 240, 114, 256, 55, 216, 320, 384, 105, 204, 87, 138, 400

OFFSET

1,2

LINKS

<a href="/index/Per#IntegerPermutation">Index entries for sequences that are permutations of the natural numbers</a>

FORMULA

a(1) = 1; if n is an odd prime, a(n) = A250469(a(A026233(n)), else a(n) = 2*(a(A026233(n))).

As a composition of other permutations:

a(n) = A252755(A071574(n)).

PROG

(Scheme, with memoization-macro definec)

(definec (A269857 n) (cond ((<= n 1) n) ((and (odd? n) (= 1 (A010051 n))) (A250469 (A269857 (A026233 n)))) (else (A005843 (A269857 (A026233 n))))))

CROSSREFS

Inverse: A269858.

Cf. A005843, A026233, A010051, A250469.

Related or similar permutations: A071574, A252755, A269847.

Differs from A269847 for the first time at n=19, where a(19)=21, while A269847(19)=27.

KEYWORD

allocated

nonn

AUTHOR

Antti Karttunen, Mar 06 2016

STATUS

approved

editing

#1 by Antti Karttunen at Sun Mar 06 12:01:49 EST 2016

NAME

allocated for Antti Karttunen

KEYWORD

allocated

STATUS

approved