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.

Previous Showing 51-60 of 85 results. Next

A243287 a(1)=1, and for n > 1, if n is k-th number divisible by the square of its largest prime factor (i.e., n = A070003(k)), a(n) = 1 + (2*a(k)); otherwise, when n = A102750(k), a(n) = 2*a(k).

Original entry on oeis.org

1, 2, 4, 3, 8, 6, 16, 5, 9, 12, 32, 10, 18, 24, 64, 7, 20, 17, 36, 48, 128, 14, 40, 34, 13, 72, 33, 96, 256, 28, 80, 11, 68, 26, 144, 19, 66, 192, 512, 56, 160, 22, 136, 52, 288, 38, 132, 384, 25, 65, 1024, 112, 320, 21, 44, 272, 104, 576, 76, 264, 768, 50, 130, 37, 2048
Offset: 1

Views

Author

Antti Karttunen, Jun 02 2014

Keywords

Comments

This is an instance of "entanglement permutation", where two pairs of complementary subsets of natural numbers are interwoven with each other. In this case complementary pair A070003/A102750 (numbers which are divisible/not divisible by the square of their largest prime factor) is entangled with complementary pair odd/even numbers (A005408/A005843).
Thus this shares with the permutation A122111 the property that each term of A102750 is mapped to a unique even number and likewise each term of A070003 is mapped to a unique odd number.

Crossrefs

Inverse: A243288.
Similarly constructed permutations: A243343-A243346, A135141-A227413, A237126-A237427, A193231.

Formula

a(1) = 1, and thereafter, if A241917(n) = 0 (i.e., n is a term of A070003), a(n) = 1 + (2*a(A243282(n))); otherwise a(n) = 2*a(A243285(n)) (where A243282 and A243285 give the number of integers <= n divisible/not divisible by the square of their largest prime factor).

A243343 a(1)=1; thereafter, if n is the k-th squarefree number (i.e., n = A005117(k)), a(n) = 1 + (2*a(k-1)); otherwise, when n is k-th nonsquarefree number (i.e., n = A013929(k)), a(n) = 2*a(k).

Original entry on oeis.org

1, 3, 7, 2, 15, 5, 31, 6, 14, 11, 63, 4, 13, 29, 23, 30, 127, 10, 9, 62, 27, 59, 47, 12, 28, 61, 22, 126, 255, 21, 19, 8, 125, 55, 119, 26, 95, 25, 57, 58, 123, 45, 253, 46, 60, 511, 43, 254, 20, 18, 39, 124, 17, 54, 251, 118, 111, 239, 53, 94, 191, 51, 24, 56
Offset: 1

Views

Author

Antti Karttunen, Jun 03 2014

Keywords

Comments

This is an instance of an "entanglement permutation", where two pairs of complementary subsets of natural numbers are interwoven with each other. In this case complementary pair A005117/A013929 (numbers which are squarefree/not squarefree) is entangled with complementary pair odd/even numbers (A005408/A005843).
Thus this shares with permutation A243352 the property that each term of A005117 is mapped bijectively to a unique odd number and likewise each term of A013929 is mapped (bijectively) to a unique even number. However, instead of placing terms into those positions in monotone order this sequence recursively permutes the order of both subsets with the emerging permutation itself.
Are there any other fixed points than 1, 13, 54, 120, 1389, 3183, ... ?

Crossrefs

Formula

a(1) = 1; thereafter, if A008966(n) = 0 (i.e., n is a term of A013929, not squarefree), a(n) = 2*a(A057627(n)); otherwise a(n) = 2*a(A013928(n+1)-1)+1 (where A057627 and A013928(n+1) give the number of integers <= n divisible/not divisible by a square greater than one).
For all n, A000035(a(n)) = A008966(n) = A008683(n)^2, or equally, a(n) = mu(n) modulo 2. The same property holds for A243352.

A243288 Permutation of natural numbers: a(1)=1, a(2n) = A102750(a(n)), a(2n+1) = A070003(a(n)).

Original entry on oeis.org

1, 2, 4, 3, 8, 6, 16, 5, 9, 12, 32, 10, 25, 22, 81, 7, 18, 13, 36, 17, 54, 42, 242, 14, 49, 34, 150, 30, 128, 99, 882, 11, 27, 24, 100, 19, 64, 46, 256, 23, 98, 68, 490, 55, 338, 279, 4624, 20, 72, 62, 432, 44, 245, 178, 2209, 40, 216, 154, 1800, 119, 1200, 966
Offset: 1

Views

Author

Antti Karttunen, Jun 02 2014

Keywords

Comments

