The On-Line Encyclopedia of Integer Sequences (OEIS)

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

A361134

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

#28 by Michael De Vlieger at Sat Mar 04 08:59:29 EST 2023

STATUS

reviewed

approved

#27 by Michel Marcus at Sat Mar 04 02:12:53 EST 2023

STATUS

proposed

reviewed

Discussion

Sat Mar 04

04:02

Tamas Sandor Nagy: Thank you, Stefano, for the formula.

#26 by Stefano Spezia at Sat Mar 04 01:47:01 EST 2023

STATUS

editing

proposed

#25 by Stefano Spezia at Sat Mar 04 01:42:22 EST 2023

FORMULA

a(n) = (A242135(n) - 6*cos(2*n*Pi/3) + 2*sin(2*n*Pi/3)/sqrt(3))/3. - Stefano Spezia, Mar 04 2023

CROSSREFS

Cf. A000578, A152728, A242135.

STATUS

proposed

editing

#24 by Tamas Sandor Nagy at Fri Mar 03 14:14:48 EST 2023

STATUS

editing

proposed

#23 by Tamas Sandor Nagy at Fri Mar 03 14:14:25 EST 2023

CROSSREFS

Cf. A000578, A152728.

STATUS

proposed

editing

#22 by Michel Marcus at Fri Mar 03 03:49:13 EST 2023

STATUS

editing

proposed

Discussion

Fri Mar 03

03:51

Tamas Sandor Nagy: And to Michel as well, merci very schön to all. :-)

14:13

Tamas Sandor Nagy: A152728 is a very similar sequence. In fact, the terms of the two periodically differ by +1, +1, -2, +1, +1, -2, ... etc.

#21 by Michel Marcus at Fri Mar 03 03:49:08 EST 2023

PROG

(PARI) lista(nn) = my(va = vector(nn)); va[1] = 1; va[2] = 2; for (n=3, nn, va[n] = (n-1)^3 - va[n-1] - va[n-2]; ); va; \\ Michel Marcus, Mar 03 2023

STATUS

proposed

editing

#20 by Amiram Eldar at Fri Mar 03 03:18:54 EST 2023

STATUS

editing

proposed

Discussion

Fri Mar 03

03:49

Tamas Sandor Nagy: Many thanks for the program, Amiram.

#19 by Amiram Eldar at Fri Mar 03 03:18:52 EST 2023

MATHEMATICA

a[1] = 1; a[2] = 2; a[n_] := a[n] = (n - 1)^3 - a[n - 1] - a[n - 2]; Array[a, 45] (* Amiram Eldar, Mar 03 2023 *)

STATUS

proposed

editing