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 71-80 of 91 results. Next

A377041 First term of the n-th differences of the squarefree numbers. Inverse zero-based binomial transform of A005117.

Original entry on oeis.org

1, 1, 0, 1, -3, 6, -8, 3, 22, -92, 252, -578, 1189, -2255, 3991, -6617, 10245, -14626, 18666, -19635, 12104, 13090, -69122, 171478, -332718, 552138, -798629, 982514, -901485, 116219, 2351842, -8715135, 23856206, -57926011, 130281064, -273804584, 535390333
Offset: 0

Views

Author

Gus Wiseman, Oct 18 2024

Keywords

Crossrefs

The version for primes is A007442, noncomposites A030016, composites A377036.
This is the first column of A377038.
For nonsquarefree numbers we have A377049.
For prime-powers we have A377054.
A000040 lists the primes, differences A001223, seconds A036263.
A005117 lists the squarefree numbers, complement A013929 (differences A078147).
A073576 counts integer partitions into squarefree numbers, factorizations A050320.
A377042 gives first position of 0 in each row of A377038.

Programs

  • Mathematica
    q=Select[Range[100],SquareFreeQ];
    t=Table[Sum[(-1)^(j-k)*Binomial[j,k]*q[[1+k]],{k,0,j}],{j,0,Length[q]/2}]

Formula

The inverse zero-based binomial transform of a sequence (q(0), q(1), q(2), ...) is the sequence p given by:
p(j) = sum_{k=0..j} (-1)^(j-k) binomial(j,k) q(k)

A378087 First-differences of A067535 (least positive integer >= n that is squarefree).

Original entry on oeis.org

1, 1, 2, 0, 1, 1, 3, 0, 0, 1, 2, 0, 1, 1, 2, 0, 2, 0, 2, 0, 1, 1, 3, 0, 0, 3, 0, 0, 1, 1, 2, 0, 1, 1, 2, 0, 1, 1, 2, 0, 1, 1, 3, 0, 0, 1, 4, 0, 0, 0, 2, 0, 2, 0, 2, 0, 1, 1, 2, 0, 1, 3, 0, 0, 1, 1, 2, 0, 1, 1, 2, 0, 1, 3, 0, 0, 1, 1, 3, 0, 0, 1, 2, 0, 1, 1, 2
Offset: 1

Views

Author

Gus Wiseman, Nov 20 2024

Keywords

Comments

Does this contain all nonnegative integers? The positions of first appearances begin: 4, 1, 3, 7, 47, 241, 843, 22019, 217069, ...

Crossrefs

Ones are A007674.
Zeros are A013929, complement A005117.
Positions of first appearances are A020754 (except first term) = A045882 - 1.
First-differences of A067535.
Twos are A280892.
For prime-powers we have A377780, differences of A000015.
The nonsquarefree opposite is A378036, differences of A378033.
The restriction to primes + 1 is A378037 (opposite A378038), differences of A112926.
For nonsquarefree numbers we have A378039, see A377783, A377784, A378040.
The opposite is A378085, differences of A070321.
A000040 lists the primes, differences A001223, seconds A036263.
A005117 lists the squarefree numbers.
A013929 lists the nonsquarefree numbers, differences A078147, seconds A376593.
A061398 counts squarefree numbers between primes, zeros A068360.
A061399 counts nonsquarefree numbers between primes, zeros A068361.

