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 11-17 of 17 results.

A092905 Triangle, read by rows, such that the partial sums of the n-th row form the n-th diagonal, for n>=0, where each row begins with 1.

Original entry on oeis.org

1, 1, 1, 1, 2, 1, 1, 3, 2, 1, 1, 4, 4, 2, 1, 1, 5, 6, 4, 2, 1, 1, 6, 9, 7, 4, 2, 1, 1, 7, 12, 11, 7, 4, 2, 1, 1, 8, 16, 16, 12, 7, 4, 2, 1, 1, 9, 20, 23, 18, 12, 7, 4, 2, 1, 1, 10, 25, 31, 27, 19, 12, 7, 4, 2, 1, 1, 11, 30, 41, 38, 29, 19, 12, 7, 4, 2, 1, 1, 12, 36, 53, 53, 42, 30, 19, 12, 7, 4, 2, 1
Offset: 0

Views

Author

Paul D. Hanna, Mar 12 2004

Keywords

Comments

Row sums form A000070, which is the partial sums of the partition numbers (A000041). Rows read backwards converge to the row sums (A000070).
From Alford Arnold, Feb 07 2010: (Start)
The table can also be generated by summing sequences embedded within Table A008284
For example,
1 1 1 1 ... yields 1 2 3 4 ...
1 1 2 2 3 3 ... yields 1 2 4 6 9 12 ...
1 1 2 3 4 5 7 ... yields 1 2 4 7 11 16 ...
(End)
T(n,k) is also count of all 'replacable' cells in the (Ferrers plots of) the partitions on n in exactly k parts. [Wouter Meeussen, Sep 16 2010]
From Wolfdieter Lang, Dec 03 2012: (Start)
The triangle entry T(n,k) is obtained from triangle A072233 by summing the entries of column k up to n (see the partial sum type o.g.f. given by Vladeta Jovovic in the formula section).
Therefore, the o.g.f. for the sequence in column k is x^k/((1-x)* product(1-x^j,j=1..k)).
The triangle with entry a(n,m) = T(n-1,m-1), n >= 1, m = 1, ..., n, is obtained from the partition array A103921 when in row n all entries belonging to part number m are summed (a conjecture). (End)

Examples

			The fourth row (n=3) is {1,3,2,1} and the fourth diagonal is the partial sums of the fourth row: {1,4,6,7,7,7,7,7,...}.
The triangle T(n,k) begins:
n\k 0  1  2  3  4  5  6  7  8  9 10 11 12  ...
0   1
1   1  1
2   1  2  1
3   1  3  2  1
4   1  4  4  2  1
5   1  5  6  4  2  1
6   1  6  9  7  4  2  1
7   1  7 12 11  7  4  2  1
8   1  8 16 16 12  7  4  2  1
9   1  9 20 23 18 12  7  4  2  1
10  1 10 25 31 27 19 12  7  4  2  1
11  1 11 30 41 38 29 19 12  7  4  2  1
12  1 12 36 53 53 42 30 19 12  7  4  2  1
... Reformatted by _Wolfdieter Lang_, Dec 03 2012
T(5,3)=4 because the partitions of 5 in exactly 3 parts are 221 and 311, and they give rise to partitions of 4 in four ways: 221->22 and 211, 311->211 and 31, since both their Ferrers plots have 2 'mobile cells' each. [_Wouter Meeussen_, Sep 16 2010]
T(5,3) = a(6,4) = 4 because the partitions of 6 with 4 parts are 1113 and 1122, with the number of distinct parts 2 and 2, respectively, summing to 4 (see the array A103921). An example for the conjecture given as comment above. - _Wolfdieter Lang_, Dec 03 2012
		

Crossrefs

Antidiagonal sums form the partition numbers (A000041).
Cf. A000070.
Cf. A008284. [Alford Arnold, Feb 07 2010]

Programs

Formula

