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 11-20 of 21 results. Next

A283118 a(n) = sigma(5*n).

Original entry on oeis.org

6, 18, 24, 42, 31, 72, 48, 90, 78, 93, 72, 168, 84, 144, 124, 186, 108, 234, 120, 217, 192, 216, 144, 360, 156, 252, 240, 336, 180, 372, 192, 378, 288, 324, 248, 546, 228, 360, 336, 465, 252, 576, 264, 504, 403, 432, 288, 744, 342, 468, 432, 588, 324, 720
Offset: 1

Views

Author

Seiichi Manyama, Mar 01 2017

Keywords

Crossrefs

Sigma(k*n): A000203 (k=1), A062731 (k=2), A144613 (k=3), A193553 (k=4), this sequence (k=5), A224613 (k=6), A283078 (k=7), A283122 (k=8), A283123 (k=9).
Cf. A008587.

Programs

Formula

a(n) = A000203(5*n).
Sum_{k=1..n} a(k) = (29*Pi^2/60) * n^2 + O(n*log(n)). - Amiram Eldar, Dec 16 2022

A372784 a(n) = tau(4*n) = A000005(4*n).

Original entry on oeis.org

3, 4, 6, 5, 6, 8, 6, 6, 9, 8, 6, 10, 6, 8, 12, 7, 6, 12, 6, 10, 12, 8, 6, 12, 9, 8, 12, 10, 6, 16, 6, 8, 12, 8, 12, 15, 6, 8, 12, 12, 6, 16, 6, 10, 18, 8, 6, 14, 9, 12, 12, 10, 6, 16, 12, 12, 12, 8, 6, 20, 6, 8, 18, 9, 12, 16, 6, 10, 12, 16, 6, 18, 6, 8, 18, 10
Offset: 1

Views

Author

Vaclav Kotesovec, May 13 2024

Keywords

Crossrefs

Programs

  • Mathematica
    Table[DivisorSigma[0, 4*n], {n, 1, 150}]

Formula

For n > 1, a(n) = A366872(n-2).
Sum_{k=1..n} a(k) ~ (8*n*(log(n) + 2*gamma - 1) + n*4*log(2)) / 4, where gamma is the Euler-Mascheroni constant A001620.

A239052 Sum of divisors of 4*n-2.

Original entry on oeis.org

3, 12, 18, 24, 39, 36, 42, 72, 54, 60, 96, 72, 93, 120, 90, 96, 144, 144, 114, 168, 126, 132, 234, 144, 171, 216, 162, 216, 240, 180, 186, 312, 252, 204, 288, 216, 222, 372, 288, 240, 363, 252, 324, 360, 270, 336, 384, 360, 294, 468, 306, 312, 576
Offset: 1

Views

Author

Omar E. Pol, Mar 09 2014

Keywords

Comments

Bisection of A062731 (odd part).
a(n) is also the total number of cells in the n-th branch of the second quadrant of the spiral formed by the parts of the symmetric representation of sigma(4n-2). For the quadrants 1, 3, 4 see A112610, A239053, A193553. The spiral has been obtained according to the following way: A196020 --> A236104 --> A235791 --> A237591 --> A237593 --> A237270, see example.
We can find the spiral on the terraces of the stepped pyramid described in A244050. - Omar E. Pol, Dec 07 2016

Examples

			Illustration of initial terms:
------------------------------------------------------
.        Branches of the spiral
.        in the second quadrant             n    a(n)
------------------------------------------------------
.
.                  _ _ _ _ _ _ _ _
.                 |  _ _ _ _ _ _ _|         4     24
.                 | |
.             12 _| |
.               |_ _|  _ _ _ _ _ _
.         12 _ _|     |  _ _ _ _ _|         3     18
.      _ _ _| |    9 _| |
.     |  _ _ _|  9 _|_ _|
.     | |      _ _| |      _ _ _ _
.     | |     |  _ _| 12 _|  _ _ _|         2     12
.     | |     | |      _|   |
.     | |     | |     |  _ _|
.     | |     | |     | |    3 _ _
.     | |     | |     | |     |  _|         1      3
.     |_|     |_|     |_|     |_|
.
For n = 4 the sum of divisors of 4*n-2 is 1 + 2 + 7 + 14 = A000203(14) = 24. On the other hand the parts of the symmetric representation of sigma(14) are [12, 12] and the sum of them is 12 + 12 = 24, equaling the sum of divisors of 14, so a(4) = 24.
		

