cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-10 of 14 results. Next

A264975 Permutation of nonnegative integers: a(n) = A264974(A263272(n)).

Original entry on oeis.org

0, 1, 2, 3, 4, 5, 6, 19, 16, 9, 10, 7, 12, 13, 14, 15, 46, 43, 18, 55, 20, 57, 58, 17, 48, 49, 52, 27, 28, 11, 30, 31, 8, 21, 22, 25, 36, 37, 34, 39, 40, 41, 42, 127, 124, 45, 136, 47, 138, 139, 44, 129, 130, 133, 54, 163, 56, 165, 166, 59, 60, 181, 178, 171, 172, 169, 174, 175, 50, 51, 154, 151, 144, 145, 142, 147, 148, 53, 156, 157, 160, 81
Offset: 0

Views

Author

Antti Karttunen, Dec 05 2015

Keywords

Crossrefs

Formula

a(n) = A264974(A263272(n)).
a(n) = A263272(A264984(n)) / 2.
a(n) = (1/4) * A264984(A264984(n)) = (1/4) * A263273(2 * A263273(2*n)).
Other identities. For all n >= 0:
a(3*n) = 3*a(n).
A000035(a(n)) = A000035(n). [This permutation preserves the parity of n.]

A264976 Permutation of nonnegative integers: a(n) = A263272(A264974(n)).

Original entry on oeis.org

0, 1, 2, 3, 4, 5, 6, 11, 32, 9, 10, 29, 12, 13, 14, 15, 8, 23, 18, 7, 20, 33, 34, 95, 96, 35, 104, 27, 28, 83, 30, 31, 86, 87, 38, 113, 36, 37, 110, 39, 40, 41, 42, 17, 50, 45, 16, 47, 24, 25, 68, 69, 26, 77, 54, 19, 56, 21, 22, 59, 60, 101, 302, 99, 100, 299, 102, 103, 284, 285, 98, 293, 288, 97, 290, 105, 106, 311, 312, 107, 320, 81
Offset: 0

Views

Author

Antti Karttunen, Dec 05 2015

Keywords

Crossrefs

Inverse: A264975
Cf. also A264991, A264992.

Formula

a(n) = A263272(A264974(n)).
a(n) = (1/2) * A263273(A263273(4*n) / 2).
Other identities. For all n >= 0:
a(3*n) = 3*a(n).
A000035(a(n)) = A000035(n). [This permutation preserves the parity of n.]

A264986 Even bisection of A263272; terms of A264974 doubled.

Original entry on oeis.org

0, 2, 4, 6, 8, 10, 12, 14, 32, 18, 20, 38, 24, 26, 28, 30, 16, 34, 36, 22, 40, 42, 68, 86, 96, 50, 104, 54, 56, 110, 60, 74, 92, 114, 44, 98, 72, 62, 116, 78, 80, 82, 84, 46, 100, 90, 64, 118, 48, 70, 88, 102, 52, 106, 108, 58, 112, 66, 76, 94, 120, 122, 284, 126, 176, 338, 204, 230, 248, 258, 140, 302, 288
Offset: 0

Views

Author

Antti Karttunen, Dec 05 2015

Keywords

Crossrefs

Programs

  • Python
    from sympy import factorint
    from sympy.ntheory.factor_ import digits
    from operator import mul
    def a030102(n): return 0 if n==0 else int(''.join(map(str, digits(n, 3)[1:][::-1])), 3)
    def a038502(n):
        f=factorint(n)
        return 1 if n==1 else reduce(mul, [1 if i==3 else i**f[i] for i in f])
    def a038500(n): return n/a038502(n)
    def a263273(n): return 0 if n==0 else a030102(a038502(n))*a038500(n)
    def a(n): return a263273(4*n)/2 # Indranil Ghosh, May 23 2017
  • Scheme
    (define (A264986 n) (A263272 (+ n n)))
    

Formula

a(n) = A263272(2*n).
a(n) = 2 * A264974(n).
a(n) = A263273(4*n)/2.

A265363 Permutation of nonnegative integers: a(n) = A264974(A263273(n)).

Original entry on oeis.org

0, 1, 2, 3, 4, 7, 6, 5, 16, 9, 10, 11, 12, 13, 34, 21, 8, 25, 18, 19, 20, 15, 14, 43, 48, 17, 52, 27, 28, 29, 30, 31, 88, 33, 32, 97, 36, 37, 38, 39, 40, 115, 102, 35, 106, 63, 22, 61, 24, 23, 70, 75, 26, 79, 54, 55, 56, 57, 58, 169, 60, 59, 178, 45, 46, 47, 42, 41, 124, 129, 44, 133, 144, 49, 142, 51, 50, 151, 156, 53, 160, 81
Offset: 0

Views

Author

Antti Karttunen, Dec 07 2015

Keywords

Comments

Composition of A263273 with the permutation obtained from its quadrisection.

Crossrefs

