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-5 of 5 results.

A239572 Triangle T(n, k) = Numbers of non-equivalent (mod D_3) ways to place k points on a triangular grid of side n so that no two of them are adjacent. Triangle read by rows.

Original entry on oeis.org

1, 1, 2, 2, 1, 3, 6, 6, 1, 4, 16, 32, 24, 7, 1, 5, 32, 113, 200, 176, 66, 6, 7, 60, 329, 1053, 1976, 2096, 1162, 302, 34, 2, 8, 100, 790, 3932, 12565, 25676, 32963, 25638, 11294, 2493, 222, 7, 10, 160, 1702, 11988, 57275, 187984, 425329, 658608, 684671, 462519
Offset: 1

Views

Author

Heinrich Ludwig, Mar 22 2014

Keywords

Comments

Triangle T(n, k) is irregularly shaped: 1 <= k <= A239438(n). First row corresponds to n = 1.
The maximal number of points that can be placed on a triangular grid of side n so that no two of them are adjacent is given by A239438(n).
Without the restriction "non-equivalent (mod D_3)" numbers are given by A239567.

Examples

			Triangle begins
  1;
  1;
  2,   2,   1;
  3,   6,   6,    1;
  4,  16,  32,   24,     7,     1;
  5,  32, 113,  200,   176,    66,     6;
  7,  60, 329, 1053,  1976,  2096,  1162,   302,    34,    2;
  8, 100, 790, 3932, 12565, 25676, 32963, 25638, 11294, 2493, 222, 7;
		

Crossrefs

Column 1 is A001399,
Column 2 is A032091,
Column 3 is A239573,
Column 4 is A239574,
Column 5 is A239575,
Column 6 is A279446.

A239571 Number of ways to place 5 points on a triangular grid of side n so that no two of them are adjacent.

Original entry on oeis.org

0, 0, 27, 999, 11565, 74811, 342042, 1239525, 3799488, 10259640, 25076952, 56552364, 119324403, 238062357, 452774595, 826245798, 1454229216, 2479147536, 4108199481, 6636929805, 10479498849, 16207085223, 24596072424, 36687908235, 53862785520, 77929575480
Offset: 3

Views

Author

Heinrich Ludwig, Mar 22 2014

Keywords

Comments

Rotations and reflections of placements are counted. If they are to be ignored see A239575.

Crossrefs

Cf. A239567, A239575, A239568 (2 points), A239569 (3 points), A239570 (4 points), A282998 (6 points).

Programs

  • Magma
    [(n^2-7*n+12)*(n^8+12*n^7-58*n^6-860*n^5+2141*n^4 +23728*n^3-61316*n^2-244928*n+770880)/3840: n in [3..40]]; // Vincenzo Librandi, Mar 23 2014
  • Mathematica
    CoefficientList[Series[- 3 x^2 (40 x^8 - 185 x^7 + 198 x^6 + 213 x^5 - 243 x^4 - 638 x^3 + 687 x^2 + 234 x + 9)/(x - 1)^11, {x, 0, 40}], x] (* Vincenzo Librandi, Mar 23 2014 *)
  • PARI
    concat([0,0], Vec(-3*x^5*(40*x^8-185*x^7+198*x^6+213*x^5-243*x^4-638*x^3+687*x^2+234*x+9)/(x-1)^11 + O(x^100))) \\ Colin Barker, Mar 22 2014
    

Formula

a(n) = (n -3) * (n -4) * (n^8 +12*n^7 -58*n^6 -860*n^5 +2141*n^4 +23728*n^3 -61316*n^2 -244928*n +770880)/3840.
G.f.: -3*x^5*(40*x^8-185*x^7+198*x^6+213*x^5-243*x^4-638*x^3+687*x^2+234*x+9) / (x-1)^11. - Colin Barker, Mar 22 2014

A239573 Number of non-equivalent (mod D_3) ways to place 3 indistinguishable points on a triangular grid of side n so that no two of them are adjacent.

Original entry on oeis.org