Crossrefs

Programs

  • Mathematica
    a[n_] := DivisorSigma[1, 4*n - 2]; Array[a, 100] (* Amiram Eldar, Dec 17 2022 *)

Formula

a(n) = A000203(4n-2) = A000203(A016825(n-1)).
a(n) = 3*A008438(n-1). - Joerg Arndt, Mar 09 2014
Sum_{k=1..n} a(k) = (3*Pi^2/8) * n^2 + O(n*log(n)). - Amiram Eldar, Dec 17 2022

A239053 Sum of divisors of 4*n-1.

Original entry on oeis.org

4, 8, 12, 24, 20, 24, 40, 32, 48, 56, 44, 48, 72, 72, 60, 104, 68, 72, 124, 80, 84, 120, 112, 120, 156, 104, 108, 152, 144, 144, 168, 128, 132, 240, 140, 168, 228, 152, 192, 216, 164, 168, 260, 248, 180, 248, 216, 192, 336, 200, 240, 312, 212, 264, 296
Offset: 1

Views

Author

Omar E. Pol, Mar 09 2014

Keywords

Comments

Bisection of A008438.
a(n) is also the total number of cells in the n-th branch of the third quadrant of the spiral formed by the parts of the symmetric representation of sigma(4n-1), see example. For the quadrants 1, 2, 4 see A112610, A239052, A193553. The spiral has been obtained according to the following way: A196020 --> A236104 --> A235791 --> A237591 --> A237593 --> A237270.
We can find the spiral (mentioned above) on the terraces of the pyramid described in A244050. - Omar E. Pol, Dec 06 2016

Examples

			Illustration of initial terms:
-----------------------------------------------------
.        Branches of the spiral
.        in the third quadrant             n    a(n)
-----------------------------------------------------
.     _       _       _       _
.    | |     | |     | |     | |
.    | |     | |     | |     |_|_ _
.    | |     | |     | |    2  |_ _|       1      4
.    | |     | |     |_|_     2
.    | |     | |    4    |_
.    | |     |_|_ _        |_ _ _ _
.    | |    6      |_      |_ _ _ _|       2      8
.    |_|_ _ _        |_   4
.   8      | |_ _      |
.          |_    |     |_ _ _ _ _ _
.            |_  |_    |_ _ _ _ _ _|       3     12
.           8  |_ _|  6
.                  |
.                  |_ _ _ _ _ _ _ _
.                  |_ _ _ _ _ _ _ _|       4     24
.                 8
.
For n = 4 the sum of divisors of 4*n-1 is 1 + 3 + 5 + 15 = A000203(15) = 24. On the other hand the parts of the symmetric representation of sigma(15) are [8, 8, 8] and the sum of them is 8 + 8 + 8 = 24, equaling the sum of divisors of 15, so a(4) = 24.
		

Crossrefs

Programs

Formula

a(n) = A000203(4n-1) = A000203(A004767(n-1)).
a(n) = 4*A097723(n-1). - Joerg Arndt, Mar 09 2014
Sum_{k=1..n} a(k) = (Pi^2/4) * n^2 + O(n*log(n)). - Amiram Eldar, Dec 17 2022

A088839 Numerator of sigma(4n)/sigma(n).

Original entry on oeis.org