This is an instance of "entanglement permutation", where two pairs of complementary subsets of natural numbers are interwoven with each other. In this case complementary pair odd/even numbers (A005408/A005843) is entangled with complementary pair A070003/A102750 (numbers which are divisible/not divisible by the square of their largest prime factor).
Thus this shares with the permutation A122111 the property that each even number is mapped to a unique term of A102750 and each odd number (larger than 1) to a unique term of A070003.

Crossrefs

Inverse of A243287.
Similarly constructed permutations: A243343-A243346, A135141-A227413, A237126-A237427, A193231.

Formula

a(1)=1, and for n > 1, if n=2k, a(n) = A102750(a(k)), otherwise, when n = 2k+1, a(n) = A070003(a(k)).

A243346 a(1) = 1, a(2n) = A005117(1+a(n)), a(2n+1) = A013929(a(n)), where A005117 are squarefree and A013929 are nonsquarefree numbers.

Original entry on oeis.org

1, 2, 4, 3, 8, 6, 12, 5, 9, 13, 24, 10, 18, 19, 32, 7, 16, 14, 25, 21, 36, 38, 63, 15, 27, 30, 49, 31, 50, 53, 84, 11, 20, 26, 45, 22, 40, 39, 64, 34, 54, 59, 96, 62, 99, 103, 162, 23, 44, 42, 72, 47, 80, 79, 126, 51, 81, 82, 128, 86, 136, 138, 220, 17, 28, 33, 52, 41, 68, 73, 120
Offset: 1

Views

Author

Antti Karttunen, Jun 03 2014

Keywords

Comments

This permutation entangles complementary pair A005843/A005408 (even/odd numbers) with complementary pair A005117/A013929 (numbers which are squarefree/are not squarefree).

Crossrefs

Formula

a(1) = 1, a(2n) = A005117(1+a(n)), a(2n+1) = A013929(a(n)).
For all n > 1, A008966(a(n)) = A000035(n+1), or equally, mu(a(n)) + 1 = n modulo 2, where mu is Moebius mu (A008683). [A property shared with a simpler variant A075378].

A277820 Square array: A(r,1) = A065621(r); for c > 1, A(r,c) = A048724(A(r,c-1)), read by descending antidiagonals as A(1,1), A(1,2), A(2,1), A(1,3), A(2,2), A(3,1), etc.

Original entry on oeis.org

1, 3, 2, 5, 6, 7, 15, 10, 9, 4, 17, 30, 27, 12, 13, 51, 34, 45, 20, 23, 14, 85, 102, 119, 60, 57, 18, 11, 255, 170, 153, 68, 75, 54, 29, 8, 257, 510, 427, 204, 221, 90, 39, 24, 25, 771, 514, 765, 340, 359, 238, 105, 40, 43, 26, 1285, 1542, 1799, 1020, 937, 306, 187, 120, 125, 46, 31, 3855, 2570, 2313, 1028, 1275, 854, 461, 136, 135, 114, 33, 28
Offset: 1

Views

Author

Antti Karttunen, Nov 01 2016

Keywords

Comments

For all n >= 1, A277818 (= A268389(n)+1) gives the (one-based) index of the column where n is located in this array, while A268671(n) gives the (one-based) index of the row where it is on.
This array is obtained when one selects from A277320 the columns 1, 3, 5, 15, 17, 51, ..., i.e., those with an index A001317(k).

Examples

			The top left corner of the array:
   1,  3,   5,  15,  17,   51,   85,  255,   257,   771,  1285,  3855
   2,  6,  10,  30,  34,  102,  170,  510,   514,  1542,  2570,  7710
   7,  9,  27,  45, 119,  153,  427,  765,  1799,  2313,  6939, 11565
   4, 12,  20,  60,  68,  204,  340, 1020,  1028,  3084,  5140, 15420
  13, 23,  57,  75, 221,  359,  937, 1275,  3341,  5911, 14649, 19275
  14, 18,  54,  90, 238,  306,  854, 1530,  3598,  4626, 13878, 23130
  11, 29,  39, 105, 187,  461,  599, 1785,  2827,  7453, 10023, 26985
   8, 24,  40, 120, 136,  408,  680, 2040,  2056,  6168, 10280, 30840
  25, 43, 125, 135, 393,  667, 1965, 2295,  6425, 11051, 32125, 34695
  26, 46, 114, 150, 442,  718, 1874, 2550,  6682, 11822, 29298, 38550
  31, 33,  99, 165, 495,  561, 1619, 2805,  7967,  8481, 25443, 42405
  28, 36, 108, 180, 476,  612, 1708, 3060,  7196,  9252, 27756, 46260
  21, 63,  65, 195, 325,  975, 1105, 3315,  5397, 16191, 16705, 50115
  22, 58,  78, 210, 374,  922, 1198, 3570,  5654, 14906, 20046, 53970
  19, 53,  95, 225, 291,  869, 1455, 3825,  4883, 13621, 24415, 57825
  16, 48,  80, 240, 272,  816, 1360, 4080,  4112, 12336, 20560, 61680
  49, 83, 245, 287, 801, 1379, 4005, 4335, 12593, 21331, 62965, 73247
  50, 86, 250, 270, 786, 1334, 3930, 4590, 12850, 22102, 64250, 69390
  55, 89, 235, 317, 839, 1481, 3675, 4845, 14135, 22873, 60395, 80957
		

