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 21-30 of 45 results. Next

A198310 Moore lower bound on the order of a (10,g)-cage.

Original entry on oeis.org

11, 20, 101, 182, 911, 1640, 8201, 14762, 73811, 132860, 664301, 1195742, 5978711, 10761680, 53808401, 96855122, 484275611, 871696100, 4358480501, 7845264902, 39226324511, 70607384120, 353036920601, 635466457082, 3177332285411
Offset: 3

Views

Author

Jason Kimberley, Oct 30 2011

Keywords

Crossrefs

Moore lower bound on the order of a (k,g) cage: A198300 (square); rows: A000027 (k=2), A027383 (k=3), A062318 (k=4), A061547 (k=5), A198306 (k=6), A198307 (k=7), A198308 (k=8), A198309 (k=9), this sequence (k=10), A094626 (k=11); columns: A020725 (g=3), A005843 (g=4), A002522 (g=5), A051890 (g=6), A188377 (g=7).

Programs

Formula

a(2i) = 2*Sum_{j=0..i-1} 9^j = string "2"^i read in base 9.
a(2i+1) = 9^i + 2*Sum_{j=0..i-1} 9^j = string "1"*"2"^i read in base 9.
From Colin Barker, Feb 01 2013: (Start)
a(n) = (-3-(-3)^n+4*3^n)/12.
a(n) = a(n-1)+9*a(n-2)-9*a(n-3).
G.f.: -x^3*(18*x^2-9*x-11) / ((x-1)*(3*x-1)*(3*x+1)). (End)
E.g.f.: (3*(cosh(3*x) - cosh(x) - sinh(x)) + 5*sinh(3*x))/12 - x - x^2. - Stefano Spezia, Apr 09 2022

A191595 Order of smallest n-regular graph of girth 5.

Original entry on oeis.org

5, 10, 19, 30, 40, 50
Offset: 2

Views

Author

N. J. A. Sloane, Jun 07 2011

Keywords

Comments

Current upper bounds for a(8)..a(20) are 80, 96, 124, 154, 203, 230, 288, 312, 336, 448, 480, 512, 576. - Corrected from "Lower" to "Upper" and updated, from Table 4 of the Dynamic cage survey, by Jason Kimberley, Dec 29 2012
Current lower bounds for a(8)..a(20) are 67, 86, 103, 124, 147, 174, 199, 230, 259, 294, 327, 364, 403. - from Table 4 of the Dynamic cage survey via Jason Kimberley, Dec 31 2012

Crossrefs

Orders of cages: A054760 (n,k), A000066 (3,n), A037233 (4,n), A218553 (5,n), A218554 (6,n), A218555 (7,n), this sequence (n,5).
Moore lower bound on the orders of (k,g) cages: A198300 (square); rows: A000027 (k=2), A027383 (k=3), A062318 (k=4), A061547 (k=5), A198306(k=6), A198307 (k=7), A198308 (k=8), A198309 (k=9), A198310 (k=10),A094626 (k=11); columns: A020725 (g=3), A005843 (g=4), A002522 (g=5), A051890 (g=6), A188377 (g=7). - Jason Kimberley, Nov 02 2011

Formula

a(n) >= A002522(n) with equality if and only if n = 2, 3, 7 or possibly 57. - Jason Kimberley, Nov 02 2011

Extensions

a(2) = 5 prepended by Jason Kimberley, Jan 02 2013

A268581 a(n) = 2*n^2 + 8*n + 5.

Original entry on oeis.org

5, 15, 29, 47, 69, 95, 125, 159, 197, 239, 285, 335, 389, 447, 509, 575, 645, 719, 797, 879, 965, 1055, 1149, 1247, 1349, 1455, 1565, 1679, 1797, 1919, 2045, 2175, 2309, 2447, 2589, 2735, 2885, 3039, 3197, 3359, 3525, 3695, 3869, 4047, 4229, 4415, 4605
Offset: 0

Views

Author

Juri-Stepan Gerasimov, Apr 10 2016

Keywords

Comments

Also, numbers m such that 2*m + 6 is a square.
All the terms end with a digit in {5, 7, 9}, or equivalently, are congruent to {5, 7, 9} mod 10. - Stefano Spezia, Aug 05 2021