7, 5, 7, 31, 7, 5, 7, 21, 7, 5, 7, 31, 7, 5, 7, 127, 7, 5, 7, 31, 7, 5, 7, 21, 7, 5, 7, 31, 7, 5, 7, 85, 7, 5, 7, 31, 7, 5, 7, 21, 7, 5, 7, 31, 7, 5, 7, 127, 7, 5, 7, 31, 7, 5, 7, 21, 7, 5, 7, 31, 7, 5, 7, 511, 7, 5, 7, 31, 7, 5, 7, 21, 7, 5, 7, 31, 7, 5, 7, 127, 7, 5, 7, 31, 7, 5, 7, 21, 7, 5, 7, 31
Offset: 1

Views

Author

Labos Elemer, Nov 04 2003

Keywords

Crossrefs

Programs

  • Maple
    f:= proc(n) local m;
      m:= padic:-ordp(n,2);
      if m::odd then (2^(m+3)-1)/3 else 2^(m+3)-1 fi
    end proc:
    map(f, [$1..200]); # Robert Israel, Nov 19 2017
  • Mathematica
    k=4; Table[Numerator[DivisorSigma[1, k*n]/DivisorSigma[1, n]], {n, 1, 128}]
  • PARI
    A088839(n) = numerator(sigma(4*n)/sigma(n)); \\ Antti Karttunen, Nov 18 2017

Formula

a(n) = (8*A006519(n)-1)/(1+2*A096268(n)). - Robert Israel, Nov 19 2017
From Amiram Eldar, Jan 06 2023: (Start)
a(n) = numerator(A193553(n)/A000203(n)).
Asymptotic mean: Limit_{m->oo} (1/m) * Sum_{k=1..m} a(k)/A088840(k) = 3*A065442 + 1 = 5.820085... . (End)

Extensions

Typo in definition corrected by Antti Karttunen, Nov 18 2017

A088840 Denominator of sigma(4n)/sigma(n).

Original entry on oeis.org

1, 1, 1, 7, 1, 1, 1, 5, 1, 1, 1, 7, 1, 1, 1, 31, 1, 1, 1, 7, 1, 1, 1, 5, 1, 1, 1, 7, 1, 1, 1, 21, 1, 1, 1, 7, 1, 1, 1, 5, 1, 1, 1, 7, 1, 1, 1, 31, 1, 1, 1, 7, 1, 1, 1, 5, 1, 1, 1, 7, 1, 1, 1, 127, 1, 1, 1, 7, 1, 1, 1, 5, 1, 1, 1, 7, 1, 1, 1, 31, 1, 1, 1, 7, 1, 1, 1, 5, 1, 1, 1, 7, 1, 1, 1, 21, 1, 1, 1, 7, 1, 1
Offset: 1

Views

Author

Labos Elemer, Nov 04 2003

Keywords

Crossrefs

Programs

  • Mathematica
    Table[Denominator[DivisorSigma[1, 4*n]/DivisorSigma[1, n]], {n, 1, 128}]
    a[n_] := Module[{e = IntegerExponent[n, 2]}, (((-1)^e+2)*(2^(e+1)-1))/3]; Array[a, 100] (* Amiram Eldar, Oct 03 2023 *)
  • PARI
    A088840(n) = denominator(sigma(4*n)/sigma(n)); \\ Antti Karttunen, Nov 18 2017
    
  • PARI
    a(n) = {my(e = valuation(n, 2)); (((-1)^e+2) * (2^(e+1)-1))/3;} \\ Amiram Eldar, Oct 03 2023

Formula

From Amiram Eldar, Oct 03 2023: (Start)
Multiplicative with a(2^e) = (((-1)^e+2)*(2^(e+1)-1))/3 = A213243(e+1), and a(p^e) = 1 for an odd prime p.
a(n) = A213243(A007814(n+1)).
Dirichlet g.f.: ((8^s + 4^s + 2^(s+1))/(8^s + 4^s - 2^(s+2) - 4)) * zeta(s).
Sum_{k=1..n} a(k) = (2*n/(3*log(2))) * (log(n) + gamma - 1 + 7*log(2)/12), where gamma is Euler's constant (A001620). (End)

Extensions

Typo in definition corrected by Antti Karttunen, Nov 18 2017

A283163 Expansion of exp( Sum_{n>=1} -sigma(4*n)*x^n/n ) in powers of x.

