A033954 -id:A033954 - cp's OEIS frontend

A014634 a(n) = (2n+1)(4*n+1).

1, 15, 45, 91, 153, 231, 325, 435, 561, 703, 861, 1035, 1225, 1431, 1653, 1891, 2145, 2415, 2701, 3003, 3321, 3655, 4005, 4371, 4753, 5151, 5565, 5995, 6441, 6903, 7381, 7875, 8385, 8911, 9453, 10011, 10585, 11175, 11781, 12403, 13041, 13695, 14365, 15051

Offset: 0

Mohammad K. Azarian, N. J. A. Sloane

Odd hexagonal numbers. Bisection of A000384. - Omar E. Pol, Apr 06 2008
Sequence found by reading the line from 1, in the direction 1, 15, ..., in the square spiral whose vertices are the triangular numbers A000217. - Omar E. Pol, Sep 03 2011
a(n) is also the sum of natural numbers which can be placed in a center box and expanded ones on 4 arms on N, S, E, W or NE, NW, SW, SE directions. See illustration in links. - Kival Ngaokrajang, Jul 08 2014

G. C. Greubel, Table of n, a(n) for n = 0..5000
Kival Ngaokrajang, Illustration of initial terms.
Leo Tavares, Illustration: Dual Square Stars
Index entries for linear recurrences with constant coefficients, signature (3,-3,1).

Cf. A000217, A000384, A005408, A016813, A033954, A157870, A194268.

Cf. A003154, A000290.

[(2*n+1)*(4*n+1) : n in [0..50]]; // Wesley Ivan Hurt, Jul 09 2014

A014634:=n->(2*n+1)*(4*n+1); seq(A014634(k), k=0..100); # Wesley Ivan Hurt, Nov 04 2013

lst={};Do[a=(2*n+1)*(4*n+1);AppendTo[lst,a],{n,0,5!}];lst (* Vladimir Joseph Stephan Orlovsky, Mar 10 2009 *)
Table[(2 n + 1) (4 n + 1), {n, 0, 50}] (* Wesley Ivan Hurt, Jul 09 2014 *)
LinearRecurrence[{3,-3,1},{1,15,45},50] (* Harvey P. Dale, Aug 30 2021 *)

a(n)=(2*n+1)*(4*n+1) \\ Charles R Greathouse IV, Sep 24 2015

a(n) = A157870(n)/2. - Vladimir Joseph Stephan Orlovsky, Mar 10 2009
a(n) = a(n-1) + 16*n-2 (with a(0)=1). - Vincenzo Librandi, Nov 20 2010
G.f.: (1+12*x+3*x^2)/(1-x)^3. - Colin Barker, Jan 08 2012
a(n) = A005408(n) * A016813(n). - Omar E. Pol, Nov 05 2013
a(n) = 2*A033954(n) + 1 = A194268(n) - n. - Wesley Ivan Hurt, Jul 14 2014
E.g.f.: (8*x^2 +14*x + 1)*exp(x). - G. C. Greubel, Jul 18 2017
From Amiram Eldar, Feb 28 2022: (Start)
Sum_{n>=0} 1/a(n) = Pi/4 + log(2)/2.
Sum_{n>=0} (-1)^n/a(n) = Pi*(sqrt(2)-1)/4 + log(sqrt(2)+1)/sqrt(2). (End)
a(n) = A003154(n+1) + 2*A000290(n). - Leo Tavares, Mar 26 2022

More terms from Wesley Ivan Hurt, Jul 09 2014

A179986 Second 9-gonal (or nonagonal) numbers: a(n) = n(7n+5)/2.

Original entry on oeis.org

0, 6, 19, 39, 66, 100, 141, 189, 244, 306, 375, 451, 534, 624, 721, 825, 936, 1054, 1179, 1311, 1450, 1596, 1749, 1909, 2076, 2250, 2431, 2619, 2814, 3016, 3225, 3441, 3664, 3894, 4131, 4375, 4626, 4884, 5149, 5421, 5700, 5986, 6279, 6579, 6886

Offset: 0

Bruno Berselli, Jan 13 2011

This sequence is a bisection of A118277 (even part).
Sequence found by reading the line from 0, in the direction 0, 19... and the line from 6, in the direction 6, 39,..., in the square spiral whose vertices are the generalized 9-gonal numbers A118277. - Omar E. Pol, Jul 24 2012
The early part of this sequence is a strikingly close approximation to the early part of A100752. - Peter Munn, Nov 14 2019

