The On-Line Encyclopedia of Integer Sequences (OEIS)

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

A289256

a(1) = a(2) = a(3) = 2; a(n) = a(n-a(n-1)) + a(n-a(n-3)-1) for n > 3.
(history; published version)

#15 by Joerg Arndt at Mon May 10 02:36:12 EDT 2021

STATUS

reviewed

approved

#14 by Michel Marcus at Sun May 09 11:51:35 EDT 2021

STATUS

proposed

reviewed

#13 by F. Chapoton at Sun May 09 11:37:01 EDT 2021

STATUS

editing

proposed

#12 by F. Chapoton at Sun May 09 11:36:54 EDT 2021

PROG

print (l[1:] ) # Indranil Ghosh, Jul 01 2017

STATUS

approved

editing

Discussion

Sun May 09

11:37

F. Chapoton: adapt py code to py3

#11 by N. J. A. Sloane at Sat Dec 07 12:18:29 EST 2019

PROG

for n in xrangerange(4, 101): l+=[l[n - l[n - 1]] + l[n - l[n - 3] - 1], ]

Discussion

Sat Dec 07

12:18

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

#10 by N. J. A. Sloane at Sun Jul 02 07:58:15 EDT 2017

STATUS

proposed

approved

#9 by Indranil Ghosh at Sat Jul 01 15:14:30 EDT 2017

STATUS

editing

proposed

#8 by Indranil Ghosh at Sat Jul 01 15:14:24 EDT 2017

PROG

(Python)

l=[0, 2, 2, 2]

for n in xrange(4, 101): l+=[l[n - l[n - 1]] + l[n - l[n - 3] - 1], ]

print l[1:] # Indranil Ghosh, Jul 01 2017

STATUS

proposed

editing

#7 by Michael De Vlieger at Fri Jun 30 08:12:06 EDT 2017

STATUS

editing

proposed

#6 by Michael De Vlieger at Fri Jun 30 08:12:04 EDT 2017

MATHEMATICA

a[n_] := a[n] = If[n <= 3, 2, a[n - a[n - 1]] + a[n - a[n - 3] - 1]]; Array[a, 82] (* Michael De Vlieger, Jun 30 2017 *)

STATUS

proposed

editing