Inverse: A265364.
Cf. also A265343, A265365.

Programs

Formula

a(n) = A264974(A263273(n)).
Other identities. For all n >= 0:
a(3*n) = 3*a(n).

A265364 Permutation of nonnegative integers: a(n) = A263273(A264974(n)).

Original entry on oeis.org

0, 1, 2, 3, 4, 7, 6, 5, 16, 9, 10, 11, 12, 13, 22, 21, 8, 25, 18, 19, 20, 15, 46, 49, 48, 17, 52, 27, 28, 29, 30, 31, 34, 33, 14, 43, 36, 37, 38, 39, 40, 67, 66, 23, 70, 63, 64, 65, 24, 73, 76, 75, 26, 79, 54, 55, 56, 57, 58, 61, 60, 47, 142, 45, 136, 137, 138, 139, 148, 147, 50, 151, 144, 145, 146, 51, 154, 157, 156, 53, 160, 81
Offset: 0

Views

Author

Antti Karttunen, Dec 07 2015

Keywords

Comments

Composition of A263273 with the permutation obtained from its quadrisection.

Crossrefs

Inverse: A265363.
Cf. also A265344, A265366.

Programs

Formula

a(n) = A263273(A264974(n)).
Other identities. For all n >= 0:
a(3*n) = 3*a(n).

A265361 Permutation of nonnegative integers: a(n) = A264974(A264989(n)).

Original entry on oeis.org

0, 1, 2, 5, 4, 3, 6, 7, 19, 14, 8, 16, 17, 13, 9, 18, 10, 12, 15, 11, 20, 59, 34, 55, 56, 22, 58, 41, 23, 43, 44, 35, 46, 47, 25, 49, 50, 26, 52, 53, 40, 27, 54, 28, 36, 45, 29, 21, 24, 37, 30, 33, 31, 39, 42, 32, 48, 51, 38, 57, 60, 61, 181, 176, 62, 178, 179, 115, 163, 164, 64, 166, 167, 65, 169, 170, 103, 172, 173, 67, 175, 122
Offset: 0

Views

Author

Antti Karttunen, Dec 07 2015

Keywords

Comments

Composition of permutations obtained from the bisections of A263272.

Crossrefs

Inverse: A265362.

Programs

A265362 Permutation of nonnegative integers: a(n) = A264989(A264974(n)).

Original entry on oeis.org

0, 1, 2, 5, 4, 3, 6, 7, 10, 14, 16, 19, 17, 13, 9, 18, 11, 12, 15, 8, 20, 47, 25, 28, 48, 34, 37, 41, 43, 46, 50, 52, 55, 51, 22, 31, 44, 49, 58, 53, 40, 27, 54, 29, 30, 45, 32, 33, 56, 35, 36, 57, 38, 39, 42, 23, 24, 59, 26, 21, 60, 61, 64, 128, 70, 73, 143, 79, 82, 144, 88, 91, 129, 97, 100, 146, 106, 109, 147, 115, 118, 122
Offset: 0

Views

Author

Antti Karttunen, Dec 07 2015

Keywords

Comments

Composition of permutations obtained from the bisections of A263272.

Crossrefs

Inverse: A265361.

Programs

Formula

a(n) = A264989(A264974(n)).

A265367 Permutation of nonnegative integers: a(n) = A264974(A263272(A263273(n))).

Original entry on oeis.org

0, 1, 2, 3, 4, 19, 6, 5, 16, 9, 10, 55, 12, 13, 58, 57, 46, 49, 18, 7, 20, 15, 14, 17, 48, 43, 52, 27, 28, 163, 30, 37, 172, 165, 136, 145, 36, 31, 166, 39, 40, 175, 174, 139, 148, 171, 22, 181, 138, 127, 154, 147, 130, 157, 54, 11, 56, 21, 34, 169, 60, 47, 142, 45, 8, 59, 42, 41, 50, 51, 44, 53, 144, 25, 178, 129, 124, 151, 156, 133, 160, 81
Offset: 0

Views

Author

Antti Karttunen, Dec 07 2015

Keywords

Comments

Composition of A263273 with the permutations obtained from its bisection (A263272) and quadrisection (A264974), in that order from right to left.

Crossrefs

Programs

Formula

a(n) = A264974(A263272(A263273(n))).
As a composition of other related permutations:
a(n) = A264974(A265351(n)).
a(n) = A264975(A263273(n)).
Other identities. For all n >= 0:
a(3*n) = 3*a(n).

A265368 Permutation of nonnegative integers: a(n) = A263273(A263272(A264974(n))).

Original entry on oeis.org

0, 1, 2, 3, 4, 7, 6, 19, 64, 9, 10, 55, 12, 13, 22, 21, 8, 23, 18, 5, 20, 57, 46, 199, 192, 73, 208, 27, 28, 163, 30, 37, 190, 165, 58, 193, 36, 31, 166, 39, 40, 67, 66, 25, 70, 63, 16, 61, 24, 17, 68, 69, 26, 71, 54, 11, 56, 15, 14, 65, 60, 181, 586, 171, 100, 505, 138, 127, 604, 597, 226, 631, 576, 145, 550, 219, 154, 613, 624, 235, 640, 81
Offset: 0