Crossrefs

Cf. numbers n such that 2*n + k is a perfect square: A093328 (k=-6), A097080 (k=-5), no sequence (k=-4), A051890 (k=-3), A058331 (k=-2), A001844 (k=-1), A001105 (k=0), A046092 (k=1), A056222 (k=2), A142463 (k=3), A054000 (k=4), A090288 (k=5), this sequence (k=6), A059993 (k=7), A147973 (k=8), A139570 (k=9), no sequence (k=10), A222182 (k=11), A152811 (k=12), A181570 (k=13).

Programs

  • Magma
    [2*n^2+8*n+5: n in [0..60]];
    
  • Magma
    [n: n in [0..6000] | IsSquare(2*n+6)];
    
  • Mathematica
    Table[2 n^2 + 8 n + 5, {n, 0, 50}] (* Vincenzo Librandi, Apr 13 2016 *)
    LinearRecurrence[{3,-3,1},{5,15,29},50] (* Harvey P. Dale, Jan 18 2017 *)
  • PARI
    lista(nn) = for(n=0, nn, print1(2*n^2+8*n+5, ", ")); \\ Altug Alkan, Apr 10 2016
    
  • Sage
    [2*n^2 + 8*n + 5 for n in [0..46]] # Stefano Spezia, Aug 04 2021

Formula

From Vincenzo Librandi, Apr 13 2016: (Start)
G.f.: (5-x^2)/(1-x)^3.
a(n) = 2*(n+2)^2 - 3.
a(n) = 3*a(n-1) - 3*a(n-2) + a(n-3). (End)
E.g.f.: exp(x)*(5 + 10*x + 2*x^2). - Stefano Spezia, Aug 03 2021

Extensions

Changed offset from 1 to 0, adapted formulas and programs by Bruno Berselli, Apr 13 2016

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

Original entry on oeis.org

3, 13, 27, 45, 67, 93, 123, 157, 195, 237, 283, 333, 387, 445, 507, 573, 643, 717, 795, 877, 963, 1053, 1147, 1245, 1347, 1453, 1563, 1677, 1795, 1917, 2043, 2173, 2307, 2445, 2587, 2733, 2883, 3037, 3195, 3357, 3523, 3693, 3867, 4045, 4227, 4413, 4603, 4797, 4995, 5197, 5403, 5613, 5827
Offset: 1

Views

Author

Juri-Stepan Gerasimov, Apr 11 2016

Keywords

Comments

Numbers n such that 2*n + 10 is a perfect square.

Crossrefs

Numbers h such that 2*h + k is a perfect square: A294774 (k=-9), A255843 (k=-8), A271649 (k=-7), A093328 (k=-6), A097080 (k=-5), A271624 (k=-4), A051890 (k=-3), A058331 (k=-2), A001844 (k=-1), A001105 (k=0), A046092 (k=1), A056222 (k=2), A142463 (k=3), A054000 (k=4), A090288 (k=5), A268581 (k=6), A059993 (k=7), (-1)*A147973 (k=8), A139570 (k=9), this sequence (k=10), A222182 (k=11), A152811 (k=12), A181510 (k=13), A161532 (k=14), no sequence (k=15).

Programs

  • Magma
    [ 2*n^2 + 4*n - 3: n in [1..60]];
    
  • Magma
    [ n: n in [1..6000] | IsSquare(2*n+10)];
    
  • Mathematica
    Table[2 n^2 + 4 n - 3, {n, 53}] (* Michael De Vlieger, Apr 11 2016 *)
    LinearRecurrence[{3,-3,1},{3,13,27},60] (* Harvey P. Dale, Jun 08 2023 *)
    2*Range[2,60]^2 -5 (* G. C. Greubel, Jan 21 2025 *)
  • PARI
    x='x+O('x^99); Vec(x*(3+4*x-3*x^2)/(1-x)^3) \\ Altug Alkan, Apr 11 2016
    
  • Python
    def A271625(n): return 2*pow(n+1,2) - 5
    print([A271625(n) for n in range(1,61)]) # G. C. Greubel, Jan 21 2025

Formula