T(n, k) = sum_{j=0..k} T(n-k, j), with T(n, 0) = 1 for all n>=0. A000070(n) = sum_{k=0..n} T(n, k).
O.g.f.: (1/(1-y))*(1/Product(1-x*y^k, k=1..infinity)). - Vladeta Jovovic, Jan 29 2005

Extensions

Several corrections by Wolfdieter Lang, Dec 03 2012

A352944 a(n) = Sum_{k=0..floor(n/2)} (n-2*k)^k.

Original entry on oeis.org

1, 1, 1, 2, 3, 5, 9, 16, 31, 61, 125, 266, 579, 1305, 3009, 7120, 17255, 42697, 108005, 278466, 731883, 1958589, 5331625, 14758720, 41501135, 118507301, 343405709, 1009313322, 3007557523, 9081204849, 27775308049, 86014412384, 269603741111, 855012176081
Offset: 0

Views

Author

Seiichi Manyama, Apr 09 2022

Keywords

Crossrefs

Programs

  • Mathematica
    Join[{1},Table[Sum[(n-2k)^k,{k,0,Floor[n/2]}],{n,40}]] (* Harvey P. Dale, Dec 12 2022 *)
  • PARI
    a(n) = sum(k=0, n\2, (n-2*k)^k);
    
  • PARI
    my(N=40, x='x+O('x^N)); Vec(sum(k=0, N, x^k/(1-k*x^2)))

Formula

G.f.: Sum_{k>=0} x^k / (1 - k * x^2).
a(n) ~ sqrt(Pi) * (n/LambertW(exp(1)*n))^((n + 1 - n/LambertW(exp(1)*n))/2) / sqrt(1 + LambertW(exp(1)*n)). - Vaclav Kotesovec, Apr 14 2022

A261206 Numbers j such that ceiling(j^(1/k)) divides j for all integers k >= 1.

Original entry on oeis.org

1, 2, 4, 6, 12, 36, 132, 144, 156, 900, 3600, 4032, 7140, 18360, 44100, 46440, 4062240, 9147600, 999999000000
Offset: 1

Views

Author

Max Alekseyev, Aug 11 2015

Keywords

Comments

Is this a finite sequence?
It is possible to generalize this class of sequences by taking some integer-valued function f(j,k) decreasing in k such that f(j,1) = j and f(j,m) = c (for example, c=1 or c=2) for all sufficiently large m and considering those j that are divisible by all of f(j,1), f(j,2), ... If f(j,k) is slowly decreasing in k, then the set of corresponding j's is likely to have a very small number (if any) of terms, while if f(j,k) decreases rapidly, then there will be too many suitable j's. I believe the balance is achieved at functions like f(j,k) = floor(j^(1/k)) so that f(j,k) stabilizes to c at k ~= log(j). - Max Alekseyev, Aug 16 2015
If it exists, a(20) > 10^35. - Jon E. Schoenfield, Oct 17 2015

Crossrefs

Subsequence of all of A087811, A002620, A261011, A261417.

Programs

  • PARI
    is(n) = my(k,t); if(n==1,return(1)); if(n%2,return(0)); k=2; while( (t=ceil((n-.5)^(1/k)))>2, if(n%t,return(0)); k++); 1
    n=1;while(n<10^5,if(is(n),print1(n,", "));n++) /* Able to generate terms < 10^5 */ \\ Derek Orr, Aug 12 2015

A115065 Number of points with integer coordinates inside the equilateral triangle with base [0,n].

Original entry on oeis.org

1, 2, 4, 6, 10, 14, 20, 26, 33, 40, 49, 58, 69, 80, 93, 106, 120, 134, 150, 166, 184, 202, 222, 242, 263, 284, 307, 330, 355, 380, 406, 432, 460, 488, 518, 548, 580, 612, 645, 678, 713, 748, 785, 822, 861, 900, 940, 980, 1022
Offset: 0

Views

Author

