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 31-40 of 71 results. Next

A317186 One of many square spiral sequences: a(n) = n^2 + n - floor((n-1)/2).

Original entry on oeis.org

1, 2, 6, 11, 19, 28, 40, 53, 69, 86, 106, 127, 151, 176, 204, 233, 265, 298, 334, 371, 411, 452, 496, 541, 589, 638, 690, 743, 799, 856, 916, 977, 1041, 1106, 1174, 1243, 1315, 1388, 1464, 1541, 1621, 1702, 1786, 1871, 1959, 2048, 2140, 2233, 2329, 2426
Offset: 0

Views

Author

N. J. A. Sloane, Jul 27 2018

Keywords

Comments

Draw a square spiral on a piece of graph paper, and label the cells starting at the center with the positive (resp. nonnegative) numbers. This produces two versions of the labeled square spiral, shown in the Example section below.
The spiral may proceed clockwise or counterclockwise, and the first arm of the spiral may be along any of the four axes, so there are eight versions of each spiral. However, this has no effect on the resulting sequences, and it is enough to consider just two versions of the square spiral (starting at 1 or starting at 0).
The present sequence is obtained by reading alternate entries on the X-axis (say) of the square spiral started at 1.
The cross-references section lists many sequences that can be read directly off the two spirals. Many other sequences can be obtained from them by using them to extract subsequences from other important sequences. For example, the subsequence of primes indexed by the present sequence gives A317187.
a(n) is also the number of free polyominoes with n + 4 cells whose difference between length and width is n. In this comment the length is the longer of the two dimensions and the width is the shorter of the two dimensions (see the examples of polyominoes). Hence this is also the diagonal 4 of A379625. - Omar E. Pol, Jan 24 2025
From John Mason, Feb 19 2025: (Start)
The sequence enumerates polyominoes of width 2 having precisely 2 horizontal bars. By classifying such polyominoes according to the following templates, it is possible to define a formula that reduces to the one below:
.
OO O O
O OO OO
O O O
O O OO
OO OO O
.
(End)

Examples

			The square spiral when started with 1 begins:
.
  100--99--98--97--96--95--94--93--92--91
                                        |
   65--64--63--62--61--60--59--58--57  90
    |                               |   |
   66  37--36--35--34--33--32--31  56  89
    |   |                       |   |   |
   67  38  17--16--15--14--13  30  55  88
    |   |   |               |   |   |   |
   68  39  18   5---4---3  12  29  54  87
    |   |   |   |       |   |   |   |   |
   69  40  19   6   1---2  11  28  53  86
    |   |   |   |           |   |   |   |
   70  41  20   7---8---9--10  27  52  85
    |   |   |                   |   |   |
   71  42  21--22--23--24--25--26  51  84
    |   |                           |   |
   72  43--44--45--46--47--48--49--50  83
    |                                   |
   73--74--75--76--77--78--79--80--81--82
.
For the square spiral when started with 0, subtract 1 from each entry. In the following diagram this spiral has been reflected and rotated, but of course that makes no difference to the sequences:
.
   99  64--65--66--67--68--69--70--71--72
    |   |                               |
   98  63  36--37--38--39--40--41--42  73
    |   |   |                       |   |
   97  62  35  16--17--18--19--20  43  74
    |   |   |   |               |   |   |
   96  61  34  15   4---5---6  21  44  75
    |   |   |   |   |       |   |   |   |
   95  60  33  14   3   0   7  22  45  76
    |   |   |   |   |   |   |   |   |   |
   94  59  32  13   2---1   8  23  46  77
    |   |   |   |           |   |   |   |
   93  58  31  12--11--10---9  24  47  78
    |   |   |                   |   |   |
   92  57  30--29--28--27--26--25  48  79
    |   |                           |   |
   91  56--55--54--53--52--51--50--49  80
    |                                   |
   90--89--88--87--86--85--84--83--82--81
.
From _Omar E. Pol_, Jan 24 2025: (Start)
For n = 0 there is only one free polyomino with 0 + 4 = 4 cells whose difference between length and width is 0 as shown below, so a(0) = 1.
   _ _
  |_|_|
  |_|_|