G.f.: x*(3 + 4*x - 3*x^2)/(1 - x)^3. - Ilya Gutkovskiy, Apr 11 2016
Sum_{n>=1} 1/a(n) = 13/30 - Pi*cot(sqrt(5/2)*Pi)/(2*sqrt(10)) = 0.5627678459924... . - Vaclav Kotesovec, Apr 11 2016
From Elmo R. Oliveira, Nov 17 2024: (Start)
E.g.f.: exp(x)*(2*x^2 + 6*x - 3) + 3.
a(n) = 3*a(n-1) - 3*a(n-2) + a(n-3) for n > 3. (End)
a(n) = 2*A000290(n+1) - 5. - G. C. Greubel, Jan 21 2025

Extensions

Name simplified by G. C. Greubel, Jan 21 2025

A271624 a(n) = 2*n^2 - 4*n + 4.

Original entry on oeis.org

2, 4, 10, 20, 34, 52, 74, 100, 130, 164, 202, 244, 290, 340, 394, 452, 514, 580, 650, 724, 802, 884, 970, 1060, 1154, 1252, 1354, 1460, 1570, 1684, 1802, 1924, 2050, 2180, 2314, 2452, 2594, 2740, 2890, 3044, 3202, 3364, 3530, 3700, 3874, 4052, 4234, 4420, 4610, 4804, 5002, 5204, 5410, 5620
Offset: 1

Views

Author

Juri-Stepan Gerasimov, Apr 11 2016

Keywords

Comments

Numbers n such that 2*n - 4 is a perfect square.
For n > 2, the number of square a(n)-gonal numbers is finite. - Muniru A Asiru, Oct 16 2016

Examples

			a(1) = 2*1^2 - 4*1 + 4 = 2.
		

Crossrefs

Cf. A002522, numbers n such that 2*n + k is a perfect square: no sequence (k = -9), A255843 (k = -8), A271649 (k = -7), A093328 (k = -6), A097080 (k = -5), this sequence (k = -4), A051890 (k = -3), A058331 (k = -2), A001844 (k = -1), A001105 (k = 0), A046092 (k = 1), A056222 (k = 2), A142463 (k = 3), A054000 (k = 4), A090288 (k = 5), A268581 (k = 6), A059993 (k = 7), (-1)*A147973 (k = 8), A139570 (k = 9), A271625 (k = 10), A222182 (k = 11), A152811 (k = 12), A181510 (k = 13), A161532 (k = 14), no sequence (k = 15).

Programs

  • Magma
    [ 2*n^2 - 4*n + 4: n in [1..60]];
    
  • Magma
    [ n: n in [1..6000] | IsSquare(2*n-4)];
    
  • Mathematica
    Table[2 n^2 - 4 n + 4, {n, 54}] (* Michael De Vlieger, Apr 11 2016 *)
    LinearRecurrence[{3,-3,1},{2,4,10},60] (* Harvey P. Dale, Jul 18 2023 *)
  • PARI
    x='x+O('x^99); Vec(2*x*(1-x+2*x^2)/(1-x)^3) \\ Altug Alkan, Apr 11 2016
    
  • PARI
    a(n)=2*n^2-4*n+4 \\ Charles R Greathouse IV, Apr 11 2016

Formula

a(n) = 2*A002522(n-1).
G.f.: 2*x*(1 - x + 2*x^2)/(1 - x)^3. - Ilya Gutkovskiy, Apr 11 2016
Sum_{n>=1} 1/a(n) = (1 + Pi*coth(Pi))/4 = 1.038337023734290587067... . - Vaclav Kotesovec, Apr 11 2016
a(n) = A005893(n-1), n > 1. - R. J. Mathar, Apr 12 2016
a(n) = 2 + 2*(n-1)^2. - Tyler Skywalker, Jul 21 2016
From Elmo R. Oliveira, Nov 17 2024: (Start)
E.g.f.: 2*(exp(x)*(x^2 - x + 2) - 2).
a(n) = 2*A160457(n).
a(n) = 3*a(n-1) - 3*a(n-2) + a(n-3) for n > 3. (End)

A271649 a(n) = 2*(n^2 - n + 2).

Original entry on oeis.org