Vincenzo Librandi, Table of n, a(n) for n = 0..1000
Index entries for linear recurrences with constant coefficients, signature (3,-3,1).

Cf. second k-gonal numbers: A005449 (k=5), A014105 (k=6), A147875 (k=7), A045944 (k=8), this sequence (k=9), A033954 (k=10), A062728 (k=11), A135705 (k=12).

Cf. A001106, A022264, A022265, A024966, A055998, A100752, A174738, A186029, A218471.

[n*(7*n+5)/2: n in [0..50]]; // Bruno Berselli, Sep 23 2016

I:=[0, 6, 19]; [n le 3 select I[n] else 3*Self(n-1) -3*Self(n-2) +Self(n-3): n in [1..60]]; // Vincenzo Librandi, Oct 15 2012

f[n_] := n (7 n + 5)/2; f[Range[0, 60]] (* Vladimir Joseph Stephan Orlovsky, Feb 05 2011*)
LinearRecurrence[{3, -3, 1}, {0, 6, 19}, 60] (* or *) Array[(#(7# + 5))/2&, 60, 0] (* Harvey P. Dale, Aug 19 2011 *)
CoefficientList[Series[x (6 + x)/(1 - x)^3, {x, 0, 60}], x] (* Vincenzo Librandi, Oct 15 2012 *)

a(n)=n*(7*n+5)/2 \\ Charles R Greathouse IV, Sep 24 2015

G.f.: x*(6 + x)/(1 - x)^3.
a(n) = Sum_{i=0..(n-1)} A017053(i) for n>0.
a(-n) = A001106(n).
Sum_{i=0..n} (a(n)+i)^2 = ( Sum_{i=(n+1)..2*n} (a(n)+i)^2 ) + 21*A000217(n)^2 for n>0.
a(n) = a(n-1)+7*n-1 for n>0, with a(0)=0. - Vincenzo Librandi, Feb 05 2011
a(0)=0, a(1)=6, a(2)=19; for n>2, a(n) = 3*a(n-1)-3*a(n-2)+a(n-3). - Harvey P. Dale, Aug 19 2011
a(n) = A174738(7n+5). - Philippe Deléham, Mar 26 2013
a(n) = A001477(n) + 2*A000290(n) + 3*A000217(n). - J. M. Bergot, Apr 25 2014
a(n) = A055998(4*n) - A055998(3*n). - Bruno Berselli, Sep 23 2016
E.g.f.: (x/2)*(12 + 7*x)*exp(x). - G. C. Greubel, Aug 19 2017

A033988 Write 0,1,2,... in a clockwise spiral on a square lattice, writing each digit at a separate lattice point, starting with 0 at the origin and 1 at x=0, y=-1; sequence gives the numbers on the positive y-axis.

Original entry on oeis.org

0, 5, 1, 4, 3, 7, 8, 0, 4, 7, 7, 1, 2, 6, 2, 1, 8, 7, 4, 2, 6, 1, 8, 9, 2, 7, 6, 0, 6, 5, 1, 2, 0, 4, 1, 5, 8, 5, 1, 8, 8, 8, 2, 1, 2, 3, 2, 4, 9, 0, 2, 8, 9, 9, 3, 3, 2, 0, 3, 7, 9, 3, 4, 2, 8, 8, 4, 7, 1, 5, 5, 3, 7, 4, 5, 9, 7, 5, 6, 5, 9, 8, 7, 1, 5, 3, 7, 8, 4, 0, 8, 5, 6, 9, 9, 3, 1, 0, 9, 8, 1, 1, 6, 9, 9

Offset: 0

N. J. A. Sloane

In other words, write 0 1 2 3 4 5 6 7 8 9 1 0 1 1 1 2 1 3 1 4 1 5 1 6 ... in a clockwise spiral, starting with the 0 and taking the first step south; the sequence is then picked out from the resulting spiral by starting at the origin and moving north.

			  1---3---1---4---1
  |               |
  2   4---5---6   5
  |   |       |   |
  1   3   0   7   1
  |   |   |   |   |
  1   2---1   8   6
  |           |   |
  1---0---1---9   1
.
We begin with the 0 and wrap the numbers 1 2 3 4 ... around it.
Then the sequence is obtained by reading vertically upwards, starting from the initial 0.

Andrew Woods, Table of n, a(n) for n = 0..1000

Sequences based on the same spiral: A033953, A033989, A033990. Spiral without zero: A033952.
Other sequences from spirals: A001107, A002939, A007742, A033951, A033954, A033991, A002943, A033996.
Cf. A033307.

nmax = 105; A033307 = Flatten[IntegerDigits /@ Range[0, nmax^2 + 10 nmax]]; a[n_] := If[n==0, 0, A033307[[4n^2 + n + 1]]]; Table[a[n], {n, 0, nmax}] (* Jean-François Alcover, Apr 24 2017, after Andrew Woods *)

a(n) = A033307(4*n^2 + n - 1) for n > 0. - Andrew Woods, May 18 2012

More terms from Andrew Gacek (andrew(AT)dgi.net)

Edited by Jon E. Schoenfield, Aug 12 2018

A033989 Write 0,1,2,... in a clockwise spiral on a square lattice, writing each digit at a separate lattice point, starting with 0 at the origin and 1 at x=0, y=-1; sequence gives the numbers on the negative x-axis.

Original entry on oeis.org

0, 3, 1, 1, 3, 2, 7, 9, 1, 1, 6, 9, 4, 7, 9, 1, 2, 1, 2, 1, 6, 7, 4, 3, 6, 1, 2, 9, 5, 1, 1, 0, 9, 3, 1, 3, 6, 6, 1, 8, 6, 9, 2, 5, 0, 2, 2, 4, 6, 6, 2, 5, 6, 0, 3, 8, 9, 5, 3, 3, 6, 9, 4, 0, 5, 4, 4, 9, 8, 0, 5, 0, 4, 5, 5, 3, 3, 1, 6, 8, 5, 8, 6, 5, 1, 4, 7, 4, 9, 1, 8, 5, 1, 9, 9, 8, 6, 6, 9, 1, 1, 6, 4, 8, 1

Offset: 0

N. J. A. Sloane

			  2---3---2---4---2---5---2
  |                       |
  2   1---3---1---4---1   6
  |   |               |   |
  2   2   4---5---6   5   2
  |   |   |       |   |   |
  1   1   3   0   7   1   7
  |   |   |   |   |   |   |
  2   1   2---1   8   6   2
  |   |           |   |   |
  0   1---0---1---9   1   8
  |                   |   |
  2---9---1---8---1---7   2
We begin with the 0 and wrap the numbers 1 2 3 4 ... around it. Then the sequence is obtained by reading leftwards, starting from the initial 0. - _Andrew Woods_, May 20 2012

Reinhard Zumkeller, Table of n, a(n) for n = 0..1000

Sequences based on the same spiral: A033953, A033988, A033990. Spiral without zero: A033952.

Other sequences from spirals: A001107, A002939, A007742, A033951, A033954, A033991, A002943, A033996, A033988.

a033989 0 = 0
a033989 n = a033307 $ a185950 n  -- Reinhard Zumkeller, Aug 14 2013

nmax = 1000; A033307 = Flatten[IntegerDigits /@ Range[0, nmax^2+10*nmax]]; a[n_] := If[n==0, 0, A033307[[4n^2-n+1]]]; Table[a[n], {n, 0, nmax}] (* Jean-François Alcover, Apr 23 2017, after Andrew Woods *)

a(n) = A033307(4*n^2-n-1) for n > 0. - Andrew Woods, May 20 2012

More terms from Andrew J. Gacek (andrew(AT)dgi.net)

Edited by Charles R Greathouse IV, Nov 01 2009

A062728 Second 11-gonal (or hendecagonal) numbers: a(n) = n(9n+7)/2.

Original entry on oeis.org

0, 8, 25, 51, 86, 130, 183, 245, 316, 396, 485, 583, 690, 806, 931, 1065, 1208, 1360, 1521, 1691, 1870, 2058, 2255, 2461, 2676, 2900, 3133, 3375, 3626, 3886, 4155, 4433, 4720, 5016, 5321, 5635, 5958, 6290, 6631, 6981, 7340, 7708, 8085, 8471, 8866, 9270

Offset: 0

Floor van Lamoen, Jul 21 2001

Old name: Write 0,1,2,3,4,... in a triangular spiral, then a(n) is the sequence found by reading the line from 0 in the direction 0,8,...

Sequence found by reading the line from 0, in the direction 0, 25, ... and the line from 8, in the direction 8, 51, ..., in the square spiral whose vertices are the generalized 11-gonal numbers A195160. - Omar E. Pol, Jul 24 2012

			The spiral begins:
          15
          / \
        16  14
        /     \
      17   3  13
      /   / \   \
    18   4   2  12
    /   /     \   \
  19   5   0---1  11
  /   /             \
20   6---7---8---9--10

Ivan Panchenko, Table of n, a(n) for n = 0..1000
Index entries for linear recurrences with constant coefficients, signature (3,-3,1).

Cf. A051682.

Second n-gonal numbers: A005449, A014105, A147875, A045944, A179986, A033954, this sequence, A135705.

List([0..50], n-> n*(9*n+7)/2); # G. C. Greubel, May 24 2019

[n*(9*n+7)/2: n in [0..50]]; // G. C. Greubel, May 24 2019

Table[n*(9*n+7)/2, {n,0,50}] (* G. C. Greubel, May 24 2019 *)
LinearRecurrence[{3,-3,1},{0,8,25},50] (* Harvey P. Dale, Sep 06 2019 *)

a(n)=n*(9*n+7)/2 \\ Charles R Greathouse IV, Jun 17 2017

[n*(9*n+7)/2 for n in (0..50)] # G. C. Greubel, May 24 2019

a(n) = n*(9*n+7)/2.
a(n) = 9*n + a(n-1) - 1 (with a(0)=0). - Vincenzo Librandi, Aug 07 2010
From Bruno Berselli, Jan 13 2011: (Start)
G.f.: x*(8 + x)/(1 - x)^3.
a(n) = Sum_{i=0..n-1} A017257(i) for n > 0. (End)
a(n) = A218470(9n+7). - Philippe Deléham, Mar 27 2013
E.g.f.: x*(16 + 9*x)*exp(x)/2. - G. C. Greubel, May 24 2019

New name from Bruno Berselli (with the original formula), Jan 13 2011

A115258 Isolated primes in Ulam's lattice (1, 2, ... in spiral).

Original entry on oeis.org

83, 101, 127, 137, 163, 199, 233, 311, 373, 443, 463, 491, 541, 587, 613, 631, 641, 659, 673, 683, 691, 733, 757, 797, 859, 881, 911, 919, 953, 971, 991, 1013, 1051, 1061, 1103, 1109, 1117, 1193, 1201, 1213, 1249, 1307, 1319, 1409, 1433, 1459, 1483, 1487

Offset: 1

Giorgio Balzarotti and Paolo P. Lava, Feb 17 2006

nonn

Isolated prime numbers have no adjacent primes in a lattice generated by writing consecutive integers starting from 1 in a spiral distribution. If n0 is the number of isolated primes and p the number of primes less than N, the ratio n0/p approaches 1 as N increases. If n1, n2, n3, n4 denote the number of primes with respectively 1, 2, 3, 4 adjacent primes in the lattice, the ratios n1/n0, n2/n1, n3/n2, n4/n3 approach 0 as N increases. The limits stand for any 2D lattice of integers generated by a priori criteria (i.e., not knowing distributions of primes) as Ulam's lattice.

			83 is an isolated prime as the adjacent numbers in lattice 50, 51, 81, 82, 84, 123, 124, 125 are not primes.
From _Michael De Vlieger_, Dec 22 2015: (Start)
Spiral including n <= 17^2 showing only primes, with the isolated primes in parentheses (redrawn by _Jon E. Schoenfield_, Aug 06 2017):
  257 .  .  .  .  . 251 .  .  .  .  .  .  .  .  . 241
   . 197 .  .  . 193 . 191 .  .  .  .  .  .  .  .  .
   .  .  .  .  .  .  .  . 139 .(137).  .  .  .  . 239
   .(199).(101).  .  . 97  .  .  .  .  .  .  . 181 .
   .  .  .  .  .  .  .  . 61  . 59  .  .  . 131 .  .
   .  .  . 103 . 37  .  .  .  .  . 31  . 89  . 179 .
  263 . 149 . 67  . 17  .  .  . 13  .  .  .  .  .  .
   .  .  .  .  .  .  .  5  .  3  . 29  .  .  .  .  .
   .  . 151 .  .  . 19  .  .  2 11  . 53  .(127).(233)
   .  .  . 107 . 41  .  7  .  .  .  .  .  .  .  .  .
   .  .  .  . 71  .  .  . 23  .  .  .  .  .  .  .  .
   .  .  . 109 . 43  .  .  . 47  .  .  .(83) . 173 .
  269 .  .  . 73  .  .  .  .  . 79  .  .  .  .  . 229
   .  .  .  .  . 113 .  .  .  .  .  .  .  .  .  .  .
  271 . 157 .  .  .  .  .(163).  .  . 167 .  .  . 227
   . 211 .  .  .  .  .  .  .  .  .  .  . 223 .  .  .
   .  .  .  . 277 .  .  . 281 . 283 .  .  .  .  .  .
(End)

G. Balzarotti and P. P. Lava, Le sequenze di numeri interi, Hoepli, 2008, p. 22.

Michael De Vlieger, Table of n, a(n) for n = 1..10000
Eric Weisstein's World of Mathematics, Prime Spiral.

Cf. A001107, A002939, A007742, A033951-A033954, A033989, A033990, A033991, A002943, A033996, A033988, A014848.

Cf. A113688 (isolated semiprimes in the semiprime spiral), A156859.

# A is Ulam's lattice
if (isprime(A[x,y])and(not(isprime(A[x+1,y]) or isprime(A[x-1,y])or isprime(A[x,y+1])or isprime(A[x,y-1])or isprime(A[x-1,y-1])or isprime(A[x+1,y+1])or isprime(A[x+1,y-1])or isprime(A[x-1,y+1])))) then print (A[x,y]) ; fi;

spiral[n_] := Block[{o = 2 n - 1, t, w}, t = Table[0, {o}, {o}]; t = ReplacePart[t, {n, n} -> 1]; Do[w = Partition[Range[(2 (# - 1) - 1)^2 + 1, (2 # - 1)^2], 2 (# - 1)] &@ k; Do[t = ReplacePart[t, {(n + k) - (j + 1), n + (k - 1)} -> #[[1, j]]]; t = ReplacePart[t, {n - (k - 1), (n + k) - (j + 1)} -> #[[2, j]]]; t = ReplacePart[t, {(n - k) + (j + 1), n - (k - 1)} -> #[[3, j]]]; t = ReplacePart[t, {n + (k - 1), (n - k) + (j + 1)} -> #[[4, j]]], {j, 2 (k - 1)}] &@ w, {k, 2, n}]; t]; f[w_] := Block[{d = Dimensions@ w, t, g}, t = Reap[Do[Sow@ Take[#[[k]], {2, First@ d - 1}], {k, 2, Last@ d - 1}]][[-1, 1]] &@ w; g[n_] := If[n != 0, Total@ Join[Take[w[[Last@ # - 1]], {First@ # - 1, First@ # + 1}], {First@ #, Last@ #} &@ Take[w[[Last@ #]], {First@ # - 1, First@ # + 1}], Take[w[[Last@ # + 1]], {First@ # - 1, First@# + 1}]] &@(Reverse@ First@ Position[t, n] + {1, 1}) == 0, False]; Select[Union@ Flatten@ t, g@ # &]]; f[spiral@ 21 /. n_ /; CompositeQ@ n -> 0] (* Michael De Vlieger, Dec 22 2015, Version 10 *)

A118729 Rectangular array where row r contains the 8 numbers 4r^2 - 3r, 4r^2 - 2r, ..., 4r^2 + 4r.

Original entry on oeis.org

0, 0, 0, 0, 0, 0, 0, 0, 1, 2, 3, 4, 5, 6, 7, 8, 10, 12, 14, 16, 18, 20, 22, 24, 27, 30, 33, 36, 39, 42, 45, 48, 52, 56, 60, 64, 68, 72, 76, 80, 85, 90, 95, 100, 105, 110, 115, 120, 126, 132, 138, 144, 150, 156, 162, 168

Offset: 0

Stuart M. Ellerstein (ellerstein(AT)aol.com), May 21 2006

The numbers in row r span the interval ]8*A000217(r-1), 8*A000217(r)].
The first difference between the entries in row r is r.
Partial sums of floor(n/8). - Philippe Deléham, Mar 26 2013
Apart from the initial zeros, the same as A008726. - Philippe Deléham, Mar 28 2013
a(n+7) is the number of key presses required to type a word of n letters, all different, on a keypad with 8 keys where 1 press of a key is some letter, 2 presses is some other letter, etc., and under an optimal mapping of letters to keys and presses (answering LeetCode problem 3014). - Christopher J. Thomas, Feb 16 2024

			The array starts, with row r=0, as
  r=0:   0  0  0  0  0  0  0  0;
  r=1:   1  2  3  4  5  6  7  8;
  r=2:  10 12 14 16 18 20 22 24;
  r=3:  27 30 33 36 39 42 45 48;

G. C. Greubel, Table of n, a(n) for n = 0..1000
LeetCode, 3014. Minimum Number of Pushes to Type Word I.
Index entries for linear recurrences with constant coefficients, signature (2,-1,0,0,0,0,0,1,-2,1).

Cf. similar sequences: A000217, A002620, A130518, A130519, A130520, A174709, A174738, A218470, A131242.

Flatten[Table[4r^2+r(Range[-3,4]),{r,0,6}]] (* or *) LinearRecurrence[ {2,-1,0,0,0,0,0,1,-2,1},{0,0,0,0,0,0,0,0,1,2},60] (* Harvey P. Dale, Nov 26 2015 *)

From Philippe Deléham, Mar 26 2013: (Start)
a(8k)   = A001107(k).
a(8k+1) = A002939(k).
a(8k+2) = A033991(k).
a(8k+3) = A016742(k).
a(8k+4) = A007742(k).
a(8k+5) = A002943(k).
a(8k+6) = A033954(k).
a(8k+7) = A033996(k). (End)
G.f.: x^8/((1-x)^2*(1-x^8)). - Philippe Deléham, Mar 28 2013
a(n) = floor(n/8)*(n-3-4*floor(n/8)). - Ridouane Oudra, Jun 04 2019
a(n+7) = (1/2)*(n+(n mod 8))*(floor(n/8)+1). - Christopher J. Thomas, Feb 13 2024

Redefined as a rectangular tabf array and description simplified by R. J. Mathar, Oct 20 2010

A135705 a(n) = 10binomial(n,2) + 9n.

Original entry on oeis.org

0, 9, 28, 57, 96, 145, 204, 273, 352, 441, 540, 649, 768, 897, 1036, 1185, 1344, 1513, 1692, 1881, 2080, 2289, 2508, 2737, 2976, 3225, 3484, 3753, 4032, 4321, 4620, 4929, 5248, 5577, 5916, 6265, 6624, 6993, 7372, 7761, 8160, 8569, 8988, 9417, 9856, 10305, 10764

Offset: 0

N. J. A. Sloane, Mar 04 2008

Also, second 12-gonal (or dodecagonal) numbers. Identity for the numbers b(n)=n*(h*n+h-2)/2 (see Crossrefs): Sum_{i=0..n} (b(n)+i)^2 = (Sum_{i=n+1..2*n} (b(n)+i)^2) + h*(h-4)*A000217(n)^2 for n>0. - Bruno Berselli, Jan 15 2011
Sequence found by reading the line from 0, in the direction 0, 28, ..., and the line from 9, in the direction 9, 57, ..., in the square spiral whose vertices are the generalized 12-gonal numbers A195162. - Omar E. Pol, Jul 24 2012
Bisection of A195162. - Omar E. Pol, Aug 04 2012

Ivan Panchenko, Table of n, a(n) for n = 0..1000
L. Hogben, Choice and Chance by Cardpack and Chessboard, Vol. 1, Max Parrish and Co, London, 1950, p. 36.
Leo Tavares, Illustration: Diamond Clipped Stars
Index entries for linear recurrences with constant coefficients, signature (3,-3,1).

Second n-gonal numbers: A005449, A014105, A147875, A045944, A179986, A033954, A062728, this sequence.
Cf. A003154, A000290.
Cf. A195162.

List([0..50], n-> n*(5*n+4)); # G. C. Greubel, Jul 04 2019

[n*(5*n+4): n in [0..50]]; // G. C. Greubel, Jul 04 2019

LinearRecurrence[{3,-3,1}, {0,9,28}, 50] (* or *) Table[5*n^2 + 4*n, {n,0,50}] (* G. C. Greubel, Oct 29 2016 *)
Table[10 Binomial[n,2]+9n,{n,0,60}] (* Harvey P. Dale, Jun 14 2023 *)

a(n) = 10*binomial(n,2) + 9*n \\ Charles R Greathouse IV, Jun 11 2015

[n*(5*n+4) for n in (0..50)] # G. C. Greubel, Jul 04 2019

From R. J. Mathar, Mar 06 2008: (Start)
O.g.f.: x*(9+x)/(1-x)^3.
a(n) = n*(5*n+4). (End)
a(n) = a(n-1) + 10*n - 1 (with a(0)=0). - Vincenzo Librandi, Nov 24 2009
a(n) = Sum_{i=0..n-1} A017377(i) for n>0. - Bruno Berselli, Jan 15 2011
a(n) = A131242(10n+8). - Philippe Deléham, Mar 27 2013
Sum_{n>=1} 1/a(n) = 5/16 + sqrt(1 + 2/sqrt(5))*Pi/8 - 5*log(5)/16 - sqrt(5)*log((1 + sqrt(5))/2)/8 = 0.2155517745488486003038... . - Vaclav Kotesovec, Apr 27 2016
From G. C. Greubel, Oct 29 2016: (Start)
a(n) = 3*a(n-1) - 3*a(n-2) + a(n-3).
E.g.f.: x*(9 + 5*x)*exp(x). (End)
a(n) = A003154(n+1) - A000290(n+1). - Leo Tavares, Mar 29 2022

A033587 a(n) = 2n(4*n + 3).

Original entry on oeis.org

0, 14, 44, 90, 152, 230, 324, 434, 560, 702, 860, 1034, 1224, 1430, 1652, 1890, 2144, 2414, 2700, 3002, 3320, 3654, 4004, 4370, 4752, 5150, 5564, 5994, 6440, 6902, 7380, 7874, 8384, 8910, 9452, 10010, 10584, 11174, 11780, 12402, 13040, 13694, 14364, 15050

Offset: 0

N. J. A. Sloane

The inverse binomial transform is [0, 14, 16, 0, 0, 0, ...]. - R. J. Mathar, May 06 2008

Sequence found by reading the line from 0, in the direction 0, 14, ..., in the square spiral whose vertices are the triangular numbers A000217. Opposite numbers to the even hexagonal numbers A014635 in the same spiral. - Omar E. Pol, Sep 03 2011

G. C. Greubel, Table of n, a(n) for n = 0..5000
Index entries for linear recurrences with constant coefficients, signature (3,-3,1).

Table[2*n(4*n + 3), {n, 0, 100}] (* Vladimir Joseph Stephan Orlovsky, Jun 26 2011 *)
LinearRecurrence[{3,-3,1},{0,14,44},80] (* Harvey P. Dale, Jun 05 2019 *)

a(n)=2*n*(4*n+3) \\ Charles R Greathouse IV, Jun 17 2017

a(n) = 2*A033954(n).
O.g.f.: 2*x*(7+x)/(1-x)^3. - R. J. Mathar, May 06 2008
a(n) = 16*n + a(n-1) - 2 with a(0)=0. - Vincenzo Librandi, Aug 05 2010
E.g.f.: (8*x^2 + 14*x)*exp(x). - G. C. Greubel, Jul 18 2017
From Vaclav Kotesovec, Aug 18 2018: (Start)
Sum_{n>=1} 1/a(n) = 2/9 + Pi/12 - log(2)/2.
Sum_{n>=1} (-1)^n/a(n) = 2/9 - Pi/(6*sqrt(2)) - log(2)/6 + log(1+sqrt(2))/(3*sqrt(2)). (End)

A033990 Write 0,1,2,... in a clockwise spiral on a square lattice, writing each digit at a separate lattice point, starting with 0 at the origin and 1 at x=0, y=-1; sequence gives the numbers on the negative y-axis.

Original entry on oeis.org

0, 1, 1, 8, 3, 7, 6, 2, 1, 5, 1, 1, 6, 2, 2, 1, 3, 4, 0, 4, 5, 3, 6, 7, 0, 8, 9, 1, 4, 6, 1, 2, 7, 1, 1, 4, 4, 8, 1, 7, 4, 7, 2, 0, 8, 8, 2, 4, 4, 1, 2, 8, 4, 6, 3, 2, 7, 3, 3, 7, 3, 2, 4, 1, 2, 3, 4, 7, 5, 6, 5, 2, 0, 1, 5, 8, 9, 8, 6, 4, 1, 7, 6, 1, 7, 8, 7, 7, 5, 1, 8, 4, 7, 6, 9, 2, 2, 3, 9, 0, 1, 0, 1, 6, 8

Offset: 0

N. J. A. Sloane

Consider array of digits 0_(1)23456789(1)0111213141516171(8)1920212223...; in this array add to n-th pointer 8*n+1 to get next pointer. E.g., n=1 so n+(8*1+1)=10 -> n=10 so n+(8*2+1)=27 -> n=27 so ... etc. - comment from Patrick De Geest.

			The spiral begins
                 2---3---2---4---2---5---2
                 |                       |
                 2   1---3---1---4---1   6
                 |   |               |   |
                 2   2   4---5---6   5   2
                 |   |   |       |   |   |
                 1   1   3   0   7   1   7
                 |   |   |   |   |   |   |
                 2   1   2---1   8   6   2
                 |   |           |   |   |
                 0   1---0---1---9   1   8
                 |                   |   |
                 2---9---1---8---1---7   2
                                         |
                             3---0---3---9
.
We begin with the 0 and wrap the numbers 1 2 3 4 ... around it. Then the sequence is obtained by reading downwards, starting from the initial 0. - _Andrew Woods_, May 20 2012

Vincenzo Librandi, Table of n, a(n) for n = 0..1000

Sequences based on the same spiral: A033953, A033988, A033989. Spiral without zero: A033952.

Other sequences from spirals: A001107, A002939, A007742, A033951, A033954, A033991, A002943, A033996, A033988.

nmax = 105; A033307 = Flatten[IntegerDigits /@ Range[0, nmax^2 + 10 nmax]]; a[n_] := If[n==0, 0, A033307[[4n^2 - 3n + 1]]]; Table[a[n], {n, 0, nmax}] (* Jean-François Alcover, Apr 24 2017, after Andrew Woods *)

a(n) = A033307(4*n^2-3*n-1) for n > 0. - Andrew Woods, May 20 2012

More terms from Patrick De Geest, Oct 15 1999

Edited by Charles R Greathouse IV, Nov 01 2009

cp's OEIS Frontend

A014634 a(n) = (2*n+1)*(4*n+1).

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Magma

Maple

Mathematica

PARI

Formula

Extensions

A179986 Second 9-gonal (or nonagonal) numbers: a(n) = n*(7*n+5)/2.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Magma

Magma

Mathematica

PARI

Formula

A033988 Write 0,1,2,... in a clockwise spiral on a square lattice, writing each digit at a separate lattice point, starting with 0 at the origin and 1 at x=0, y=-1; sequence gives the numbers on the positive y-axis.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Formula

Extensions

A033989 Write 0,1,2,... in a clockwise spiral on a square lattice, writing each digit at a separate lattice point, starting with 0 at the origin and 1 at x=0, y=-1; sequence gives the numbers on the negative x-axis.

Views

Author

Keywords

Examples

Links

Crossrefs

Programs

Haskell

Mathematica

Formula

Extensions

A062728 Second 11-gonal (or hendecagonal) numbers: a(n) = n*(9*n+7)/2.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

GAP

Magma

Mathematica

PARI

Sage

Formula

Extensions

A115258 Isolated primes in Ulam's lattice (1, 2, ... in spiral).

Views

Author

Keywords

Comments

Examples

References

Links

Crossrefs

Programs

Maple

Mathematica

A014634 a(n) = (2n+1)(4*n+1).

A179986 Second 9-gonal (or nonagonal) numbers: a(n) = n(7n+5)/2.

A062728 Second 11-gonal (or hendecagonal) numbers: a(n) = n(9n+7)/2.

A118729 Rectangular array where row r contains the 8 numbers 4r^2 - 3r, 4r^2 - 2r, ..., 4r^2 + 4r.

A135705 a(n) = 10binomial(n,2) + 9n.

A033587 a(n) = 2n(4*n + 3).