.
For n = 1 there are two free polyominoes with 1 + 4 = 5 cells whose difference between length and width is 1 as shown below, so a(1) = 2.
   _ _     _ _
  |_|_|   |_|_|
  |_|_|   |_|_
  |_|     |_|_|
.
(End)
		

Crossrefs

Sequences on the four axes of the square spiral: Starting at 0: A001107, A033991, A007742, A033954; starting at 1: A054552, A054556, A054567, A033951.
Sequences on the four diagonals of the square spiral: Starting at 0: A002939 = 2*A000384, A016742 = 4*A000290, A002943 = 2*A014105, A033996 = 8*A000217; starting at 1: A054554, A053755, A054569, A016754.
Sequences obtained by reading alternate terms on the X and Y axes and the two main diagonals of the square spiral: Starting at 0: A035608, A156859, A002378 = 2*A000217, A137932 = 4*A002620; starting at 1: A317186, A267682, A002061, A080335.
Filling in these two squares spirals with greedy algorithm: A274640, A274641.
Cf. also A317187.

Programs

  • Mathematica
    a[n_] := n^2 + n - Floor[(n - 1)/2]; Array[a, 50, 0] (* Robert G. Wilson v, Aug 01 2018 *)
    LinearRecurrence[{2, 0, -2 , 1},{1, 2, 6, 11},50] (* or *)
    CoefficientList[Series[(- x^3 - 2 * x^2 - 1) / ((x - 1)^3 * (x + 1)), {x, 0, 50}], x] (* Stefano Spezia, Sep 02 2018 *)

Formula

From Daniel Forgues, Aug 01 2018: (Start)
a(n) = (1/4) * (4 * n^2 + 2 * n + (-1)^n + 3), n >= 0.
a(0) = 1; a(n) = - a(n-1) + 2 * n^2 - n + 2, n >= 1.
a(0) = 1; a(1) = 2; a(2) = 6; a(3) = 11; a(n) = 2 * a(n-1) - 2 * a(n-3) + a(n-4), n >= 4.
G.f.: (- x^3 - 2 * x^2 - 1) / ((x - 1)^3 * (x + 1)). (End)
E.g.f.: ((2 + 3*x + 2*x^2)*cosh(x) + (1 + 3*x + 2*x^2)*sinh(x))/2. - Stefano Spezia, Apr 24 2024
a(n)+a(n+1)=A033816(n). - R. J. Mathar, Mar 21 2025
a(n)-a(n-1) = A042948(n), n>=1. - R. J. Mathar, Mar 21 2025

A267682 a(n) = 2*a(n-1) - 2*a(n-3) + a(n-4) for n > 3, with initial terms 1, 1, 4, 8.

Original entry on oeis.org

1, 1, 4, 8, 15, 23, 34, 46, 61, 77, 96, 116, 139, 163, 190, 218, 249, 281, 316, 352, 391, 431, 474, 518, 565, 613, 664, 716, 771, 827, 886, 946, 1009, 1073, 1140, 1208, 1279, 1351, 1426, 1502, 1581, 1661, 1744, 1828, 1915, 2003, 2094, 2186, 2281, 2377, 2476
Offset: 0

Views

Author

Robert Price, Jan 19 2016

Keywords

Comments

Also, total number of ON (black) cells after n iterations of the "Rule 201" elementary cellular automaton starting with a single ON (black) cell.

References

  • S. Wolfram, A New Kind of Science, Wolfram Media, 2002; p. 55.

Crossrefs

Cf. A267679.
Sequences on the four axes of the square spiral: Starting at 0: A001107, A033991, A007742, A033954; starting at 1: A054552, A054556, A054567, A033951.
Sequences on the four diagonals of the square spiral: Starting at 0: A002939 = 2*A000384, A016742 = 4*A000290, A002943 = 2*A014105, A033996 = 8*A000217; starting at 1: A054554, A053755, A054569, A016754.
Sequences obtained by reading alternate terms on the X and Y axes and the two main diagonals of the square spiral: Starting at 0: A035608, A156859, A002378 = 2*A000217, A137932 = 4*A002620; starting at 1: A317186, A267682, A002061, A080335.

