[go: up one dir, main page]

login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

Revision History for A042626 (Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing entries 1-10 | older changes
Numerators of continued fraction convergents to sqrt(843).
(history; published version)
#17 by Charles R Greathouse IV at Thu Sep 08 08:44:55 EDT 2022
PROG

(MAGMAMagma) I:=[29, 842, 48865, 1417927]; [n le 4 select I[n] else 1684*Self(n-2)-Self(n-4): n in [1..30]]; // Vincenzo Librandi, Nov 30 2013

Discussion
Thu Sep 08
08:44
OEIS Server: https://oeis.org/edit/global/2944
#16 by Ray Chandler at Sat Mar 18 17:38:30 EDT 2017
STATUS

editing

approved

#15 by Ray Chandler at Sat Mar 18 17:38:28 EDT 2017
LINKS

<a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (0, 1684, 0, -1).

STATUS

approved

editing

#14 by Charles R Greathouse IV at Sat Jun 13 00:49:46 EDT 2015
LINKS

<a href="/index/Rec">Index to sequences with entries for linear recurrences with constant coefficients</a>, signature (0,1684,0,-1).

Discussion
Sat Jun 13
00:49
OEIS Server: https://oeis.org/edit/global/2439
#13 by Charles R Greathouse IV at Fri Jun 12 15:24:30 EDT 2015
LINKS

<a href="/index/Rea#recLCCRec">Index to sequences with linear recurrences with constant coefficients</a>, signature (0,1684,0,-1).

Discussion
Fri Jun 12
15:24
OEIS Server: https://oeis.org/edit/global/2436
#12 by Ralf Stephan at Sat Nov 30 03:59:20 EST 2013
STATUS

reviewed

approved

#11 by Bruno Berselli at Sat Nov 30 03:27:33 EST 2013
STATUS

proposed

reviewed

#10 by Bruno Berselli at Sat Nov 30 03:27:27 EST 2013
STATUS

editing

proposed

#9 by Bruno Berselli at Sat Nov 30 03:27:17 EST 2013
MATHEMATICA

Numerator[Convergents[Sqrt[843], 30]] (* or *) CoefficientList[Series[(29 + 842 x + 29 x^2 - x^3)/(1 - 1684 x^2 + x^4), {x, 0, 30}], x] (* Vincenzo Librandi, Nov 30 2013 *)

PROG

(MAGMA) I:=[29, 842, 48865, 1417927]; [n le 4 select I[n] else 1684*Self(n-2)-Self(n-4): n in [1..30]]; // Vincenzo Librandi, Nov 30 2013

STATUS

proposed

editing

#8 by Vincenzo Librandi at Sat Nov 30 01:26:18 EST 2013
STATUS

editing

proposed