Neven Juric (neven.juric(AT)apis-it.hr), Jun 20 2006

Keywords

Comments

If one replaces the equilateral triangle by a rectangle isoscele triangle with hypotenuse [0,n], one gets A087811. - Michel Marcus, Aug 05 2013

Examples

			For n=0, the triangle is degenerate and there is 1 point (0,0).
For n=1, there are 2 points (0,0) and (0,1).
		

Programs

  • PARI
    a(n) = {nb = 0; for (x=0, n, for (y=0, n, if ((x < n/2) && (y <= x*sqrt(3)), nb++); if ((x >= n/2) && (y + x*sqrt(3)) <= n*sqrt(3), nb++););); nb;} \\ Michel Marcus, Aug 05 2013

Extensions

Offset set to 0 and a(0) prepended by Michel Marcus, Aug 05 2013

A274742 Triangle read by rows: T(n,k) (n>=3, 0<=k<=n-3) = number of n-sequences of 0's and 1's that begin with 1 and have exactly one pair of adjacent 0's and exactly k pairs of adjacent 1's.

Original entry on oeis.org

1, 1, 1, 2, 2, 1, 2, 4, 3, 1, 3, 6, 6, 4, 1, 3, 9, 12, 8, 5, 1, 4, 12, 18, 20, 10, 6, 1, 4, 16, 30, 30, 30, 12, 7, 1, 5, 20, 40, 60, 45, 42, 14, 8, 1, 5, 25, 60, 80, 105, 63, 56, 16, 9, 1, 6, 30, 75, 140, 140, 168, 84, 72, 18, 10, 1, 6, 36, 105, 175, 280, 224, 252, 108, 90, 20, 11, 1, 7, 42, 126, 280, 350, 504, 336, 360, 135, 110, 22, 12, 1
Offset: 3

Views

Author

Jeremy Dover, Jul 04 2016

Keywords

Comments

It appears that the row sums give the positive integers of A001629. - Omar E. Pol, Jul 09 2016

Examples

			n=3 => 100 -> T(3,0) = 1.
n=4 => 1001 -> T(4,0) = 1; 1100 -> T(4,1) = 1.
n=5 => 10010, 10100 -> T(5,0) = 1; 10011, 11001 -> T(5,1) = 2;
       11100 -> T(5,2) = 1.
Triangle starts:
1
1, 1
2, 2, 1
2, 4, 3, 1
3, 6, 6, 4, 1
3, 9, 12, 8, 5, 1
4, 12, 18, 20, 10, 6, 1
4, 16, 30, 30, 30, 12, 7, 1
5, 20, 40, 60, 45, 42, 14, 8, 1
5, 25, 60, 80, 105, 63, 56, 16, 9, 1
6, 30, 75, 140, 140, 168, 84, 72, 18, 10, 1
6, 36, 105, 175, 280, 224, 252, 108, 90, 20, 11, 1
7, 42, 126, 280, 350, 504, 336, 360, 135, 110, 22, 12, 1
		

Crossrefs

Columns: A008619, A087811.

Programs

  • Mathematica
    Table[Binomial[Floor[(n + k - 2)/2], k] Floor[(n - k - 1)/2], {n, 3, 15}, {k, 0, n - 3}] // Flatten (* Michael De Vlieger, Jul 05 2016 *)
  • PARI
    t(n, k) = binomial(floor((n+k-2)/2), k) * floor((n-k-1)/2)
    trianglerows(n) = for(x=3, n+2, for(y=0, x-3, print1(t(x, y), ", ")); print(""))
    trianglerows(13) \\ Felix Fröhlich, Jul 05 2016

Formula

T(n,k) = binomial(floor((n+k-2)/2),k)*floor((n-k-1)/2).

A316261 The number of ways to induce a single pinch on a compact 2-manifold with n handles. (Note: The manifold is embedded in Euclidean 2-space, and each pinch partitions it into at most two submanifolds.)

Original entry on oeis.org

