The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A173421

(Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing entries 1-10 | older changes

A173421

Triangular numbers which are sums of 5 consecutive primes.
(history; published version)

#15 by Charles R Greathouse IV at Thu Sep 08 08:45:50 EDT 2022

PROG

(MAGMAMagma) [ t: n in [1..28000] | IsSquare(8*t+1) where t is &+[NthPrime(n+s): s in [0..4]] ]; // Bruno Berselli, Apr 28 2011

Discussion

Thu Sep 08

08:45

OEIS Server: https://oeis.org/edit/global/2944

#14 by Harvey P. Dale at Sat Feb 08 18:19:41 EST 2020

STATUS

editing

approved

#13 by Harvey P. Dale at Sat Feb 08 18:19:38 EST 2020

MATHEMATICA

Select[Total/@Partition[Prime[Range[50000]], 5, 1], OddQ[Sqrt[1+8#]]&] (* Harvey P. Dale, Feb 08 2020 *)

STATUS

approved

editing

#12 by N. J. A. Sloane at Sun Feb 11 19:37:44 EST 2018

STATUS

proposed

approved

#11 by Michel Marcus at Sun Feb 11 17:11:19 EST 2018

STATUS

editing

proposed

#10 by Michel Marcus at Sun Feb 11 17:11:16 EST 2018

PROG

(MAGMA) [ t: n in [1..28000] | IsSquare(8*t+1) where t is &+[NthPrime(n+s): s in [0..4]] ]; // _Bruno Berselli, _, Apr 28 2011

CROSSREFS

Cf. A000040, A000217, A111163, A167788, A173420.

STATUS

proposed

editing

#9 by Chai Wah Wu at Sun Feb 11 17:06:05 EST 2018

STATUS

editing

proposed

#8 by Chai Wah Wu at Sun Feb 11 17:05:36 EST 2018

LINKS

Chai Wah Wu, <a href="/A173421/b173421.txt">Table of n, a(n) for n = 1..10000</a>

STATUS

approved

editing

#7 by Russ Cox at Sat Mar 31 12:38:28 EDT 2012

AUTHOR

_Vladimir Joseph Stephan Orlovsky (4vladimir(AT)gmail.com), _, Feb 18 2010

Discussion

Sat Mar 31

12:38

OEIS Server: https://oeis.org/edit/global/876

#6 by T. D. Noe at Thu Apr 28 17:43:24 EDT 2011

STATUS

proposed

approved