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-6 of 6 results.

A133543 Sum of seventh powers of five consecutive primes.

Original entry on oeis.org

20391154, 83139543, 493476029, 1387269643, 4791271547, 22021660685, 49471526279, 143993064739, 337853466881, 606267252541, 1095640496695, 2242839022421, 4636558630107, 7584547192247, 13373440186463
Offset: 1

Views

Author

Artur Jasinski, Sep 14 2007

Keywords

Examples

			a(1)=20391154 because 2^7+3^7+5^7+7^7+11^7=20391154

Links

Crossrefs

Cf. A034963, A133524, A133525, A133526, A133527, A133528, A133529, A133530, A133531, A133532, A069484, A133534, A133535, A133536, A133537, A034964, A133538, A133539, A133540, A133541, A133542.

Programs

  • Mathematica
    a = 7; Table[Prime[n]^a + Prime[n + 1]^a + Prime[n + 2]^a + Prime[n + 3]^a + Prime[n + 4]^a, {n, 1, 100}]
Total/@Partition[Prime[Range[20]]^7,5,1] (* Harvey P. Dale, Mar 05 2022 *)

A133540 Sum of fourth powers of five consecutive primes.

Original entry on oeis.org

17764, 46309, 129749, 259445, 536885, 1229525, 2124485, 3915125, 6610565, 9749525, 13921925, 20888885, 31132085, 42152165, 58884485, 79416485, 99924245, 126756965, 160369445, 202960565, 266078165, 341740325, 415341125, 498962405
Offset: 1

Views

Author

Artur Jasinski, Sep 14 2007

Keywords

Examples

			a(1)=17764 because 2^4+3^4+5^4+7^4+11^4=17764.

Crossrefs

Cf. A034964, A133526, A133531, A133535, A133539, A133541, A133542, A133543.

Programs

  • Mathematica
    a = 4; Table[Prime[n]^a + Prime[n + 1]^a + Prime[n + 2]^a + Prime[n + 3]^a + Prime[n + 4]^a, {n, 1, 100}]

Formula

a(n) = A133526(n) + A030514(n+4). - Michel Marcus, Nov 09 2013

A133541 Sum of fifth powers of five consecutive primes.

Original entry on oeis.org

181258, 552519, 1972133, 4445107, 10864643, 31214741, 59472599, 127396699, 240776801, 381348901, 590182759, 979749101, 1625329443, 2354069543, 3557186207, 5132070551, 6786946651, 9149078751, 12243523093, 16477457435
Offset: 1

Views

Author

Artur Jasinski, Sep 14 2007

Keywords

Examples

			a(1)=181258 because 2^5+3^5+5^5+7^5+11^5=181258.

Crossrefs

Cf. A034963, A133524, A133525, A133526, A133527, A133528, A133529, A133530, A133531, A133532, A069484, A133534, A133535, A133536, A133537, A034964, A133538, A133539, A133540, A133542, A133543.

Programs

  • Mathematica
    a = 5; Table[Prime[n]^a + Prime[n + 1]^a + Prime[n + 2]^a + Prime[n + 3]^a + Prime[n + 4]^a, {n, 1, 100}]
Total/@Partition[Prime[Range[30]]^5,5,1] (* Harvey P. Dale, Dec 02 2017 *)

Formula

a(n) = A133527(n) + A050997(n+4). - Michel Marcus, Nov 09 2013

A133542 Sum of sixth powers of five consecutive primes.

Original entry on oeis.org

1905628, 6732373, 30869213, 77899469, 225817709, 818869469, 1701546341, 4243135181, 8946193541, 15119520701, 25303912709, 46580770157, 86195577389, 132965847509, 217102866629, 334423935221, 463593800381, 664500722261
Offset: 1

Views

Author

Artur Jasinski, Sep 14 2007

Keywords

Examples

			a(1)=1905628 because 2^6+3^6+5^6+7^6+11^6=1905628.

Crossrefs

Cf. A034963, A133524, A133525, A133526, A133527, A133528, A133529, A133530, A133531, A133532, A069484, A133534, A133535, A133536, A133537, A034964, A133538, A133539, A133540, A133541, A133543.

Programs

  • Mathematica
    a = 6; Table[Prime[n]^a + Prime[n + 1]^a + Prime[n + 2]^a + Prime[n + 3]^a + Prime[n + 4]^a, {n, 1, 100}]
Total/@(Partition[Prime[Range[30]],5,1]^6)  (* Harvey P. Dale, Mar 13 2011 *)

Formula

a(n) = A133528(n) + A030516(n+4). - Michel Marcus, Nov 09 2013

A131686 Sum of squares of five consecutive primes.

Original entry on oeis.org

208, 373, 653, 989, 1469, 2189, 2981, 4061, 5381, 6701, 8069, 9917, 12029, 14069, 16709, 19541, 22061, 24821, 27989, 31421, 35789, 40661, 45029, 49589, 53549, 56909, 62837, 69389, 76709, 84149, 93581, 100253, 107741, 115541, 124109, 131837
Offset: 1

Views

Author

Artur Jasinski, Sep 14 2007

Keywords

Examples

			a(1)=208 because 2^2+3^2+5^2+7^2+11^2=208

Crossrefs

Cf. A034963, A133524, A133525, A133526, A133527, A133528, A133529, A133530, A133531, A133532, A069484, A133534, A133535, A133536, A133537, A034964, A133539, A133540, A133541, A133542, A133543.

Programs

  • Mathematica
    a = 2; Table[Prime[n]^a + Prime[n + 1]^a + Prime[n + 2]^a + Prime[n + 3]^a + Prime[n + 4]^a, {n, 1, 100}]

A165612 Primes that are the sum of cubes of 5 consecutive primes.

Original entry on oeis.org

15643, 1239911, 3712769, 14255963, 101001041, 504418823, 595289339, 738356401, 885318983, 1034893493, 1120883653, 1217022481, 1288478701, 1429102277, 2779573231, 3989869253, 4873949893, 5285087837, 6550772831, 8355641813
Offset: 1

Views

Author

Vladimir Joseph Stephan Orlovsky, Sep 22 2009

Keywords

Links

Programs

  • Mathematica
    lst={};Do[p=Prime[n]^3+Prime[n+1]^3+Prime[n+2]^3+Prime[n+3]^3+Prime[n+4]^3; If[PrimeQ[p],AppendTo[lst,p]],{n,6!}];lst
Select[Total/@Partition[Prime[Range[200]]^3,5,1],PrimeQ] (* Harvey P. Dale, Jul 02 2017 *)

Formula

A000040 INTERSECT A133539. - R. J. Mathar, Sep 25 2009
Showing 1-6 of 6 results.

Started in 1964 by Neil J. A. Sloane | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement.