A253565 Permutation of natural numbers: a(0) = 1, a(1) = 2; after which, a(2n) = A253550(a(n)), a(2n+1) = A253560(a(n)).
1, 2, 3, 4, 5, 9, 6, 8, 7, 25, 15, 27, 10, 18, 12, 16, 11, 49, 35, 125, 21, 75, 45, 81, 14, 50, 30, 54, 20, 36, 24, 32, 13, 121, 77, 343, 55, 245, 175, 625, 33, 147, 105, 375, 63, 225, 135, 243, 22, 98, 70, 250, 42, 150, 90, 162, 28, 100, 60, 108, 40, 72, 48, 64, 17, 169, 143, 1331, 91, 847, 539, 2401, 65, 605, 385, 1715, 275, 1225, 875, 3125, 39
Offset: 0
Examples
From _Gus Wiseman_, Dec 23 2022: (Start) This represents the following bijection between compositions and partitions. The n-th composition in standard order together with the reversed prime indices of a(n) are: 0: () -> () 1: (1) -> (1) 2: (2) -> (2) 3: (1,1) -> (1,1) 4: (3) -> (3) 5: (2,1) -> (2,2) 6: (1,2) -> (2,1) 7: (1,1,1) -> (1,1,1) 8: (4) -> (4) 9: (3,1) -> (3,3) 10: (2,2) -> (3,2) 11: (2,1,1) -> (2,2,2) 12: (1,3) -> (3,1) 13: (1,2,1) -> (2,2,1) 14: (1,1,2) -> (2,1,1) 15: (1,1,1,1) -> (1,1,1,1) (End)
Links
Crossrefs
Programs
-
Mathematica
stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse; Times@@Prime/@#&/@Table[Accumulate[stc[n]-1]+1,{n,0,60}] (* Gus Wiseman, Dec 17 2022 *)
Formula
As a composition of related permutations:
Other identities and observations. For all n >= 0:
a(2n+1) - a(2n) > 0. [See the comment above.]
If n = 2^(x_1)+...+2^(x_k) then a(n) = Product_{i=1..k} prime(x_k-x_{i-1}-k+i) where x_0 = 0. - Gus Wiseman, Dec 23 2022
Comments