A368239 -id:A368239

Search: a368239 -id:a368239

Displaying 1-2 of 2 results found.

page 1

A368240

Inverse permutation to A368239.

+20
2

0, 1, 2, 3, 4, 5, 6, 9, 7, 8, 10, 11, 12, 13, 14, 15, 22, 16, 17, 23, 26, 27, 30, 18, 19, 24, 20, 21, 25, 28, 29, 31, 32, 33, 36, 34, 35, 37, 38, 39, 40, 41, 42, 57, 43, 44, 58, 65, 66, 73, 45, 46, 59, 47, 48, 60, 67, 68, 74, 77, 78, 85, 79, 80, 86, 89, 90, 93

(list; graph; refs; listen; history; text; internal format)

OFFSET

0,3

LINKS

Rémy Sigrist, Table of n, a(n) for n = 0..9841

Rémy Sigrist, PARI program

Index entries for sequences that are permutations of the natural numbers

EXAMPLE

A368239(67) = 56, so a(56) = 67.

PROG

(PARI) See Links section.

CROSSREFS

Cf. A368239.

KEYWORD

nonn,base

AUTHOR

Rémy Sigrist, Dec 18 2023

STATUS

approved

A368225

Irregular table of nonnegative integers read by rows: the 1's in the binary expansion of n exactly match the nonzero digits in the balanced ternary expansions of the terms in the n-th row.

+10
4

0, 1, 3, 2, 4, 9, 8, 10, 6, 12, 5, 7, 11, 13, 27, 26, 28, 24, 30, 23, 25, 29, 31, 18, 36, 17, 19, 35, 37, 15, 21, 33, 39, 14, 16, 20, 22, 32, 34, 38, 40, 81, 80, 82, 78, 84, 77, 79, 83, 85, 72, 90, 71, 73, 89, 91, 69, 75, 87, 93, 68, 70, 74, 76, 86, 88, 92, 94

(list; graph; refs; listen; history; text; internal format)

OFFSET

0,3

COMMENTS

As a flat sequence, this is a permutation of the nonnegative integers with inverse A368226 and infinitely many fixed points (see Formula section).

Row 0 has one term, and for n > 0, row n has A048896(n-1) terms.

For any n >= 0, row n ends with A005836(n+1).

LINKS

Rémy Sigrist, Table of n, a(n) for n = 0..9841 (rows for n = 0..2^9-1 flattened)

Index entries for sequences that are permutations of the natural numbers

FORMULA

A343231(T(n, k)) = n.

a(m) = m for any m in A003462.

EXAMPLE

Table T(n, k) begins:

2, 4;

8, 10;

6, 12;

5, 7, 11, 13;

27;

26, 28;

24, 30;

23, 25, 29, 31;

18, 36;

17, 19, 35, 37;

15, 21, 33, 39;

14, 16, 20, 22, 32, 34, 38, 40;

81;

...

PROG

(PARI) row(n) = { my (r = [sign(n)], b = binary(n)); for (k = 2, #b, r = [3*v+b[k]|v<-r]; if (b[k], r = concat(r, [v-2|v<-r]); ); ); Set(r); }

CROSSREFS

See A368229 and A368239 for similar sequences.

Cf. A003462, A005836, A048896, A343231, A353662, A368226 (inverse).