A278290 -id:A278290 - cp's OEIS frontend

A278317 Number of neighbors of each new term in a right triangle read by rows.

0, 1, 2, 2, 3, 2, 2, 4, 3, 2, 2, 4, 4, 3, 2, 2, 4, 4, 4, 3, 2, 2, 4, 4, 4, 4, 3, 2, 2, 4, 4, 4, 4, 4, 3, 2, 2, 4, 4, 4, 4, 4, 4, 3, 2, 2, 4, 4, 4, 4, 4, 4, 4, 3, 2, 2, 4, 4, 4, 4, 4, 4, 4, 4, 3, 2, 2, 4, 4, 4, 4, 4, 4, 4, 4, 4, 3, 2, 2, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 3, 2, 2, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 3, 2

Offset: 1

Omar E. Pol, Nov 18 2016

To evaluate T(n,k) consider only the neighbors of T(n,k) that are present in the triangle when T(n,k) should be a new term in the triangle.
Apart from the first column and the first two diagonals the rest of the elements are 4's.
For the same idea but for an isosceles triangle see A275015; for a square array see A278290, for a square spiral see A278354; and for a hexagonal spiral see A047931.

			Triangle begins:
0;
1, 2;
2, 3, 2;
2, 4, 3, 2;
2, 4, 4, 3, 2;
2, 4, 4, 4, 3, 2;
2, 4, 4, 4, 4, 3, 2;
2, 4, 4, 4, 4, 4, 3, 2;
2, 4, 4, 4, 4, 4, 4, 3, 2;
2, 4, 4, 4, 4, 4, 4, 4, 3, 2;
...

Apart from the initial zero, row sums give A004767.
Column 1 is A130130.
Columns > 1 give the terms greater than 1 of A158411.
Right border gives 0 together with A007395, also twice A057427.
Second right border gives A122553.
Cf. A047931, A274912, A274913, A275015, A278290, A278317, A278354,

A278354 Number of neighbors of each new term in a square spiral.

Original entry on oeis.org

0, 1, 2, 3, 2, 3, 2, 4, 3, 2, 4, 3, 2, 4, 4, 3, 2, 4, 4, 3, 2, 4, 4, 4, 3, 2, 4, 4, 4, 3, 2, 4, 4, 4, 4, 3, 2, 4, 4, 4, 4, 3, 2, 4, 4, 4, 4, 4, 3, 2, 4, 4, 4, 4, 4, 3, 2, 4, 4, 4, 4, 4, 4, 3, 2, 4, 4, 4, 4, 4, 4, 3, 2, 4, 4, 4, 4, 4, 4, 4, 3, 2, 4, 4, 4, 4, 4, 4, 4, 3, 2, 4, 4, 4, 4, 4, 4, 4, 4, 3, 2, 4, 4, 4, 4

Offset: 1

Omar E. Pol, Nov 19 2016

nonn

Here the "neighbors" of a(n) are defined to be the adjacent elements to a(n) in the same row, column or diagonals, that are present in the spiral when a(n) is the new element of the sequence in progress.

For the same idea but for a right triangle see A278317; for an isosceles triangle see A275015; for a square array see A278290; and for a hexagonal spiral see A047931.

			Illustration of initial terms as a spiral (n = 1..169):
.
.     2 - 3 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 2
.     |                                               |
.     4   2 - 3 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 2   3
.     |   |                                       |   |
.     4   4   2 - 3 - 4 - 4 - 4 - 4 - 4 - 4 - 2   3   4
.     |   |   |                               |   |   |
.     4   4   4   2 - 3 - 4 - 4 - 4 - 4 - 2   3   4   4
.     |   |   |   |                       |   |   |   |
.     4   4   4   4   2 - 3 - 4 - 4 - 2   3   4   4   4
.     |   |   |   |   |               |   |   |   |   |
.     4   4   4   4   4   2 - 3 - 2   3   4   4   4   4
.     |   |   |   |   |   |       |   |   |   |   |   |
.     4   4   4   4   4   3   0 - 1   4   4   4   4   4
.     |   |   |   |   |   |           |   |   |   |   |
.     4   4   4   4   3   2 - 4 - 3 - 2   4   4   4   4
.     |   |   |   |   |                   |   |   |   |
.     4   4   4   3   2 - 4 - 4 - 4 - 3 - 2   4   4   4
.     |   |   |   |                           |   |   |
.     4   4   3   2 - 4 - 4 - 4 - 4 - 4 - 3 - 2   4   4
.     |   |   |                                   |   |
.     4   3   2 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 3 - 2   4
.     |   |                                           |
.     3   2 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 3 - 2
.     |
.     2 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 3
.

Cf. A002620, A033638, A047931, A141481, A274917, A275015, A275609, A278180, A278290, A278317.

0,1,seq(op([2,4$floor(i/2),3]),i=0..30); # Robert Israel, Nov 22 2016