Views

Author

Antti Karttunen, Dec 07 2015

Keywords

Comments

Composition of A263273 with the permutations obtained from its bisection (A263272) and quadrisection (A264974), in that order from left to right.

Crossrefs

Programs

Formula

a(n) = A263273(A263272(A264974(n))).
As a composition of other related permutations:
a(n) = A265352(A264974(n)).
a(n) = A263273(A264976(n)).
Other identities. For all n >= 0:
a(3*n) = 3*a(n).

A263273 Bijective base-3 reverse: a(0) = 0; for n >= 1, a(n) = A030102(A038502(n)) * A038500(n).

Original entry on oeis.org

0, 1, 2, 3, 4, 7, 6, 5, 8, 9, 10, 19, 12, 13, 22, 21, 16, 25, 18, 11, 20, 15, 14, 23, 24, 17, 26, 27, 28, 55, 30, 37, 64, 57, 46, 73, 36, 31, 58, 39, 40, 67, 66, 49, 76, 63, 34, 61, 48, 43, 70, 75, 52, 79, 54, 29, 56, 33, 38, 65, 60, 47, 74, 45, 32, 59, 42, 41, 68, 69, 50, 77, 72, 35, 62, 51, 44, 71, 78, 53, 80, 81
Offset: 0

Views

Author

Antti Karttunen, Dec 05 2015

Keywords

Comments

Here the base-3 reverse has been adjusted so that the maximal suffix of trailing zeros (in base-3 representation A007089) stays where it is at the right side, and only the section from the most significant digit to the least significant nonzero digit is reversed, thus making this sequence a self-inverse permutation of nonnegative integers.
Because successive powers of 3 and 9 modulo 2, 4 and 8 are always either constant 1, 1, 1, ... or alternating 1, -1, 1, -1, ... it implies similar simple divisibility rules for 2, 4 and 8 in base 3 as e.g. 3, 9 and 11 have in decimal base (see the Wikipedia-link). As these rules do not depend on which direction they are applied from, it means that this bijection preserves the fact whether a number is divisible by 2, 4 or 8, or whether it is not. Thus natural numbers are divided to several subsets, each of which is closed with respect to this bijection. See the Crossrefs section for permutations obtained from these sections.
When polynomials over GF(3) are encoded as natural numbers (coefficients presented with the digits of the base-3 expansion of n), this bijection works as a multiplicative automorphism of the ring GF(3)[X]. This follows from the fact that as there are no carries involved, the multiplication (and thus also the division) of such polynomials could be as well performed by temporarily reversing all factors (like they were seen through mirror). This implies also that the sequences A207669 and A207670 are closed with respect to this bijection.

Examples

			For n = 15, A007089(15) = 120. Reversing this so that the trailing zero stays at the right yields 210 = A007089(21), thus a(15) = 21 and vice versa, a(21) = 15.
		

Crossrefs

Bisections: A264983, A264984.
Permutations induced by various sections: A263272 (a(2n)/2), A264974 (a(4n)/4), A264978 (a(8n)/8), A264985, A264989.
Cf. also A004488, A140263, A140264, A246207, A246208 (other base-3 related permutations).

Programs

  • Mathematica
    r[n_] := FromDigits[Reverse[IntegerDigits[n, 3]], 3]; b[n_] := n/ 3^IntegerExponent[n, 3]; c[n_] := n/b[n]; a[0]=0; a[n_] := r[b[n]]*c[n]; Table[a[n], {n, 0, 80}] (* Jean-François Alcover, Dec 29 2015 *)
  • Python
    from sympy import factorint
    from sympy.ntheory.factor_ import digits
    from operator import mul
    def a030102(n): return 0 if n==0 else int(''.join(map(str, digits(n, 3)[1:][::-1])), 3)
    def a038502(n):
        f=factorint(n)
        return 1 if n==1 else reduce(mul, [1 if i==3 else i**f[i] for i in f])
    def a038500(n): return n/a038502(n)
    def a(n): return 0 if n==0 else a030102(a038502(n))*a038500(n) # Indranil Ghosh, May 22 2017
  • Scheme
    (define (A263273 n) (if (zero? n) n (* (A030102 (A038502 n)) (A038500 n))))
    

Formula

a(0) = 0; for n >= 1, a(n) = A030102(A038502(n)) * A038500(n).
Other identities. For all n >= 0:
a(3*n) = 3*a(n).
A000035(a(n)) = A000035(n). [This permutation preserves the parity of n.]
A010873(a(n)) = 0 if and only if A010873(n) = 0. [See the comments section.]
Showing 1-10 of 14 results. Next