Programs

  • Mathematica
    Differences[Table[NestWhile[#+1&,n,#>1&&!SquareFreeQ[#]&],{n,100}]]

A376655 Sorted positions of first appearances in the second differences of consecutive squarefree numbers (A005117).

Original entry on oeis.org

1, 2, 3, 5, 6, 30, 61, 150, 514, 1025, 5153, 13390, 13391, 131964, 502651, 664312, 4387185, 5392318, 20613826
Offset: 1

Views

Author

Gus Wiseman, Oct 07 2024

Keywords

Comments

Warning: Do not confuse with A246655 (prime-powers exclusive).

Examples

			The squarefree numbers (A005117) are:
  1, 2, 3, 5, 6, 7, 10, 11, 13, 14, 15, 17, 19, 21, 22, 23, 26, 29, 30, 31, 33, ...
with first differences (A076259):
  1, 1, 2, 1, 1, 3, 1, 2, 1, 1, 2, 2, 2, 1, 1, 3, 3, 1, 1, 2, 1, 1, 2, 1, 1, 2, ...
with first differences (A376590):
  0, 1, -1, 0, 2, -2, 1, -1, 0, 1, 0, 0, -1, 0, 2, 0, -2, 0, 1, -1, 0, 1, -1, 0, ...
with sorted first appearances at (A376655):
  1, 2, 3, 5, 6, 30, 61, 150, 514, 1025, 5153, 13390, 13391, ...
		

Crossrefs

For first differences we had A376311 (first appearances in A076259).
These are the sorted positions of first appearances in A376590.
For prime-powers instead of squarefree numbers we have A376653/A376654.
For primes instead of squarefree numbers we have A376656.
A000040 lists the prime numbers, differences A001223.
A005117 lists squarefree numbers, complement A013929 (differences A078147).
A073576 counts integer partitions into squarefree numbers, factorizations A050320.
For second differences: A036263 (prime), A073445 (composite), A376559 (perfect-power), A376562 (non-perfect-power), A376593 (nonsquarefree), A376596 (prime-power inclusive), A376599 (non-prime-power inclusive).
For squarefree: A376591 (inflections and undulations), A376592 (nonzero curvature).

Programs

  • Mathematica
    q=Differences[Select[Range[1000],SquareFreeQ],2];
    Select[Range[Length[q]],!MemberQ[Take[q,#-1],q[[#]]]&]

Extensions

a(14)-a(19) from Chai Wah Wu, Oct 07 2024

A373200 Numbers k such that the k-th maximal antirun of squarefree numbers has length different from all prior maximal antiruns. Sorted positions of first appearances in A373127.

Original entry on oeis.org

1, 3, 8, 10, 19, 162, 1633, 1853, 2052, 26661, 46782, 1080330, 3138650
Offset: 1

Views

Author

Gus Wiseman, Jun 10 2024

Keywords

Comments

The unsorted version is A373128.
An antirun of a sequence (in this case A005117) is an interval of positions at which consecutive terms differ by more than one.

Examples

			The maximal antiruns of squarefree numbers begin:
   1
   2
   3   5
   6
   7  10
  11  13
  14
  15  17  19  21
  22
  23  26  29
  30
  31  33
  34
  35  37
The a(n)-th rows are:
    1
    3    5
   15   17   19   21
   23   26   29
   47   51   53   55   57
  483  485  487  489  491  493
		

Crossrefs

For squarefree runs we have the triple (1,3,5), firsts of A120992.
For prime runs we have the triple (1,2,3), firsts of A175632.
The unsorted version is A373128, firsts of A373127.
For nonsquarefree runs we have A373199 (assuming sorted), firsts of A053797.
For composite runs we have A373400, unsorted A073051.
For prime antiruns we have A373402, unsorted A373401, firsts of A027833.
For composite antiruns we have the triple (1,2,7), firsts of A373403.
A005117 lists the squarefree numbers, first differences A076259.
A013929 lists the nonsquarefree numbers, first differences A078147.

Programs

  • Mathematica
    t=Length/@Split[Select[Range[10000],SquareFreeQ],#1+1!=#2&]//Most;
    Select[Range[Length[t]],FreeQ[Take[t,#-1],t[[#]]]&]

A373414 Sum of the n-th maximal run of nonsquarefree numbers differing by one.

Original entry on oeis.org

4, 17, 12, 16, 18, 20, 49, 55, 32, 36, 40, 89, 147, 52, 54, 56, 60, 127, 68, 72, 151, 161, 84, 88, 90, 92, 96, 297, 104, 108, 112, 233, 241, 375, 128, 132, 271, 140, 144, 295, 150, 305, 156, 160, 162, 164, 337, 343, 351, 180, 184, 377, 192, 196, 198, 200, 204
Offset: 1

Views

Author

Gus Wiseman, Jun 06 2024

Keywords

Comments

The length of this run is given by A053797.
A run of a sequence (in this case A013929) is an interval of positions at which consecutive terms differ by one.

Examples

			Row-sums of:
   4
   8   9
  12
  16
  18
  20
  24  25
  27  28
  32
  36
  40
  44  45
  48  49  50
		

Crossrefs

The partial sums are a subset of A329472.
Functional neighbors: A053797, A053806, A054265, A373406, A373412, A373413.
A005117 lists the squarefree numbers, first differences A076259.
A013929 lists the nonsquarefree numbers, first differences A078147.

Programs

  • Mathematica
    Total/@Split[Select[Range[100],!SquareFreeQ[#]&],#1+1==#2&]//Most

A375739 Maximum of the n-th maximal anti-run of adjacent (increasing by more than one at a time) non-perfect-powers.

Original entry on oeis.org

2, 5, 6, 10, 11, 12, 13, 14, 17, 18, 19, 20, 21, 22, 23, 28, 29, 30, 33, 34, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 82, 83, 84, 85, 86, 87, 88
Offset: 1

Views

Author

Gus Wiseman, Sep 10 2024

Keywords

Comments

Non-perfect-powers (A007916) are numbers with no proper integer roots.
An anti-run of a sequence is an interval of positions at which consecutive terms differ by more than one.
Also non-perfect-powers x such that x + 1 is also a non-perfect-power.

Examples

			The initial anti-runs are the following, whose maxima are a(n):
  (2)
  (3,5)
  (6)
  (7,10)
  (11)
  (12)
  (13)
  (14)
  (15,17)
  (18)
  (19)
  (20)
  (21)
  (22)
  (23)
  (24,26,28)
		

Crossrefs

For nonprime numbers we have A068780, runs A006093 with 2 removed.
For squarefree numbers we have A007674, runs A373415.
For nonsquarefree numbers we have A068781, runs A072284 minus 1 and shifted.
For prime-powers we have A006549, runs A373674.
For non-prime-powers we have A255346, runs A373677.
For anti-runs of non-perfect-powers:
- length: A375736
- first: A375738
- last: A375739 (this)
- sum: A375737
For runs of non-perfect-powers:
- length: A375702
- first: A375703
- last: A375704
- sum: A375705
A001597 lists perfect-powers, differences A053289.
A007916 lists non-perfect-powers, differences A375706.

Programs

  • Mathematica
    radQ[n_]:=n>1&&GCD@@Last/@FactorInteger[n]==1;
    Max/@Split[Select[Range[100],radQ],#1+1!=#2&]//Most
    - or -
    radQ[n_]:=n>1&&GCD@@Last/@FactorInteger[n]==1;
    Select[Range[100],radQ[#]&&radQ[#+1]&]

A375710 Numbers k such that A013929(k+1) - A013929(k) = 2. In other words, the k-th nonsquarefree number is 2 less than the next nonsquarefree number.

Original entry on oeis.org

5, 6, 9, 19, 20, 21, 33, 34, 36, 49, 57, 58, 62, 63, 66, 76, 77, 88, 89, 91, 96, 97, 103, 104, 113, 114, 118, 119, 130, 131, 132, 136, 142, 149, 150, 161, 162, 174, 175, 187, 188, 189, 190, 201, 202, 206, 215, 217, 218, 225, 226, 231, 232, 245, 246, 249, 253
Offset: 1

Views

Author

Gus Wiseman, Sep 09 2024

Keywords

Comments

The difference of consecutive nonsquarefree numbers is at least 1 and at most 4, so there are four disjoint sequences of this type:
- A375709 (difference 1)
- A375710 (difference 2)
- A375711 (difference 3)
- A375712 (difference 4)

Examples

			The initial nonsquarefree numbers are 4, 8, 9, 12, 16, 18, 20, 24, 25, which first increase by 2 after the fifth and sixth terms.
		

Crossrefs

Positions of 2's in A078147.
For prime numbers we have A029707.
For nonprime numbers we appear to have A014689.
A005117 lists the squarefree numbers, first differences A076259.
A013929 lists the nonsquarefree numbers, first differences A078147.
A053797 gives lengths of runs of nonsquarefree numbers, firsts A373199.
A375707 counts squarefree numbers between consecutive nonsquarefree numbers.

Programs

  • Mathematica
    Join@@Position[Differences[Select[Range[1000], !SquareFreeQ[#]&]],2]

Formula

Complement of A375709 U A375711 U A375712.

A375711 Numbers k such that A013929(k+1) - A013929(k) = 3. In other words, the k-th nonsquarefree number is 3 less than the next nonsquarefree number.

Original entry on oeis.org

3, 16, 23, 27, 31, 44, 46, 51, 55, 60, 68, 74, 79, 86, 95, 101, 105, 107, 112, 116, 121, 126, 129, 146, 147, 152, 159, 164, 167, 172, 177, 182, 185, 191, 195, 199, 204, 209, 220, 223, 229, 234, 237, 242, 244, 257, 262, 270, 275, 285, 286, 291, 299, 305, 312
Offset: 1

Views

Author

Gus Wiseman, Sep 09 2024

Keywords

Comments

The difference of consecutive nonsquarefree numbers is at least 1 and at most 4, so there are four disjoint sequences of this type:
- A375709 (difference 1)
- A375710 (difference 2)
- A375711 (difference 3)
- A375712 (difference 4)

Examples

			The initial nonsquarefree numbers are 4, 8, 9, 12, 16, 18, 20, 24, 25, which first increase by 3 after the third term.
		

Crossrefs

Positions of 3's in A078147.
A005117 lists the squarefree numbers, first differences A076259.
A013929 lists the nonsquarefree numbers, first differences A078147.
A053797 gives lengths of runs of nonsquarefree numbers, firsts A373199.
A375707 counts squarefree numbers between consecutive nonsquarefree numbers.

Programs

  • Mathematica
    Join@@Position[Differences[Select[Range[1000],!SquareFreeQ[#]&]],3]

Formula

Complement of A375709 U A375710 U A375712.

A375712 Numbers k such that A013929(k+1) - A013929(k) = 4. In other words, the k-th nonsquarefree number is 4 less than the next nonsquarefree number.

Original entry on oeis.org

1, 4, 7, 11, 12, 13, 14, 22, 25, 26, 29, 32, 35, 39, 40, 41, 42, 50, 53, 54, 61, 64, 70, 71, 72, 75, 78, 81, 82, 83, 84, 87, 90, 98, 99, 102, 109, 110, 117, 120, 123, 124, 127, 135, 139, 140, 144, 151, 154, 155, 156, 157, 160, 163, 168, 169, 170, 173, 176, 179
Offset: 1

Views

Author

Gus Wiseman, Sep 09 2024

Keywords

Comments

The difference of consecutive nonsquarefree numbers is at least 1 and at most 4, so there are four disjoint sequences of this type:
- A375709 (difference 1)
- A375710 (difference 2)
- A375711 (difference 3)
- A375712 (difference 4)

Examples

			The initial nonsquarefree numbers are 4, 8, 9, 12, 16, 18, 20, 24, 25, which first increase by 4 after the first, fourth, and seventh terms.
		

Crossrefs

For prime numbers we have A029709.
Positions of 4's in A078147.
A005117 lists the squarefree numbers, first differences A076259.
A013929 lists the nonsquarefree numbers, first differences A078147.
A053797 gives lengths of runs of nonsquarefree numbers, firsts A373199.
A375707 counts squarefree numbers between consecutive nonsquarefree numbers.

Programs

  • Mathematica
    Join@@Position[Differences[Select[Range[100],!SquareFreeQ[#]&]],4]

Formula

Complement of A375709 U A375710 U A375711.

A376264 Run-sums of first differences (A078147) of nonsquarefree numbers (A013929).

Original entry on oeis.org

4, 1, 3, 4, 4, 4, 1, 2, 1, 16, 1, 3, 2, 6, 4, 3, 1, 8, 3, 1, 4, 1, 3, 4, 4, 4, 2, 2, 16, 1, 3, 1, 3, 2, 2, 4, 3, 1, 8, 3, 1, 4, 1, 3, 4, 4, 4, 1, 2, 1, 3, 1, 12, 1, 3, 4, 4, 4, 3, 1, 16, 1, 3, 4, 4, 4, 2, 3, 3, 4, 8, 1, 3, 4, 4, 3, 1, 3, 1, 8, 1, 3, 4, 1, 3, 4
Offset: 1

Views

Author

Gus Wiseman, Sep 26 2024

Keywords

Comments

Does the image include all positive integers? I have only verified this up to 8.

Examples

			The sequence of nonsquarefree numbers (A013929) is:
  4, 8, 9, 12, 16, 18, 20, 24, 25, 27, 28, 32, 36, 40, 44, 45, 48, 49, 50, ...
with first differences (A078147):
  4, 1, 3, 4, 2, 2, 4, 1, 2, 1, 4, 4, 4, 4, 1, 3, 1, 1, 2, 2, 2, 4, 3, 1, ...
with runs:
  (4),(1),(3),(4),(2,2),(4),(1),(2),(1),(4,4,4,4),(1),(3),(1,1),(2,2,2), ...
with sums (A376264):
  4, 1, 3, 4, 4, 4, 1, 2, 1, 16, 1, 3, 2, 6, 4, 3, 1, 8, 3, 1, 4, 1, 3, 4, ...
		

Crossrefs

Before taking run-sums we had A078147.
For nonprime instead of nonsquarefree numbers we have A373822.
Positions of first appearances are A376265, sorted A376266.
For run-lengths instead of run-sums we have A376267.
For squarefree instead of nonsquarefree we have A376307.
For prime-powers instead of nonsquarefree numbers we have A376310.
For compression instead of run-sums we have A376312.
A000040 lists the prime numbers, differences A001223.
A000961 and A246655 list prime-powers, differences A057820.
A003242 counts compressed compositions, ranks A333489.
A005117 lists squarefree numbers, differences A076259 (ones A375927).
A013929 lists nonsquarefree numbers, differences A078147.

Programs

  • Mathematica
    Total/@Split[Differences[Select[Range[1000],!SquareFreeQ[#]&]]]//Most
Previous Showing 71-80 of 91 results. Next