0, 1, 6, 32, 113, 329, 790, 1702, 3320, 6057, 10400, 17074, 26903, 41047, 60796, 87886, 124220, 172275, 234732, 314992, 416703, 544391, 702878, 898040, 1136098, 1424521, 1771178, 2185392, 2676947, 3257305, 3938450, 4734286, 5659306, 6730177, 7964228, 9381234
Offset: 2

Views

Author

Heinrich Ludwig, Mar 23 2014

Keywords

Comments

Rotations and reflections of placements are not counted. If they are to be counted see A239569.

Examples

			There are a(4) = 6 non-equivalent ways to place 3 points on a triangular grid of side 4:
    .           X           X           X           X           X
   . X         . .         . .         . .         . .         . .
  X . .       X . X       X . .       X . .       . X .       . . .
. . X .     . . . .     . . X .     . . . X     . . . X     X . . X
		

Crossrefs

Cf. A239572, A239569, A032091 (2 points), A239574 (4 points), A239575 (5 points), A279446 (6 points).

Programs

  • PARI
    concat(0, Vec(-x^3*(2*x^9 +x^8 -8*x^7 -9*x^6 +3*x^5 +29*x^4 +24*x^3 +14*x^2 +3*x +1)/((x -1)^7*(x +1)^3*(x^2 +x +1)) + O(x^100))) \\ Colin Barker, Mar 23 2014

Formula

a(n) = (n^6 + 3*n^5 - 39*n^4 + 10*n^3 + 456*n^2 - 1008*n + 576)/288 + IF(MOD(n, 2) = 1)*(3*n^2 - 5*n - 5)/32 + IF(MOD(n, 3) = 1)*2/9.
G.f.: -x^3*(2*x^9 +x^8 -8*x^7 -9*x^6 +3*x^5 +29*x^4 +24*x^3 +14*x^2 +3*x +1) / ((x -1)^7*(x +1)^3*(x^2 +x +1)). - Colin Barker, Mar 23 2014

A239574 Number of non-equivalent (mod D_3) ways to place 4 indistinguishable points on a triangular grid of side n so that no two of them are adjacent.

Original entry on oeis.org

0, 1, 24, 200, 1053, 3932, 11988, 31298, 73046, 155880, 310046, 581414, 1038634, 1779531, 2942114, 4714412, 7350595, 11184786, 16654116, 24317554, 34886940, 49252544, 68523846, 94062350, 127534794, 170954603, 226748678, 297809946, 387580007, 500113190, 640178710
Offset: 3

Views

Author

Heinrich Ludwig, Mar 23 2014

Keywords

Comments

Rotations and reflections of placements are not counted. If they are to be counted see A239570.

Examples

			There is a(4) = 1 way to place 4 points on a triangular grid of side n = 4:
      X
     . .
    . X .
   X . . X
		

Crossrefs

Cf. A239572, A239570, A032091 (2 points), A239573 (3 points), A239575 (5 points), A279446 (6 points).

Programs

  • Mathematica
    Drop[CoefficientList[Series[x^4*(-1 - 22*x - 149*x^2 - 586*x^3 - 1354*x^4 - 2154*x^5 - 2300*x^6 - 1510*x^7 - 259*x^8 + 470*x^9 + 443*x^10 + 70*x^11 - 130*x^12 - 94*x^13 - 10*x^14 + 18*x^15 + 8*x^16) / ((-1+x)^9 * (1+x)^4 * (1+x+x^2)^3), {x, 0, 20}], x],3] (* Vaclav Kotesovec, Mar 29 2014 *)
    Table[(n^8+4*n^7-78*n^6-104*n^5+2556*n^4-3152*n^3-27280*n^2+89664*n-78336)/2304 + If[Mod[n,2]==1,(28*n^3-54*n^2-160*n+129)/768,0] + If[Mod[n,3]==1,(n^2+n-14)/18,0],{n,3,20}] (* Vaclav Kotesovec after Heinrich Ludwig, Mar 29 2014 *)

Formula