Crossrefs

Inverse permutation: A277821.
Transpose: A277819.
Row 1: A001317.
Column 1: A065621, column 2: A277823, column 3: A277825.
Other related tables or permutations: A277880, A277901.

Programs

Formula

A(r,1) = A065621(r); for c > 1, A(r,c) = A048724(A(r,c-1)).
A(r,c) = A048675(A277810(r,c)).
As a composition of other permutations:
a(n) = A277901(A277880(n)).

A243347 a(1)=1, and for n>1, if mu(n) = 0, a(n) = A005117(1+a(A057627(n))), otherwise, a(n) = A013929(a(A013928(n))).

Original entry on oeis.org

1, 4, 12, 2, 32, 8, 84, 6, 19, 24, 220, 3, 18, 50, 63, 53, 564, 13, 9, 138, 49, 128, 162, 10, 31, 136, 38, 365, 1448, 36, 25, 5, 351, 126, 332, 30, 414, 27, 81, 82, 348, 99, 931, 103, 86, 3699, 96, 929, 21, 14, 64, 223, 16, 79, 892, 210, 325, 847, 80, 265, 1056, 72, 15, 51, 208, 212, 884, 221, 256
Offset: 1

Views

Author

Antti Karttunen, Jun 03 2014

Keywords

Comments

Self-inverse permutation of natural numbers.
Shares with A088609 the property that after 1, positions indexed by squarefree numbers larger than one, A005117(n+1): 2, 3, 5, 6, 7, 10, 11, 13, 14, ... contain only nonsquarefree numbers A013929: 4, 8, 9, 12, 16, 18, 20, 24, ..., and vice versa. However, instead of placing terms in those subsets in monotone order this sequence recursively permutes the order of both subsets with the emerging permutation itself, thus implementing a kind of "deep" variant of A088609. Alternatively, this can be viewed as yet another "entanglement permutation", where two pairs of complementary subsets of natural numbers are interwoven with each other. In this case complementary pair A005117/A013929 is entangled with complementary pair A013929/A005117.

Crossrefs

Formula

a(1), and for n>1, if mu(n) = 0, a(n) = A005117(1+a(A057627(n))), otherwise, a(n) = A013929(a(A013928(n))). [Here mu is Moebius mu-function, A008683, which is zero only when n is a nonsquarefree number, one of the numbers in A013929.]
For all n > 1, A008966(a(n)) = 1 - A008966(n), or equally, mu(a(n)) + 1 = mu(n) modulo 2, where mu is Moebius mu (A008683). [Note: Permutation A088609 satisfies the same condition.]

A286602 Restricted growth sequence transform of A286601.

Original entry on oeis.org

1, 2, 3, 2, 4, 2, 3, 5, 6, 5, 3, 7, 4, 7, 4, 2, 4, 2, 4, 7, 4, 8, 9, 7, 6, 10, 9, 5, 11, 7, 3, 7, 11, 7, 3, 7, 11, 12, 13, 7, 6, 14, 15, 10, 9, 5, 9, 12, 4, 7, 4, 2, 9, 7, 4, 8, 13, 7, 9, 14, 4, 8, 13, 8, 16, 8, 13, 17, 4, 8, 13, 8, 13, 18, 13, 7, 19, 14, 9, 17, 4, 8, 9, 7, 4, 2, 4, 7, 13, 8, 4, 8, 9, 14, 13, 7, 11, 12, 13, 7, 11, 7, 3, 7
Offset: 0

Views

Author

Antti Karttunen, Jun 04 2017

Keywords

Comments

The scatter plot looks complex.

Crossrefs

Cf. A286581, A286589, A286597, A286599, A286600, A286601, A286617, A286619, A286622 for similarly formed sequences.

A233280 Permutation of nonnegative integers: a(n) = A003188(A054429(n)).

Original entry on oeis.org

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

Views

Author

Antti Karttunen, Dec 18 2013

Keywords

Comments