1, 3, 9, 15, 26, 37, 55, 73, 100, 127, 165, 203, 254, 305, 371, 437, 520, 603, 705, 807, 930, 1053, 1199, 1345, 1516, 1687, 1885, 2083, 2310, 2537, 2795, 3053, 3344, 3635, 3961, 4287, 4650, 5013, 5415, 5817, 6260
Offset: 0

Views

Author

Joseph Wheat, Jun 27 2018

Keywords

Comments

The formula for this sequence can be derived by separating the conformed manifolds into three sets. The first set consists of those conformations where the handles of the manifold are pinched at the boundary, the second set have two or more handles pinched at the interior of the manifold, and the third set are pinched at the boundary and may or may not have handles drawn into this pinch. The order of the first set is n, the order of the second is n - 1, and the order of the third set is given by the following series: (Sum_{k mod 2 = 0..n} (k/2)*(n - k + 1) + (2*(n - k) + (-1)^(n - k) + 3)/4) + (Sum_{j mod 2 = 1..n} ((j + 1)/2)*(n - j + 1)). These can then be combined into a single expression, Sum_{i = 0..n} ((2*i + (-1)^(i + 1) + 1)/4)*(n - i + 1) + ((2*(n - i) + (-1)^(n - i) + 3)/4)*(((-1)^i + 1)/2). The i in this series can be thought of as the number of handles drawn into the central pinch. If one factors out the expressions in the series and simplifies each term individually, the resulting functions can then be combined into a single formula. However, when we add 2n - 1 to this we find that for n = 0 the formula also equals zero. This cannot be, because there is one way to pinch a compact 2-manifold with 0 handles. Therefore, ((-1)^(2^n - 1) + 1)/2 is added as a corrective term for this one case.

Examples

			For a visual example see links.
		

References

  • Jonathan L. Gross, Jay Yellen, and Ping Zhang, The Handbook of Graph Theory (Second Edition), CRC Press, 2013, pp. 730-806.
  • Ana Claudia Nabarro, Juan J. Nuño-Ballesteros, Raúl Oset Sinha, Maria Aparecida Soares Ruas, Contemporary Mathematics: Real and Complex Singularities, American Mathematical Soc., 2014, pp. 50-51.

Crossrefs

Cf. A087811.

Programs

  • Mathematica
    a[n_] := (2 n^3 + 12 n^2 + 73 n + 3 (n + 2)*(-1)^n - 6)/24 + ((-1)^(2^n - 1) + 1)/2; Array[a, 50, 0] (* or *)
    CoefficientList[ Series[(x^6 + x^5 - 2x^4 - 2x^3 + 2x^2 + x + 1)/((x - 1)^4 (x + 1)^2), {x, 0, 50}], x] (* Robert G. Wilson v, Jul 23 2018 *)
  • PARI
    Vec((1 + x + 2*x^2 - 2*x^3 - 2*x^4 + x^5 + x^6) / ((1 - x)^4*(1 + x)^2) + O(x^50)) \\ Colin Barker, Jul 05 2018

Formula

a(n) = (2*n^3 + 12*n^2 + 73*n + 3*(n + 2)*(-1)^n - 6)/24 + ((-1)^(2^n - 1) + 1)/2.
From Colin Barker, Jul 05 2018: (Start)
G.f.: (1 + x + 2*x^2 - 2*x^3 - 2*x^4 + x^5 + x^6) / ((1 - x)^4*(1 + x)^2).
a(n) = 2*a(n-1) + a(n-2) - 4*a(n-3) + a(n-4) + 2*a(n-5) - a(n-6) for n>6.
(End)

A356639 Number of integer sequences b with b(1) = 1, b(m) > 0 and b(m+1) - b(m) > 0, of length n which transform under the map S into a nonnegative integer sequence. The transform c = S(b) is defined by c(m) = Product_{k=1..m} b(k) / Product_{k=2..m} (b(k) - b(k-1)).