Original entry on oeis.org

1, -7, 17, -14, 2, -21, 36, 13, -26, -24, 10, 12, -17, 34, 22, 19, -96, -10, 14, 38, 0, 12, -23, 72, -38, -2, -11, -64, -34, 0, 72, 84, -26, 0, 0, -79, 60, 24, -32, -58, -7, -84, 50, 26, 120, 0, 0, 46, -34, -64, 10, -119, 70, 0, 22, -70, 36, 37, -120, 0
Offset: 0

Views

Author

Seiichi Manyama, Mar 02 2017

Keywords

Crossrefs

Cf. A182820 (exp( Sum_{n>=1} sigma(4*n)*x^n/n )), A193553 (sigma(4*n)).
Cf. exp( Sum_{n>=1} -sigma(k*n)*x^n/n ): A115110 (k=2), A185654 (k=3), this sequence (k=4), A282937 (k=5), A283164 (k=6), A282942 (k=7), A283168 (k=8), A283169 (k=9).

Formula

G.f.: Product_{n>=1} (1 - x^n)^7/(1 - x^(2*n))^3.
a(n) = -(1/n)*Sum_{k=1..n} sigma(4*k)*a(n-k). - Seiichi Manyama, Mar 04 2017

A319526 Square array read by antidiagonals upwards: T(n,k) = sigma(n*k), n >= 1, k >= 1.

Original entry on oeis.org

1, 3, 3, 4, 7, 4, 7, 12, 12, 7, 6, 15, 13, 15, 6, 12, 18, 28, 28, 18, 12, 8, 28, 24, 31, 24, 28, 8, 15, 24, 39, 42, 42, 39, 24, 15, 13, 31, 32, 60, 31, 60, 32, 31, 13, 18, 39, 60, 56, 72, 72, 56, 60, 39, 18, 12, 42, 40, 63, 48, 91, 48, 63, 40, 42, 12, 28, 36, 72, 91, 90, 96, 96, 90, 91, 72, 36, 28
Offset: 1

Views

Author

Omar E. Pol, Sep 25 2018

Keywords

Examples

			The corner of the square array begins:
A000203:    1,   3,   4,   7,   6,  12,   8,  15,  13,  18,  12,  28, ...
A062731:    3,   7,  12,  15,  18,  28,  24,  31,  39,  42,  36,  60, ...
A144613:    4,  12,  13,  28,  24,  39,  32,  60,  40,  72,  48,  91, ...
A193553:    7,  15,  28,  31,  42,  60,  56,  63,  91,  90,  84, 124, ...
A283118:    6,  18,  24,  42,  31,  72,  48,  90,  78,  93,  72, 168, ...
A224613:   12,  28,  39,  60,  72,  91,  96, 124, 120, 168, 144, 195, ...
A283078:    8,  24,  32,  56,  48,  96,  57, 120, 104, 144,  96, 224, ...
A283122:   15,  31,  60,  63,  90, 124, 120, 127, 195, 186, 180, 252, ...
A283123:   13,  39,  40,  91,  78, 120, 104, 195, 121, 234, 156, 280, ...
...
		

Crossrefs

First 9 rows (also first 9 columns) are A000203, A062731, A144613, A193553, A283118, A224613, A283078, A283122, A283123.
Main diagonal gives A065764.