This permutation transforms the enumeration system of positive irreducible fractions A071766/A229742 (HCS) into the enumeration system A007305/A047679 (Stern-Brocot), and the enumeration system A245325/A245326 into A162909/A162910 (Bird). - Yosu Yurramendi, Jun 09 2015

Crossrefs

Inverse permutation: A233279.
Similarly constructed permutation pairs: A003188/A006068, A135141/A227413, A232751/A232752, A233275/A233276, A233277/A233278, A193231 (self-inverse).

Programs

  • Python
    from sympy import floor
    def a003188(n): return n^(n>>1)
    def a054429(n): return 1 if n==1 else 2*a054429(floor(n/2)) + 1 - n%2
    def a(n): return 0 if n==0 else a003188(a054429(n)) # Indranil Ghosh, Jun 11 2017
  • R
    maxrow <- 8 # by choice
    a <- 1
    for(m in 0:maxrow) for(k in 0:(2^m-1)){
    a[2^(m+1)+    k] <- a[2^m+      k] + 2^m
    a[2^(m+1)+2^m+k] <- a[2^(m+1)-1-k] + 2^(m+1)
    }
    a
    # Yosu Yurramendi, Apr 05 2017
    
  • Scheme
    (define (A233280 n) (A003188 (A054429 n)))
    ;; Alternative version, based on entangling even & odd numbers with odious and evil numbers:
    (definec (A233280 n) (cond ((< n 2) n) ((even? n) (A000069 (+ 1 (A233280 (/ n 2))))) (else (A001969 (+ 1 (A233280 (/ (- n 1) 2)))))))
    

Formula

a(n) = A003188(A054429(n)).
a(n) = A063946(A003188(n)).
a(n) = A054429(A154436(n)).
a(0)=0, a(1)=1, and otherwise, a(2n) = A000069(1+a(n)), a(2n+1) = A001969(1+a(n)). [A recurrence based on entangling even & odd numbers with odious and evil numbers]
a(n) = A258746(A180201(n)) = A180201(A117120(n)), n > 0. - Yosu Yurramendi, Apr 10 2017

A243344 a(1) = 1, a(2n) = A013929(a(n)), a(2n+1) = A005117(1+a(n)).

Original entry on oeis.org

1, 4, 2, 12, 6, 8, 3, 32, 19, 18, 10, 24, 13, 9, 5, 84, 53, 50, 31, 49, 30, 27, 15, 63, 38, 36, 21, 25, 14, 16, 7, 220, 138, 136, 86, 128, 82, 81, 51, 126, 79, 80, 47, 72, 42, 44, 23, 162, 103, 99, 62, 96, 59, 54, 34, 64, 39, 40, 22, 45, 26, 20, 11, 564, 365
Offset: 1

Views

Author

Antti Karttunen, Jun 03 2014

Keywords

Comments

This permutation entangles complementary pair odd/even numbers (A005408/A005843) with complementary pair A005117/A013929 (numbers which are squarefree/not squarefree).

Crossrefs

Formula

a(1) = 1, a(2n) = A013929(a(n)), a(2n+1) = A005117(1+a(n)).
For all n, A008966(a(n)) = A000035(n), or equally, mu(a(n)) = n modulo 2, where mu is Moebius mu (A008683). [The same property holds for A088610.]

A243345 a(1)=1; thereafter, if n is k-th squarefree number [i.e., n = A005117(k)], a(n) = 2*a(k-1); otherwise, when n is k-th nonsquarefree number [i.e., n = A013929(k)], a(n) = 2*a(k)+1.

Original entry on oeis.org

1, 2, 4, 3, 8, 6, 16, 5, 9, 12, 32, 7, 10, 18, 24, 17, 64, 13, 14, 33, 20, 36, 48, 11, 19, 34, 25, 65, 128, 26, 28, 15, 66, 40, 72, 21, 96, 22, 38, 37, 68, 50, 130, 49, 35, 256, 52, 129, 27, 29, 56, 67, 30, 41, 132, 73, 80, 144, 42, 97, 192, 44, 23, 39, 76, 74, 136, 69, 100
Offset: 1

Views

Author

Antti Karttunen, Jun 03 2014

Keywords

Comments

Any other fixed points than 1, 2, 6, 9, 135, 147, 914, ... ?
Any other points than 4, 21, 39, 839, 4893, 12884, ... where a(n) = n-1 ?

Crossrefs

Formula

a(1) = 1, and for n>1, if mu(n) = 0, a(n) = 1 + 2*a(A057627(n)), otherwise a(n) = 2*a(A013928(n)), where mu is Moebius mu function (A008683).
For all n > 1, A000035(a(n)+1) = A008966(n) = A008683(n)^2, or equally, a(n) = mu(n) + 1 modulo 2.
Previous Showing 51-60 of 85 results. Next