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.

Showing 1-2 of 2 results.

A133548 a(n) = sum of cubes of first n odd primes.

Original entry on oeis.org

27, 152, 495, 1826, 4023, 8936, 15795, 27962, 52351, 82142, 132795, 201716, 281223, 385046, 533923, 739302, 966283, 1267046, 1624957, 2013974, 2507013, 3078800, 3783769, 4696442, 5726743, 6819470, 8044513, 9339542, 10782439, 12830822, 15078913, 17650266
Offset: 1

Views

Author

Artur Jasinski, Sep 16 2007, corrected Jun 08 2008

Keywords

Examples

			a(3)=495 because 3^3+5^3+7^3=495.
		

Crossrefs

Programs

  • Mathematica
    c = 3; a = {}; b = 0; Do[b = b + Prime[n]^c; AppendTo[a, b], {n, 2, 1000}]; a
    Accumulate[Prime[Range[2,40]]^3] (* Harvey P. Dale, Oct 31 2024 *)
  • PARI
    a(n) = sum(i=2, n+1, prime(i)^3); \\ Michel Marcus, Nov 05 2013

Formula

a(n) = A098999(n+1) - 8.

Extensions

More terms from Michel Marcus, Nov 05 2013

A133549 Sum of the fourth powers of the first n odd primes.

Original entry on oeis.org

81, 706, 3107, 17748, 46309, 129830, 260151, 539992, 1247273, 2170794, 4044955, 6870716, 10289517, 15169198, 23059679, 35177040, 49022881, 69174002, 94585683, 122983924, 161934005, 209392326, 272134567, 360663848, 464724249, 577275130
Offset: 1

Views

Author

Artur Jasinski, Sep 16 2007

Keywords

Examples

			a(2)=706 because 3^4 + 5^4 = 706.
		

Crossrefs

Programs

  • Maple
    a:=proc (n) options operator, arrow: add(ithprime(j)^4, j=2..n+1) end proc: seq(a(n),n=1..26); # Emeric Deutsch, Oct 02 2007
  • Mathematica
    c = 4; a = {}; b = 0; Do[b = b + Prime[n]^c; AppendTo[a, b], {n, 2, 1000}]; a

Formula

a(n) = A122102(n+1) - 16. - Michel Marcus, Nov 05 2013

Extensions

Comment corrected by Michel Marcus, Nov 05 2013
Showing 1-2 of 2 results.