The On-Line Encyclopedia of Integer Sequences (OEIS)

The OEIS is supported by the many generous donors to the OEIS Foundation.

Revision History for A155954

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

A155954

a(0)=2, a(1)=3, a(2)=5, a(n) = smallest prime greater than or equal to a(n-1) + a(n-2) + a(n-3).
(history; published version)

#11 by Michael De Vlieger at Sat Apr 16 15:00:57 EDT 2022

STATUS

reviewed

approved

#10 by Michel Marcus at Sat Apr 16 12:50:37 EDT 2022

STATUS

proposed

reviewed

#9 by Robert C. Lyons at Sat Apr 16 12:50:03 EDT 2022

STATUS

editing

proposed

#8 by Robert C. Lyons at Sat Apr 16 12:50:00 EDT 2022

NAME

a(0)=2, a(1)=3, a(2)=5, a(n) = smallest prime greater than or equal to a(n-1) + a(n-2) + a(n-3).

STATUS

approved

editing

#7 by Peter Luschny at Sun Jan 27 04:36:22 EST 2019

STATUS

reviewed

approved

#6 by Joerg Arndt at Sun Jan 27 03:01:57 EST 2019

STATUS

proposed

reviewed

#5 by Jon E. Schoenfield at Sun Jan 27 01:24:49 EST 2019

STATUS

editing

proposed

Discussion

Sun Jan 27

01:47

Michel Marcus: I think offset 1 would have been better , that is with a(n) = prime(n) for n=1 to 3.

01:49

Michel Marcus: there are no refs, so no adherences

#4 by Jon E. Schoenfield at Sun Jan 27 01:24:46 EST 2019

NAME

a(0)=2, a(1)=3, a(2)=5, a(n) = smallest prime greater or equal to a(n-1) + a(n-2) + a(n-3).

EXAMPLE

a(2) + a(3) + a(4) = 35, so a(5) = (smallest prime larger than 35) = 37.

MAPLE

a[0] := 2: a[1] := 3: a[2] := 5: for n from 3 to 35 do a[n] := nextprime(a[n-1]+a[n-2]+a[n-3]-1) end do: seq(a[n], n = 0 .. 35); [From _# _Emeric Deutsch_, Feb 27 2009]

STATUS

approved

editing

#3 by Russ Cox at Fri Mar 30 17:36:22 EDT 2012

MAPLE

a[0] := 2: a[1] := 3: a[2] := 5: for n from 3 to 35 do a[n] := nextprime(a[n-1]+a[n-2]+a[n-3]-1) end do: seq(a[n], n = 0 .. 35); [From _Emeric Deutsch (deutsch(AT)duke.poly.edu), _, Feb 27 2009]

EXTENSIONS

More terms from _Emeric Deutsch (deutsch(AT)duke.poly.edu), _, Feb 27 2009

Discussion

Fri Mar 30

17:36

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

#2 by N. J. A. Sloane at Tue Jun 01 03:00:00 EDT 2010

DATA

2, 3, 5, 11, 19, 37, 67, 127, 233, 431, 797, 1471, 2699, 4967, 9137, 16811, 30931, 56891, 104639, 192461, 354001, 651103, 1197571, 2202677, 4051361, 7451617, 13705667, 25208653, 46365959, 85280323, 156854959, 288501287, 530636569

MAPLE

a[0] := 2: a[1] := 3: a[2] := 5: for n from 3 to 35 do a[n] := nextprime(a[n-1]+a[n-2]+a[n-3]-1) end do: seq(a[n], n = 0 .. 35); [From Emeric Deutsch (deutsch(AT)duke.poly.edu), Feb 27 2009]

KEYWORD

nonn,new

nonn

EXTENSIONS

More terms from Emeric Deutsch (deutsch(AT)duke.poly.edu), Feb 27 2009