a(n) = (n^8 +4*n^7 -78*n^6 -104*n^5 +2556*n^4 -3152*n^3 -27280*n^2 +89664*n -78336)/2304 +IF(n == 1 mod 2)*(28*n^3 -54*n^2 -160*n +129)/768 +IF(n == 1 mod 3)*(n^2 +n -14)/18.
G.f.: x^4*(-1 - 22*x - 149*x^2 - 586*x^3 - 1354*x^4 - 2154*x^5 - 2300*x^6 - 1510*x^7 - 259*x^8 + 470*x^9 + 443*x^10 + 70*x^11 - 130*x^12 - 94*x^13 - 10*x^14 + 18*x^15 + 8*x^16) / ((-1+x)^9 * (1+x)^4 * (1+x+x^2)^3). - Vaclav Kotesovec, Mar 29 2014

A279446 Number of non-equivalent (mod D_3) ways to place 6 indistinguishable points on a triangular grid of side n so that no two of them are adjacent.

Original entry on oeis.org

0, 0, 1, 66, 2096, 25676, 187984, 983172, 4073312, 14196011, 43309138, 118818916, 298926225, 699619679, 1540212590, 3217045155, 6419240369, 12304959047, 22763742133, 40797668697, 71065355815, 120643462032, 200077436639, 324808463585, 517088445952, 808515893580
Offset: 3

Views

Author

Heinrich Ludwig, Feb 26 2017

Keywords

Comments

Rotations and reflections of placements are not counted. For numbers if they are to be counted see A282998.

Examples

			There is a(5) = 1 way to place 6 points on a triangular grid of side n = 5:
        X
       . .
      X . X
     . . . .
    X . X . X
		

Crossrefs

Cf. A282998, A239572, A032091 (2 points), A239573 (3 points), A239574 (4 points), A239575 (5 points).

Programs

  • Mathematica
    Table[Boole[n > 4] ((n^12 + 6 n^11 - 195 n^10 - 670 n^9 + 17455 n^8 + 13426 n^7 - 835256 n^6 + 1246240 n^5 + 19563664 n^4 - 68181792 n^3 - 131524224 n^2 + 969500160 n - 1298903040)/276480 + Boole[OddQ@ n] (162 n^5 - 715 n^4 - 4480 n^3 + 21955 n^2 + 1108 n - 41685)/30720 + Boole[Mod[n, 3] == 1] (n^2 + n - 25)/27), {n, 3, 28}] (* Michael De Vlieger, Feb 26 2017 *)
  • PARI
    concat(vector(2), Vec(x^5*(1 + 62*x + 1832*x^2 + 17309*x^3 + 86394*x^4 + 266304*x^5 + 557979*x^6 + 818157*x^7 + 829988*x^8 + 519203*x^9 + 94134*x^10 - 150065*x^11 - 123434*x^12 + 7445*x^13 + 64052*x^14 + 29943*x^15 - 11247*x^16 - 15803*x^17 - 3012*x^18 + 3100*x^19 + 1722*x^20 - 15*x^21 - 233*x^22 - 56*x^23) / ((1 - x)^13*(1 + x)^6*(1 + x + x^2)^3) + O(x^30))) \\ Colin Barker, Feb 26 2017

Formula

a(n) = (n^12 + 6*n^11 - 195*n^10 - 670*n^9 + 17455*n^8 + 13426*n^7 - 835256*n^6 + 1246240*n^5 + 19563664*n^4 - 68181792*n^3 - 131524224*n^2 + 969500160*n - 1298903040)/276480 + IF(MOD(n, 2) = 1, 162*n^5 - 715*n^4 - 4480*n^3 + 21955*n^2 + 1108*n - 41685)/30720 + IF(MOD(n, 3) = 1, n^2 + n - 25)/27 for n>=4.
G.f.: x^5*(1 + 62*x + 1832*x^2 + 17309*x^3 + 86394*x^4 + 266304*x^5 + 557979*x^6 + 818157*x^7 + 829988*x^8 + 519203*x^9 + 94134*x^10 - 150065*x^11 - 123434*x^12 + 7445*x^13 + 64052*x^14 + 29943*x^15 - 11247*x^16 - 15803*x^17 - 3012*x^18 + 3100*x^19 + 1722*x^20 - 15*x^21 - 233*x^22 - 56*x^23) / ((1 - x)^13*(1 + x)^6*(1 + x + x^2)^3). - Colin Barker, Feb 26 2017
Showing 1-5 of 5 results.