Programs

  • Mathematica
    Table[DivisorSigma[1, # k] &[m - k + 1], {m, 12}, {k, m}] // Flatten (* Michael De Vlieger, Dec 31 2018 *)

Formula

T(n,k) = A000203(n*k).
T(n,k) = A000203(A003991(n,k)).

A372675 a(n) = Sum_{j=1..n} Sum_{k=1..n} sigma(j*k).

Original entry on oeis.org

1, 14, 59, 190, 401, 914, 1499, 2632, 4113, 6424, 8645, 13284, 17023, 23092, 30715, 40484, 48711, 63890, 75351, 95792, 116421, 139822, 159911, 199176, 229499, 267438, 309283, 364462, 404933, 482792, 532553, 611208, 688593, 772540, 862471, 998760, 1083615, 1200328
Offset: 1

Views

Author

Vaclav Kotesovec, May 10 2024

Keywords

Comments

Sum_{j=1..n} sigma(j*k) ~ A069097(k) * Pi^2 * n^2 / (12*k).

Crossrefs

Programs

  • Mathematica
    Table[Sum[DivisorSigma[1, j*k], {j, 1, n}, {k, 1, n}], {n, 1, 50}]
    s = 1; Join[{1}, Table[s += DivisorSigma[1, n^2] + 2*Sum[DivisorSigma[1, j*n], {j, 1, n - 1}], {n, 2, 50}]]

Formula

a(n) ~ c * n^4, where c = Pi^4 / (144*zeta(3)) = 0.56274...

A252922 a(n) = sigma(n-1) + sigma(n-2) + sigma(n-3), with a(1)=0, a(2)=1, a(3)=4.

Original entry on oeis.org

0, 1, 4, 8, 14, 17, 25, 26, 35, 36, 46, 43, 58, 54, 66, 62, 79, 73, 88, 77, 101, 94, 110, 92, 120, 115, 133, 113, 138, 126, 158, 134, 167, 143, 165, 150, 193, 177, 189, 154, 206, 188, 228, 182, 224, 206, 234, 198, 244, 229, 274, 222, 263, 224, 272, 246, 312, 272, 290, 230, 318, 290, 326, 262, 327, 315, 355, 296
Offset: 1

Views

Author

Omar E. Pol, Dec 24 2014

Keywords

Comments

This is also a rectangular array read by rows, with four columns, in which T(j,k) is the number of cells (also the area) of the j-th gap between the arms in the k-th quadrant of the spiral of the symmetric representation of sigma described in A239660, with j >= 1 and 1 <= k <= 4 and starting with T(1,1) = 0, see example.
We can find the spiral (mentioned above) on the terraces of the stepped pyramid described in A244050. - Omar E. Pol, Dec 07 2016

Examples

			a(5) = sigma(4) + sigma(3) + sigma(2) = 7 + 4 + 3 = 14. On the other hand a(5) = A024916(4) - A024916(1) = 15 - 1 = 14.
...
Also, if written as a rectangular array T(j,k) with four columns the sequence begins:
    0,   1,   4,   8;
   14,  17,  25,  26;
   35,  36,  46,  43;
   58,  54,  66,  62;
   79,  73,  88,  77;
  101,  94, 110,  92;
  120, 115, 133, 113;
  138, 126, 158, 134;
  167, 143, 165, 150;
  193, 177, 189, 154;
  206, 188, 228, 182;
  224, 206, 234, 198;
  244, 229, 274, 222;
  263, 224, 272, 246;
  312, 272, 290, 230;
  318, 290, 326, 262;
  ...
In this case T(2,1) = a(5) = 14.
		

Crossrefs

Programs

  • Maple
    L:= [0,0,0,seq(numtheory:-sigma(n), n=1..100)]:
    L[1..101]+L[2..102]+L[3..103]; # Robert Israel, Dec 07 2016
  • Mathematica
    a252922[n_] := Block[{f}, f[1] = 0; f[2] = 1; f[3] = 4;
      f[x_] := DivisorSigma[1, x - 1] + DivisorSigma[1, x - 2] +
    DivisorSigma[1, x - 3]; Table[f[i], {i, n}]]; a252922[68] (* Michael De Vlieger, Dec 27 2014 *)
  • PARI
    v=concat([0,1,4],vector(100,n,sigma(n)+sigma(n+1)+sigma(n+2))) \\ Derek Orr, Dec 30 2014

Formula

a(1) = 0, a(2) = sigma(1) = 1, a(3) = sigma(2) + sigma(1) = 4; for n >= 4, a(n) = sigma(n-1) + sigma(n-2) + sigma(n-3).
a(n) = A024916(n-1) - A024916(n-4) for n >= 5.
Previous Showing 11-20 of 21 results. Next