4, 8, 16, 28, 44, 64, 88, 116, 148, 184, 224, 268, 316, 368, 424, 484, 548, 616, 688, 764, 844, 928, 1016, 1108, 1204, 1304, 1408, 1516, 1628, 1744, 1864, 1988, 2116, 2248, 2384, 2524, 2668, 2816, 2968, 3124, 3284, 3448, 3616, 3788, 3964, 4144, 4328, 4516, 4708, 4904, 5104, 5308, 5516
Offset: 1

Views

Author

Juri-Stepan Gerasimov, Apr 11 2016

Keywords

Comments

Numbers n such that 2*n - 7 is a perfect square.
Galois numbers for three-dimensional vector space, defined as the total number of subspaces in a three-dimensional vector space over GF(n-1), when n-1 is a power of a prime. - Artur Jasinski, Aug 31 2016, corrected by Robert Israel, Sep 23 2016

Examples

			a(1) = 2*(1^2 - 1 + 2) = 4.
		

Crossrefs

Numbers h such that 2*h + k is a perfect square: no sequence (k=-9), A255843 (k=-8), this sequence (k=-7), A093328 (k=-6), A097080 (k=-5), A271624 (k=-4), A051890 (k=-3), A058331 (k=-2), A001844 (k=-1), A001105 (k=0), A046092 (k=1), A056222 (k=2), A142463 (k=3), A054000 (k=4), A090288 (k=5), A268581 (k=6), A059993 (k=7), (-1)*A147973 (k=8), A139570 (k=9), A271625 (k=10), A222182 (k=11), A152811 (k=12), A181510 (k=13), A161532 (k=14), no sequence (k=15).