From Robert Israel, Nov 22 2016: (Start)
a(n) = 3 if n>=4 is in A002620.
a(n) = 2 if n>=2 is in A033638.
Otherwise, a(n) = 4 if n > 2. (End)

A275015 Number of neighbors of each new term in an isosceles triangle read by rows.

Original entry on oeis.org

0, 1, 2, 1, 3, 2, 1, 3, 3, 2, 1, 3, 3, 3, 2, 1, 3, 3, 3, 3, 2, 1, 3, 3, 3, 3, 3, 2, 1, 3, 3, 3, 3, 3, 3, 2, 1, 3, 3, 3, 3, 3, 3, 3, 2, 1, 3, 3, 3, 3, 3, 3, 3, 3, 2, 1, 3, 3, 3, 3, 3, 3, 3, 3, 3, 2, 1, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 2, 1, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 2, 1, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 2

Offset: 1

Omar E. Pol, Nov 20 2016

To evaluate a(n) consider only the neighbors of a(n) that are present in the isosceles triangle when a(n) should be a new term in the triangle.
Apart from the left border and the right border, the rest of the elements are 3's.
If every "3" is replaced with a "4", we have the sequence A278290.
a(n) is also the number of new penny-penny contacts when putting pennies in a triangular arrangement.
For the same idea but for a right triangle see A278317; for a square array see A278290, for a square spiral see A278354; and for a hexagonal spiral see A047931.

			The sequence written as an isosceles triangle begins:
.
.                     0;
.                   1,  2;
.                 1,  3,  2;
.               1,  3,  3,  2;
.             1,  3,  3,  3,  2;
.           1,  3,  3,  3,  3,  2;
.         1,  3,  3,  3,  3,  3,  2;
.       1,  3,  3,  3,  3,  3,  3,  2;
.     1,  3,  3,  3,  3,  3,  3,  3,  2;
.   1,  3,  3,  3,  3,  3,  3,  3,  3,  2;
...

Row sums give A008585.
Left border gives A057427.
Every diagonal that is parallel to the left border gives the elements greater than 1 of A158799.
Right border gives 0 together with A007395, also twice A057427.
Every diagonal that is parallel to the right border gives A122553.
Cf. A047931, A278290, A278317, A278354.

Table[Boole[n > 1] (Prepend[Reverse@ Rest@ #, First@ #] &@ Range@ n /. k_ /; k > 3 -> 3), {n, 13}] // Flatten (* or *)
Table[Boole[n > 1] (Map[Mod[#, n] &, Range@ n] /. {k_ /; k > 1 -> 3, 0 -> 2}), {n, 13}] // Flatten (* Michael De Vlieger, Nov 23 2016 *)

A278545 Number of neighbors of the n-th term in a full square array read by antidiagonals.

Original entry on oeis.org

3, 5, 5, 5, 8, 5, 5, 8, 8, 5, 5, 8, 8, 8, 5, 5, 8, 8, 8, 8, 5, 5, 8, 8, 8, 8, 8, 5, 5, 8, 8, 8, 8, 8, 8, 5, 5, 8, 8, 8, 8, 8, 8, 8, 5, 5, 8, 8, 8, 8, 8, 8, 8, 8, 5, 5, 8, 8, 8, 8, 8, 8, 8, 8, 8, 5, 5, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 5, 5, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 5, 5, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 5

Offset: 1

Omar E. Pol, Nov 23 2016

Apart from the first row and the first column, the rest of the elements are 8's.

For the same idea but for a right triangle see A278480; for an isosceles triangle see A278481; for a square spiral see A010731; and for a hexagonal spiral see A010722.

			The corner of the square array begins:
3,5,5,5,5,5,5,5,5,5,...
5,8,8,8,8,8,8,8,8,...
5,8,8,8,8,8,8,8,...
5,8,8,8,8,8,8,...
5,8,8,8,8,8,...
5,8,8,8,8,...
5,8,8,8,...
5,8,8,...
5,8,...
5,...
...

Robert Israel, Table of n, a(n) for n = 1..10000

Antidiagonal sums give 3 together with the elements > 2 of A017089.

Cf. A010722, A010731, A274912, A274913, A278317, A278290, A278480, A278481.

3, seq(op([5,8$i,5]),i=0..20); # Robert Israel, Dec 04 2016

G.f. 3+x+8*x/(1-x)-3*(1+x)*Theta_2(0,sqrt(x))/(2*x^(1/8)) where Theta_2 is a Jacobi Theta function. - Robert Israel, Dec 04 2016

cp's OEIS Frontend

A278317 Number of neighbors of each new term in a right triangle read by rows.

Views

Author

Keywords

Comments

Examples

Crossrefs

A278354 Number of neighbors of each new term in a square spiral.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Maple

Formula

A275015 Number of neighbors of each new term in an isosceles triangle read by rows.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A278545 Number of neighbors of the n-th term in a full square array read by antidiagonals.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Maple

Formula