Original entry on oeis.org

1, 1, 3, 17, 155, 2677, 73327, 3578339, 329652351
Offset: 1

Views

Author

Thomas Scheuerle, Aug 19 2022

Keywords

Comments

This sequence can be calculated by a recursive algorithm:
Let B1 be an array of finite length, the "1" denotes that it is the first generation. Let B1' be the reversed version of B1. Let C be the element-wise product C = B1 * B1'. Then B2 is a concatenation of taking each element of B1 and add all divisors of the corresponding element in C. If we start with B1 = {1} then we get this sequence of arrays: B2 = {2}, B3 = {3, 4, 6}, ... . a(n) is the length of the array Bn. In short the length of Bn+1 and so a(n+1) is the sum over A000005(Bn * Bn').
The transform used in the definition of this sequence is its own inverse, so if c = S(b) then b = S(c). The eigensequence is 2^n = S(2^n).
There exist some transformation pairs of infinite sequences in the database:
A026549 <--> A038754; A100071 <--> A001405; A058295 <--> A------;
A111286 <--> A098011; A093968 <--> A205825; A166447 <--> A------;
A079352 <--> A------; A082458 <--> A------; A008233 <--> A264635;
A138278 <--> A------; A006501 <--> A264557; A336496 <--> A------;
A019464 <--> A------; A062112 <--> A------; A171647 <--> A359039;
A279312 <--> A------; A031923 <--> A------.
These transformation pairs are conjectured:
A137326 <--> A------; A066332 <--> A300902; A208147 <--> A308546;
A057895 <--> A------; A349080 <--> A------; A019442 <--> A------;
A349079 <--> A------.
("A------" means not yet in the database.)
Some sequences in the lists above may need offset adjustment to force a beginning with 1,2,... in the transformation.
If we allowed signed rational numbers, further interesting transformation pairs could be observed. For example, 1/n will transform into factorials with alternating sign. 2^(-n) transforms into ones with alternating sign and 1/A000045(n) into A000045 with alternating sign.

Examples

			a(4) = 17. The 17 transformation pairs of length 4 are:
  {1, 2, 3, 4}  = S({1, 2, 6, 24}).
  {1, 2, 3, 5}  = S({1, 2, 6, 15}).
  {1, 2, 3, 6}  = S({1, 2, 6, 12}).
  {1, 2, 3, 9}  = S({1, 2, 6, 9}).
  {1, 2, 3, 12} = S({1, 2, 6, 8}).
  {1, 2, 3, 21} = S({1, 2, 6, 7}).
  {1, 2, 4, 5}  = S({1, 2, 4, 20}).
  {1, 2, 4, 6}  = S({1, 2, 4, 12}).
  {1, 2, 4, 8}  = S({1, 2, 4, 8}).
  {1, 2, 4, 12} = S({1, 2, 4, 6}).
  {1, 2, 4, 20} = S({1, 2, 4, 5}).
  {1, 2, 6, 7}  = S({1, 2, 3, 21}).
  {1, 2, 6, 8}  = S({1, 2, 3, 12}).
  {1, 2, 6, 9}  = S({1, 2, 3, 9}).
  {1, 2, 6, 12} = S({1, 2, 3, 6}).
  {1, 2, 6, 15} = S({1, 2, 3, 5}).
  {1, 2, 6, 24} = S({1, 2, 3, 4}).
b(1) = 1 by definition, b(2) = 1+1 as 1 has only 1 as divisor.
a(3) = A000005(b(2)*b(2)) = 3.
The divisors of b(2) are 1,2,4. So b(3) can be b(2)+1, b(2)+2 and b(2)+4.
a(4) = A000005((b(2)+1)*(b(2)+4)) + A000005((b(2)+2)*(b(2)+2)) + A000005((b(2)+4)*(b(2)+1)) = 17.
		

Crossrefs

Previous Showing 11-17 of 17 results.