Programs

  • Magma
    [ 2*n^2 - 2*n + 4: n in [1..60]];
    
  • Magma
    [ n: n in [1..6000] | IsSquare(2*n-7)];
    
  • Maple
    A271649:=n->2*(n^2-n+2): seq(A271649(n), n=1..60); # Wesley Ivan Hurt, Aug 31 2016
  • Mathematica
    Table[2 (n^2 - n + 2), {n, 53}] (* or *)
    Select[Range@ 5516, IntegerQ@ Sqrt[2 # - 7] &] (* or *)
    Table[SeriesCoefficient[(-4 (1 - x + x^2))/(-1 + x)^3, {x, 0, n}], {n, 0, 52}] (* Michael De Vlieger, Apr 11 2016 *)
    LinearRecurrence[{3,-3,1},{4,8,16},60] (* Harvey P. Dale, Jun 14 2022 *)
  • PARI
    a(n)=2*(n^2-n+2) \\ Charles R Greathouse IV, Jun 17 2017

Formula

a(n) = 4*A000124(n).
a(n) = 2*A014206(n).
a(n) = A137882(n), n > 1. - R. J. Mathar, Apr 12 2016
Sum_{n>=1} 1/a(n) = tanh(sqrt(7)*Pi/2)*Pi/(2*sqrt(7)). - Amiram Eldar, Jul 30 2024
From Elmo R. Oliveira, Nov 18 2024: (Start)
G.f.: 4*x*(1 - x + x^2)/(1 - x)^3.
E.g.f.: 2*(exp(x)*(x^2 + 2) - 2).
a(n) = 3*a(n-1) - 3*a(n-2) + a(n-3) for n > 3. (End)

A211394 T(n,k) = (k+n)*(k+n-1)/2-(k+n-1)*(-1)^(k+n)-k+2; n , k > 0, read by antidiagonals.

Original entry on oeis.org

1, 5, 6, 2, 3, 4, 12, 13, 14, 15, 7, 8, 9, 10, 11, 23, 24, 25, 26, 27, 28, 16, 17, 18, 19, 20, 21, 22, 38, 39, 40, 41, 42, 43, 44, 45, 29, 30, 31, 32, 33, 34, 35, 36, 37, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 80
Offset: 1

Views

Author

Boris Putievskiy, Feb 08 2013

Keywords

Comments

Permutation of the natural numbers.
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.
Enumeration table T(n,k). The order of the list:
T(1,1)=1;
T(1,3), T(2,2), T(3,1);
T(1,2), T(2,1);
. . .
T(1,n), T(2,n-1), T(3,n-2), ... T(n,1);
T(1,n-1), T(2,n-3), T(3,n-4),...T(n-1,1);
. . .
First row matches with the elements antidiagonal {T(1,n), ... T(n,1)},
second row matches with the elements antidiagonal {T(1,n-1), ... T(n-1,1)}.
Table contains:
row 1 is alternation of elements A130883 and A096376,
row 2 accommodates elements A033816 in even places,
row 3 accommodates elements A100037 in odd places,
row 5 accommodates elements A100038 in odd places;
column 1 is alternation of elements A084849 and A000384,
column 2 is alternation of elements A014106 and A014105,
column 3 is alternation of elements A014107 and A091823,
column 4 is alternation of elements A071355 and |A168244|,
column 5 accommodates elements A033537 in even places,
column 7 is alternation of elements A100040 and A130861,
column 9 accommodates elements A100041 in even places;
the main diagonal is A058331,
diagonal 1, located above the main diagonal is A001844,
diagonal 2, located above the main diagonal is A001105,
diagonal 3, located above the main diagonal is A046092,
diagonal 4, located above the main diagonal is A056220,
diagonal 5, located above the main diagonal is A142463,
diagonal 6, located above the main diagonal is A054000,
diagonal 7, located above the main diagonal is A090288,
diagonal 9, located above the main diagonal is A059993,
diagonal 10, located above the main diagonal is |A147973|,
diagonal 11, located above the main diagonal is A139570;
diagonal 1, located under the main diagonal is A051890,
diagonal 2, located under the main diagonal is A005893,
diagonal 3, located under the main diagonal is A097080,
diagonal 4, located under the main diagonal is A093328,
diagonal 5, located under the main diagonal is A137882.

Examples

			The start of the sequence as table:
  1....5...2..12...7..23..16...
  6....3..13...8..24..17..39...
  4...14...9..25..18..40..31...
  15..10..26..19..41..32..60...
  11..27..20..42..33..61..50...
  28..21..43..34..62..51..85...
  22..44..35..63..52..86..73...
  . . .
The start of the sequence as triangle array read by rows:
  1;
  5,6;
  2,3,4;
  12,13,14,15;
  7,8,9,10,11;
  23,24,25,26,27,28;
  16,17,18,19,20,21,22;
  . . .
Row number r matches with r numbers segment {(r+1)*r/2-r*(-1)^(r+1)-r+2,... (r+1)*r/2-r*(-1)^(r+1)+1}.
		

Crossrefs

Programs

  • Mathematica
    T[n_, k_] := (n+k)(n+k-1)/2 - (-1)^(n+k)(n+k-1) - k + 2;
    Table[T[n-k+1, k], {n, 1, 12}, {k, n, 1, -1}] // Flatten (* Jean-François Alcover, Dec 06 2018 *)
  • Python
    t=int((math.sqrt(8*n-7) - 1)/ 2)
    j=(t*t+3*t+4)/2-n
    result=(t+2)*(t+1)/2-(t+1)*(-1)**t-j+2

Formula

T(n,k) = (k+n)*(k+n-1)/2-(k+n-1)*(-1)^(k+n)-k+2.
As linear sequence
a(n) = A003057(n)*A002024(n)/2- A002024(n)*(-1)^A003056(n)-A004736(n)+2.
a(n) = (t+2)*(t+1)/2 - (t+1)*(-1)^t-j+2, where j=(t*t+3*t+4)/2-n and t=int((math.sqrt(8*n-7) - 1)/ 2).

A213197 T(n,k) = (2*(n+k)^2 - 2*(n+k) - 4*k + 6 + (2*k-2)*(-1)^n + (2*k-1)*(-1)^k + (-2*n+1)*(-1)^(n+k))/4; n, k > 0, read by antidiagonals.

Original entry on oeis.org

1, 3, 4, 2, 6, 5, 8, 9, 11, 12, 7, 15, 10, 14, 13, 17, 18, 20, 21, 23, 24, 16, 28, 19, 27, 22, 26, 25, 30, 31, 33, 34, 36, 37, 39, 40, 29, 45, 32, 44, 35, 43, 38, 42, 41, 47, 48, 50, 51, 53, 54, 56, 57, 59, 60, 46, 66, 49, 65, 52, 64, 55, 63, 58, 62, 61, 68
Offset: 1

Views

Author

Boris Putievskiy, Mar 01 2013

Keywords

Comments

Permutation of the natural numbers.
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.
Enumeration table T(n,k). Let m be natural number. The order of the list:
T(1,1)=1;
T(3,1), T(2,2), T(1,3);
T(2,1), T(1,2);
...
T(1,2*m+1), T(1,2*m), T(2, 2*m-1), T(3, 2*m-1),... T(2*m,1), T(2*m+1,1);
T(2*m,2), T(2*m-2,4), ...T(2,2*m);
...
Movement along two adjacent antidiagonals. The first row consists of phases: step to the west, step to the southwest, step to the south. The second row consists of phases: 2 steps to the north, 2 steps to the east. The length of each step is 1.

Examples

			The start of the sequence as a table:
   1,  3,  2,  8,  7, 17, 16, ...
   4,  6,  9, 15, 18, 28, 31, ...
   5, 11, 10, 20, 19, 33, 32, ...
  12, 14, 21, 27, 34, 44, 51, ...
  13, 23, 22, 36, 35, 53, 52, ...
  24, 26, 37, 43, 54, 64, 75, ...
  25, 39, 38, 56, 55, 77, 76, ...
  ...
The start of the sequence as a triangular array read by rows:
   1;
   3,  4;
   2,  6,  5;
   8,  9, 11, 12;
   7, 15, 10, 14, 13;
  17, 18, 20, 21, 23, 24;
  16, 28, 19, 27, 22, 26, 25;
  ...
The start of the sequence as an array read by rows, the length of row r is 4*r-3.
First 2*r-2 numbers are from row 2*r-2 of the triangular array above.
Last  2*r-1 numbers are from row 2*r-1 of the triangular array above.
   1;
   3,  4,  2,  6,  5;
   8,  9, 11, 12,  7, 15, 10, 14, 13;
  17, 18, 20, 21, 23, 24, 16, 28, 19, 27, 22, 26, 25;
  ...
Row r contains permutation of 4*r-3 numbers from 2*r*r-5*r+4 to 2*r*r-r:
2*r*r-5*r+5, 2*r*r-5*r+6, ..., 2*r*r-2*r+2, 2*r*r-2*r+1.
		

Crossrefs

Programs

  • Maple
    T:=(n,k)->(2*(n+k)^2-2*(n+k)-4*k+6+(2*k-2)*(-1)^n+(2*k-1)*(-1)^k+(1-+2*n)*(-1)^(n+k))/4: seq(seq(T(k,n-k),k=1..n-1),n=1..13); # Muniru A Asiru, Dec 06 2018
  • Mathematica
    T[n_, k_] := (2(n+k)^2 - 2(n+k) - 4k + 6 + (2k-2)(-1)^n + (2k-1)(-1)^k + (-2n+1)(-1)^(n+k))/4;
    Table[T[n-k+1, k], {n, 1, 12}, {k, n, 1, -1}] // Flatten (* Jean-François Alcover, Dec 06 2018 *)
  • Python
    t=int((math.sqrt(8*n-7) - 1)/ 2)
    i=n-t*(t+1)/2
    j=(t*t+3*t+4)/2-n
    result=(2*(t+2)**2-2*(t+2)-4*j+6 +(2*j-2)*(-1)**i+(2*j-1)*(-1)**j+(-2*i+1)*(-1)**t)/4

Formula

As a table:
T(n,k) = (2*(n+k)^2 - 2*(n+k) - 4*k + 6 + (2*k-2)*(-1)^n + (2*k-1)*(-1)^k + (-2*n+1)*(-1)^(n+k))/4.
As a linear sequence:
a(n) = (2*A003057(n)^2 - 2*A003057(n) - 4*A004736(n) + 6 + (2*A004736(n)-2)*(-1)^A002260(n) + (2*A004736(n)-1)*(-1)^A004736(n) + (-2*A002260(n)+1)*(-1)^A003056(n))/4;
a(n) = (2*(t+2)^2 - 2*(t+2) - 4*j + 6 + (2*j-2)*(-1)^i + (2*j-1)*(-1)^j + (-2*i+1)*(-1)^t)/4, where i = n - t*(t+1)/2, j = (t*t + 3*t + 4)/2 - n, t = floor((-1+sqrt(8*n-7))/2).

A038377 Number of odd nonprimes <= (2n+1)^2.

Original entry on oeis.org

1, 2, 5, 11, 20, 32, 47, 66, 85, 110, 137, 167, 200, 237, 276, 320, 365, 414, 467, 522, 579, 643, 708, 777, 845, 924, 997, 1080, 1169, 1255, 1343, 1437, 1536, 1637, 1741, 1847, 1961, 2075, 2187, 2311, 2435, 2560, 2691, 2826, 2962, 3104, 3249, 3393, 3543
Offset: 0

Views

Author

Keywords

Examples

			a(2) = 5 because there are 5 odd nonprimes that are not exceeding (2*2+1)^2 = 25: 1, 9, 15, 21 and 25.
		

Crossrefs

Programs

  • Mathematica
    nn=20001; With[{onps=Complement[Range[1,nn,2],Prime[Range[PrimePi[nn+1]]]]}, Table[Count[onps,?(#<=(2n+1)^2&)],{n,0,60}]]  (* _Harvey P. Dale, Apr 13 2011 *)
    a[n_] := 2*n^2 + 2*n + 2 - PrimePi[(2*n + 1)^2]; a[0] = 1; Array[a, 61, 0] (* Amiram Eldar, Sep 06 2024 *)
  • PARI
    a(n) = if(n == 0, 1, 2*n^2 + 2*n + 2 - primepi((2*n + 1)^2)); \\ Amiram Eldar, Sep 06 2024

Formula

a(n) = A037040(n) + 1.
For n>=1, a(n) = 2n^2 + 2n + 2 - PrimePi((2n+1)^2) = A051890(n+1) - A000720((2n+1)^2). - Zak Seidov, Mar 03 2008

Extensions

Offset corrected by Amiram Eldar, Sep 06 2024

A217775 a(n) = n*(n+1) + (n+2)*(n+3) + (n+4)*(n+5).

Original entry on oeis.org

26, 44, 68, 98, 134, 176, 224, 278, 338, 404, 476, 554, 638, 728, 824, 926, 1034, 1148, 1268, 1394, 1526, 1664, 1808, 1958, 2114, 2276, 2444, 2618, 2798, 2984, 3176, 3374, 3578, 3788, 4004, 4226, 4454, 4688, 4928, 5174, 5426, 5684, 5948, 6218, 6494, 6776, 7064
Offset: 0

Views

Author

Jon Perry, Mar 24 2013

Keywords

Examples

			a(1) = 1*2 + 3*4 + 5*6 = 2 + 12 + 30 = 44.
		

Crossrefs

Cf. A051890 (two pairs), A217776 (4 pairs).

Programs

  • GAP
    List([0..50], n-> (3*(2*n+5)^2 + 29)/4 ); # G. C. Greubel, Aug 27 2019
  • JavaScript
    for (j=0;j<50;j++) {
    a=j*(j+1)+(j+2)*(j+3)+(j+4)*(j+5);
    document.write(a+", ");
    }
    
  • Magma
    [(3*(2*n+5)^2 + 29)/4: n in [0..50]]; // G. C. Greubel, Aug 27 2019
    
  • Maple
    seq((3*(2*n+5)^2 + 29)/4, n=0..50); # G. C. Greubel, Aug 27 2019
  • Mathematica
    Table[3n^2+15n+26,{n,0,50}] (* or *) LinearRecurrence[{3,-3,1}, {26,44,68}, 50] (* Harvey P. Dale, Oct 09 2018 *)
  • PARI
    a(n)=n*(n+1)+(n+2)*(n+3)+(n+4)*(n+5) \\ Charles R Greathouse IV, Jun 17 2017
    
  • Sage
    [(3*(2*n+5)^2 + 29)/4 for n in (0..50)] # G. C. Greubel, Aug 27 2019
    

Formula

G.f.: 2*(13-17*x+7*x^2)/(1-x)^3. - Bruno Berselli, Mar 29 2013
a(n) = 3*n^2 + 15*n + 26. - Bruno Berselli, Mar 29 2013
E.g.f.: (26 + 18*x + 3*x^2)*exp(x). - G. C. Greubel, Aug 27 2019
a(n) = 3*a(n-1)-3*a(n-2)+a(n-3). - Wesley Ivan Hurt, Jan 27 2022
Previous Showing 21-30 of 45 results. Next