Programs

  • Mathematica
    rule=201; rows=20; ca=CellularAutomaton[rule,{{1},0},rows-1,{All,All}]; (* Start with single black cell *) catri=Table[Take[ca[[k]],{rows-k+1,rows+k-1}],{k,1,rows}]; (* Truncated list of each row *) nbc=Table[Total[catri[[k]]],{k,1,rows}]; (* Number of Black cells in stage n *) Table[Total[Take[nbc,k]],{k,1,rows}] (* Number of Black cells through stage n *)
    LinearRecurrence[{2, 0, -2, 1}, {1, 1, 4, 8}, 60] (* Vincenzo Librandi, Jan 19 2016 *)
  • PARI
    Vec((1-x+2*x^2+2*x^3)/((1-x)^3*(1+x)) + O(x^100)) \\ Colin Barker, Jan 19 2016
    
  • Python
    print([n*(n-1)+n//2+1 for n in range(51)]) # Karl V. Keller, Jr., Jul 14 2021

Formula

G.f.: (1 - x + 2*x^2 + 2*x^3) / ((1-x)^3*(1+x)). - Colin Barker, Jan 19 2016
a(n) = n*(n-1) + floor(n/2) + 1. - Karl V. Keller, Jr., Jul 14 2021
E.g.f.: (exp(x)*(2 + x + 2*x^2) - sinh(x))/2. - Stefano Spezia, Jul 16 2021

Extensions

Edited by N. J. A. Sloane, Jul 25 2018, replacing definition with simpler formula provided by Colin Barker, Jan 19 2016.

A176271 The odd numbers as a triangle read by rows.

Original entry on oeis.org

1, 3, 5, 7, 9, 11, 13, 15, 17, 19, 21, 23, 25, 27, 29, 31, 33, 35, 37, 39, 41, 43, 45, 47, 49, 51, 53, 55, 57, 59, 61, 63, 65, 67, 69, 71, 73, 75, 77, 79, 81, 83, 85, 87, 89, 91, 93, 95, 97, 99, 101, 103, 105, 107, 109, 111, 113, 115, 117, 119, 121, 123, 125, 127, 129, 131
Offset: 1

Views

Author

Reinhard Zumkeller, Apr 13 2010

Keywords

Comments

A108309(n) = number of primes in n-th row.

Examples

			From _Philippe Deléham_, Oct 03 2011: (Start)
Triangle begins:
   1;
   3,  5;
   7,  9, 11;
  13, 15, 17, 19;
  21, 23, 25, 27, 29;
  31, 33, 35, 37, 39, 41;
  43, 45, 47, 49, 51, 53, 55;
  57, 59, 61, 63, 65, 67, 69, 71;
  73, 75, 77, 79, 81, 83, 85, 87, 89; (End)
		

Crossrefs

Programs

  • Haskell
    a176271 n k = a176271_tabl !! (n-1) !! (k-1)
    a176271_row n = a176271_tabl !! (n-1)
    a176271_tabl = f 1 a005408_list where
       f x ws = us : f (x + 1) vs where (us, vs) = splitAt x ws
    -- Reinhard Zumkeller, May 24 2012
    
  • Magma
    [n^2-n+2*k-1: k in [1..n], n in [1..15]]; // G. C. Greubel, Mar 10 2024
    
  • Maple
    A176271 := proc(n,k)
        n^2-n+2*k-1 ;
    end proc: # R. J. Mathar, Jun 28 2013
  • Mathematica
    Table[n^2-n+2*k-1, {n,15}, {k,n}]//Flatten (* G. C. Greubel, Mar 10 2024 *)
  • SageMath
    flatten([[n^2-n+2*k-1 for k in range(1,n+1)] for n in range(1,16)]) # G. C. Greubel, Mar 10 2024

Formula

T(n, k) = n^2 - n + 2*k - 1 for 1 <= k <= n.
T(n, k) = A005408(n*(n-1)/2 + k - 1).
T(2*n-1, n) = A016754(n-1) (main diagonal).
T(2*n, n) = A000466(n).
T(2*n, n+1) = A053755(n).
T(n, k) + T(n, n-k+1) = A001105(n), 1 <= k <= n.
T(n, 1) = A002061(n), central polygonal numbers.
T(n, 2) = A027688(n-1) for n > 1.
T(n, 3) = A027690(n-1) for n > 2.
T(n, 4) = A027692(n-1) for n > 3.
T(n, 5) = A027694(n-1) for n > 4.
T(n, 6) = A048058(n-1) for n > 5.
T(n, n-3) = A108195(n-2) for n > 3.
T(n, n-2) = A082111(n-2) for n > 2.
T(n, n-1) = A014209(n-1) for n > 1.
T(n, n) = A028387(n-1).
Sum_{k=1..n} T(n, k) = A000578(n) (Nicomachus's theorem).
Sum_{k=1..n} (-1)^(k-1)*T(n, k) = (-1)^(n-1)*A065599(n) (alternating sign row sums).
Sum_{j=1..n} (Sum_{k=1..n} T(j, k)) = A000537(n) (sum of first n rows).

A081344 Natural numbers in square maze arrangement, read by antidiagonals.

Original entry on oeis.org

1, 2, 4, 9, 3, 5, 10, 8, 6, 16, 25, 11, 7, 15, 17, 26, 24, 12, 14, 18, 36, 49, 27, 23, 13, 19, 35, 37, 50, 48, 28, 22, 20, 34, 38, 64, 81, 51, 47, 29, 21, 33, 39, 63, 65, 82, 80, 52, 46, 30, 32, 40, 62, 66, 100, 121, 83, 79, 53, 45, 31, 41, 61, 67, 99, 101, 122, 120, 84, 78, 54
Offset: 1

Views

Author

Paul Barry, Mar 19 2003

Keywords

Comments

Arrange the natural numbers by taking clockwise and counterclockwise turns. Begin (LL) and then repeat (RRR)(LLL).
a(n) is a pairing function: a function that reversibly maps Z^{+} x Z^{+} onto Z^{+}, where Z^{+} is the set of integer positive numbers. - Boris Putievskiy, Dec 16 2012
For generalizations see A219159, A213928. - Boris Putievskiy, Mar 10 2013

Examples

			The start of the sequence as table T(i,j), i,j > 0:
   1   4    5    16 ...
   2   3    6    15 ...
   9   8    7    14 ...
  10  11   12    13 ...
  ....
		

Crossrefs

Cf. A219159, A213928. The main diagonal is A002061. The following appear within interlaced sequences: A016754, A001844, A053755, A004120. The first row is A081345. The first column is A081346. The inverse permutation A194280, the first inverse function (numbers of rows) A220603, the second inverse function (numbers of columns) A220604.

Programs

  • Mathematica
    T[n_, k_] := T[n, k] = Which[OddQ[n] && k==1, n^2, EvenQ[k] && n==1, k^2, EvenQ[n] && k==1, T[n-1, 1]+1, OddQ[k] && n==1, T[1, k-1]+1, k <= n, T[n, k-1]+1 - 2 Mod[n, 2], True, T[n-1, k]-1 + 2 Mod[k, 2]]; Table[T[n-k+1, k], {n, 1, 12}, {k, 1, n}] // Flatten (* Jean-François Alcover, Feb 20 2019 *)
  • Python
    t=int((math.sqrt(8*n-7) - 1)/ 2)
    i=n-t*(t+1)/2
    j=(t*t+3*t+4)/2-n
    if j >= i:
         m=(j-1)**2 + j + (j-i)*(-1)**(j-1)
    else:
         m=(i-1)**2 + i - (i-j)*(-1)**(i-1)
    # Boris Putievskiy, Dec 19 2012
    
  • Python
    from math import isqrt
    def A081344(n):
        t = (k:=isqrt(m:=n<<1))+((m<<2)>(k<<2)*(k+1)+1)-1
        i, j = n-(t*(t+1)>>1), (t*(t+3)>>1)+2-n
        r = max(i,j)
        return (r-1)**2+r+(j-i if r&1 else i-j) # Chai Wah Wu, Nov 04 2024

Formula

From Boris Putievskiy, Dec 19 2012: (Start)
a(n) = (i-1)^2 + i + (i-j)*(-1)^(i-1) if i >= j,
a(n) = (j-1)^2 + j - (j-i)*(-1)^(j-1) if i < j,
where
i = n - t*(t+1)/2,
j = (t*t + 3*t + 4)/2-n,
t = floor((-1 + sqrt(8*n-7))/2). (End)
Enumeration by boustrophedonic ("ox-plowing") method: If i >= j: T(i,j)=(i-1)^2+i + (i-j)*(-1)^(i-1), if i < j: T(i,j)=(j-1)^2+j - (j-i)*(-1)^(j-1). - Boris Putievskiy, Dec 19 2012
T(i,j) = m^2 - m + 1 - (i - j)*(-1)^m where m = max(i,j). - Ziad Ahmed, Jun 09 2025

A188647 Array read by antidiagonals of a(n) = a(n-1)*k-((k-1)/(k^n)) where a(0)=1 and k=(sqrt(x^2+1)+x)^2 for integers x>=1.

Original entry on oeis.org

1, 5, 1, 29, 17, 1, 169, 305, 37, 1, 985, 5473, 1405, 65, 1, 5741, 98209, 53353, 4289, 101, 1, 33461, 1762289, 2026009, 283009, 10301, 145, 1, 195025, 31622993, 76934989, 18674305, 1050601, 21169, 197, 1, 1136689, 567451585, 2921503573, 1232221121, 107151001, 3090529, 39005, 257, 1
Offset: 0

Views

Author

Charles L. Hohn, Apr 06 2011

Keywords

Comments

Conjecture: Given function f(x, y)=(sqrt(x^2+y)+x)^2; constant k=f(x, y); and initial term a(0)=1; then for all integers x>=1 and y=[+-]1, k may be irrational, but sequence a(n)=a(n-1)*k-((k-1)/(k^n)) always produces integer sequences; y=1 results shown here; y=-1 results are A188646.
Also square array A(n,k), n >= 1, k >= 0, read by antidiagonals, where A(n,k) is (1/sqrt(n^2+1)) * T_{2*k+1}(sqrt(n^2+1)), with T the Chebyshev polynomial of the first kind. - Seiichi Manyama, Jan 02 2019

Examples

			Square array begins:
     | 0    1       2          3             4
-----+---------------------------------------------
   1 | 1,   5,     29,       169,          985, ...
   2 | 1,  17,    305,      5473,        98209, ...
   3 | 1,  37,   1405,     53353,      2026009, ...
   4 | 1,  65,   4289,    283009,     18674305, ...
   5 | 1, 101,  10301,   1050601,    107151001, ...
   6 | 1, 145,  21169,   3090529,    451196065, ...
   7 | 1, 197,  39005,   7722793,   1529074009, ...
   8 | 1, 257,  66305,  17106433,   4413393409, ...
   9 | 1, 325, 105949,  34539049,  11259624025, ...
  10 | 1, 401, 161201,  64802401,  26050404001, ...
  11 | 1, 485, 235709, 114554089,  55673051545, ...
  12 | 1, 577, 333505, 192765313, 111418017409, ...
  13 | 1, 677, 459005, 311204713, 210996336409, ...
  14 | 1, 785, 617009, 484968289, 381184458145, ...
  15 | 1, 901, 812701, 733055401, 661215159001, ...
  ...
		

Crossrefs

Row 1 is A001653, row 2 is A007805, row 3 is A097315, row 4 is A078988, row 5 is A097727, row 6 is A097730, row 7 is A097733, row 8 is A097736, row 9 is A097739, row 10 is A097742, row 11 is A097767, row 12 is A097770, row 13 is A097773.
Column 1 is A053755.
A(n,n) gives A323012.
Cf. A188645, A188646 (f(x, y) as above with y=-1).

Formula

A(n,k) = 2 * A188645(n,k) - A(n,k-1).
A(n,k) = Sum_{j=0..k} binomial(2*k+1,2*j)*(n^2+1)^(k-j)*n^(2*j). - Seiichi Manyama, Jan 02 2019

Extensions

Edited and extended by Seiichi Manyama, Jan 02 2019

A054564 Prime number spiral (clockwise, Southeast spoke).

Original entry on oeis.org

2, 11, 59, 157, 313, 547, 829, 1201, 1621, 2153, 2749, 3463, 4217, 5059, 6011, 7001, 8167, 9343, 10631, 12071, 13513, 15107, 16759, 18481, 20399, 22343, 24371, 26591, 28807, 31231, 33617, 36229, 38891, 41647, 44501, 47533, 50549, 53759, 56957
Offset: 0

Views

Author

Enoch Haga and G. L. Honaker, Jr., Apr 10 2000

Keywords

Comments

8-spoke wheel overlays prime number spiral; hub is 2 in shell 0; 8 spokes radiate from this hub; this is Southeast, clockwise.

Examples

			Begin a prime number spiral at shell 0 (prime 2), proceed clockwise, Southeast.
From _Omar E. Pol_, Feb 19 2022: (Start)
The spiral with four terms in every spoke looks like this:
.
  227  101--103--107--109--113--127
   |     |                       |
  223   97   29---31---37---41  131
   |     |    |              |   |
  211   89   23    3----5   43  137
   |     |    |    |    |    |   |
  199   83   19    2    7   47  139
   |     |    |         |    |   |
  197   79   17---13---11   53  149
   |     |                   |   |
  193   73---71---67---61---59  151
   |                             |
  191--181--179--173--167--163--157
.
(End)
		

Crossrefs

Programs

  • Mathematica
    Table[ Prime[4n^2 + 1], {n, 0, 40} ]

Formula

a(n) = A000040(A053755(n)). - R. J. Mathar, Aug 29 2018

Extensions

Edited by Frank Ellermann, Feb 24 2002

A114254 Sum of all terms on the two principal diagonals of a 2n+1 X 2n+1 square spiral.

Original entry on oeis.org

1, 25, 101, 261, 537, 961, 1565, 2381, 3441, 4777, 6421, 8405, 10761, 13521, 16717, 20381, 24545, 29241, 34501, 40357, 46841, 53985, 61821, 70381, 79697, 89801, 100725, 112501, 125161, 138737, 153261, 168765, 185281, 202841, 221477, 241221
Offset: 0

Views

Author

William A. Tedeschi, Feb 06 2008, Mar 01 2008

Keywords

Examples

			For n = 1, the 3 X 3 spiral is
.
       7---8---9
       |
       6   1---2
       |       |
       5---4---3
.
so a(1) = 7 + 9 + 1 + 5 + 3 = 25.
.
For n = 2, the 5 X 5 spiral is
.
  21--22--23--24--25
   |
  20   7---8---9--10
   |   |           |
  19   6   1---2  11
   |   |       |   |
  18   5---4---3  12
   |               |
  17--16--15--14--13
.
so a(2) = 21 + 25 + 7 + 9 + 1 + 5 + 3 + 17 + 13 = 101.
		

Crossrefs

Cf. A016754, A054569, A053755, A054554 for diagonals from origin.
Cf. A325958 (first differences).

Programs

  • Mathematica
    Array[1 + 10 #^2 + (16 #^3 + 26 #)/3 &, 36, 0] (* Michael De Vlieger, Mar 01 2018 *)
  • PARI
    a(n) = 1 + 10*n^2 + (16*n^3 + 26*n)/3; \\ Joerg Arndt, Mar 01 2018

Formula

O.g.f.: 3/(-1+x) + 16/(-1+x)^2 + 44/(-1+x)^3 + 32/(-1+x)^4 = (1 + 21*x + 7*x^2 + 3*x^3)/(-1+x)^4. - R. J. Mathar, Feb 10 2008
a(n) = 1 + 10*n^2 + (16*n^3 + 26*n)/3. [Corrected by Arie Groeneveld, Aug 17 2008]

A321770 Consider the tree of triples P(n, k) with n > 0 and 0 < k <= 3^(n-1), such that P(1, 1) = [3; 4; 5] and each triple t on some row branches to the triples A*t, B*t, C*t on the next row (with A = [1, -2, 2; 2, -1, 2; 2, -2, 3], B = [1, 2, 2; 2, 1, 2; 2, 2, 3] and C = [-1, 2, 2; -2, 1, 2; -2, 2, 3]); T(n, k) is the third component of P(n, k).

Original entry on oeis.org

5, 13, 29, 17, 25, 73, 53, 89, 169, 85, 65, 97, 37, 41, 137, 109, 233, 425, 205, 193, 305, 125, 185, 505, 349, 505, 985, 509, 337, 481, 173, 149, 373, 241, 277, 565, 305, 157, 205, 65, 61, 221, 185, 445, 797, 377, 389, 629, 265, 493, 1325, 905, 1261, 2477
Offset: 1

Views

Author

Rémy Sigrist, Nov 18 2018

Keywords

Comments

The tree P runs uniquely through every primitive Pythagorean triple.
See A321768 for additional comments about P.
All terms are odd.

Examples

			The first rows are:
   5
   13, 29, 17
   25, 73, 53, 89, 169, 85, 65, 97, 37
		

Crossrefs

See A321768 and A321769 for the other components.

Programs

  • PARI
    M = [[1, -2, 2; 2, -1, 2; 2, -2, 3], [1, 2, 2; 2, 1, 2; 2, 2, 3], [-1, 2, 2; -2, 1, 2; -2, 2, 3]];
    T(n, k) = my (t=[3; 4; 5], d=digits(3^(n-1)+k-1, 3)); for (i=2, #d, t = M[d[i]+1] * t); return (t[3, 1])

Formula

a(n)^2 = A321768(n)^2 + A321769(n)^2.
Empirically:
- T(n, 1) = A001844(n),
- T(n, (3^(n-1) + 1)/2) = A001653(n+1),
- T(n, 3^(n-1)) = A053755(n).

A200975 Numbers on the diagonals in Ulam's spiral.

Original entry on oeis.org

1, 3, 5, 7, 9, 13, 17, 21, 25, 31, 37, 43, 49, 57, 65, 73, 81, 91, 101, 111, 121, 133, 145, 157, 169, 183, 197, 211, 225, 241, 257, 273, 289, 307, 325, 343, 361, 381, 401, 421, 441, 463, 485, 507, 529, 553, 577, 601, 625, 651, 677, 703, 729, 757, 785, 813, 841, 871, 901
Offset: 1

Views

Author

Ismael Bouya, Nov 25 2011

Keywords

Comments

All entries are odd.
From Bob Selcoe, Oct 22 2014: (Start)
The following hold:
1. a(n) = (2k + 1)^2 when n = 4k + 1, k >= 0
2. a(n) = 4*k^2 + 1 when n = 4k - 1, k > 0
3 a(n) = k^2 + k + 1 when n = 2k, k > 0.
Conjecture 1: there must be at least one prime in [a(n), a(n+1)] inclusive.
Conjecture 2: generally, when j is in [(2m-1)^2+1, (2m+1)^2] inclusive, there must be at least one prime in [j-2m-1, j] inclusive. If true, then Conjecture 1 is true; also suggests A248623, A248835 and Oppermann's conjecture (see A002620) likely are true. (End)

Examples

			The numbers between ** are in this sequence.
.
  *21*--22---23---24--*25*
    |
    |
   20   *7*---8---*9*--10
    |    |              |
    |    |              |
   19    6   *1*---2   11
    |    |         |    |
    |    |         |    |
   18   *5*---4---*3*  12
    |                   |
    |                   |
  *17*--16---15---14--*13*
		

Crossrefs

Cf. A016754, A054554, A053755, and A054569 interleaved, A002620,
Cf. A121658 (complementary)

Programs

  • Mathematica
    Sort@ Flatten@ Table[4n^2 + (2j - 4)n + 1, {j, 0, 3}, {n, 16}] (* Robert G. Wilson v, Jul 10 2014 *)
    a[n_Integer/;n>0]:=Quotient[2 n (n+2)+(-1)^n-4 Mod[n^2 (3 n+2),4,-1]+7,8] (* Todd Silvestri, Oct 25 2014 *)
  • PARI
    al(n)=local(r=vector(n),j);r[1]=1;for(k=2,n,r[k]=r[k-1]+(k+2)\4*2);r /* Franklin T. Adams-Watters, Nov 26 2011 */
  • Python
    # prints all numbers on the diagonals of a sq*sq spiral
    sq = 5
    d = 1
    while 2*d - 1 < sq:
        print(4*d*d - 4*d +1)
        print(4*d*d - 4*d +1 + 1* 2* d)
        print(4*d*d - 4*d +1 + 2* 2* d)
        print(4*d*d - 4*d +1 + 3* 2* d)
        d += 1
    print(sq*sq)
    

Formula

a(4n) = 4n^2 + 2n + 1; a(4n+1) = 4n^2 + 4n + 1; a(4n+2) = 4n^2 + 6n + 3; a(4n+3) = 4n^2 + 8n + 5. [corrected by James Mitchell, Dec 31 2017]
G.f.: -x*(1+x+x^5-x^4) / ( (1+x)*(x^2+1)*(x-1)^3 ). - R. J. Mathar, Nov 28 2011
a(n) = (2*n*(n+2)+(-1)^n-4*sin((Pi*n)/2)+7)/8 = (A249356(n)+7)/8. - Todd Silvestri, Oct 25 2014
a(n) = floor_(n*(n+2)/4) + floor_(n(mod 4)/3) + 1. - Bob Selcoe, Oct 27 2014

Extensions

Edited with more terms by Franklin T. Adams-Watters, Nov 26 2011

A212656 a(n) = 5*n^2 + 1.

Original entry on oeis.org

1, 6, 21, 46, 81, 126, 181, 246, 321, 406, 501, 606, 721, 846, 981, 1126, 1281, 1446, 1621, 1806, 2001, 2206, 2421, 2646, 2881, 3126, 3381, 3646, 3921, 4206, 4501, 4806, 5121, 5446, 5781, 6126, 6481, 6846, 7221, 7606, 8001, 8406, 8821, 9246, 9681, 10126, 10581, 11046, 11521, 12006, 12501
Offset: 0

Views

Author

Alonso del Arte, May 23 2012

Keywords

Comments

Z[sqrt(-5)] is not a unique factorization domain, and some of the numbers in this sequence have two different factorizations in that domain, e.g., 21 = 3 * 7 = (1 + 2*sqrt(-5))*(1 - 2*sqrt(-5)). And of course some primes in Z are composite in Z[sqrt(-5)], like 181 = (1 + 6*sqrt(-5))*(1 - 6*sqrt(-5)).
These are pentagonal-star numbers. - Mario Cortés, Oct 26 2020

References

  • Benjamin Fine & Gerhard Rosenberger, Number Theory: An Introduction via the Distribution of Primes, Boston: Birkhäuser, 2007, page 268.

Crossrefs

Cf. A137530 (primes of the form 1+5*n^2).

Programs

Formula

a(n) = 5*n^2 + 1 = (1 + n*sqrt(-5))*(1 - n*sqrt(-5)).
G.f.: (1+3*x+6*x^2)/(1-x)^3. - Bruno Berselli, May 23 2012
a(n) = 3*a(n-1) -3*a(n-2) +a(n-3). - Vincenzo Librandi, Jul 10 2012
From Amiram Eldar, Jul 15 2020: (Start)
Sum_{n>=0} 1/a(n) = (1 + (Pi/sqrt(5))*coth(Pi/sqrt(5)))/2.
Sum_{n>=0} (-1)^n/a(n) = (1 + (Pi/sqrt(5))*csch(Pi/sqrt(5)))/2. (End)
a(n) = A005891(n-1) + 5*A000217(n). - Mario Cortés, Oct 26 2020
From Amiram Eldar, Feb 05 2021: (Start)
Product_{n>=0} (1 + 1/a(n)) = sqrt(2)*csch(Pi/sqrt(5))*sinh(sqrt(2/5)*Pi).
Product_{n>=1} (1 - 1/a(n)) = (Pi/sqrt(5))*csch(Pi/sqrt(5)).(End)
E.g.f.: exp(x)*(1 + 5*x + 5*x^2). - Stefano Spezia, Feb 05 2021
Previous Showing 31-40 of 71 results. Next