login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A247518 a(n) = a(n-1) * (11*a(n-1) - 16*a(n-2)) / (a(n-1) + 10*a(n-2)) with a(1) = 1, a(2) = 2. 2
1, 2, 1, -1, 3, -21, 651, 11067, 70091, 230299, 349163, 20539, -31349, 121307, -1158869, 314053499, 3606200523, 18517231899, 49530502251, 52454812347, -20635376629, 43663915099, -217519736917, 3068771480059, 127881095493451, 1094857900300187, 4611286015320811 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

G. C. Greubel, Table of n, a(n) for n = 1..500

FORMULA

0 = a(n)*(16*a(n+1) + 10*a(n+2)) + a(n+1)*(-11*a(n+1) + a(n+2)) for all n in Z.

a(n) = a(1-n) * 4^(2*n-1) for all n in Z.

a(n) = b(n+1) * b(n) * b(n-1) * b(n-2) for all n in Z where b = A247487.

MATHEMATICA

RecurrenceTable[{a[n] == a[n - 1]*(11*a[n - 1] - 16*a[n - 2])/(a[n - 1] + 10*a[n - 2]), a[1] == 1, a[2] == 2}, a, {n, 1, 50}] (* G. C. Greubel, Aug 05 2018 *)

PROG

(PARI) {a(n) = my(A, t=1); if( n<1, t = 4^(2*n - 1); n = 1-n); t * if( n<3, n, A = vector(n, k, k); for(k=3, n, A[k] = A[k-1] * (11*A[k-1] - 16*A[k-2]) / (A[k-1] + 10*A[k-2])); A[n])};

(MAGMA) I:=[1, 2]; [n le 2 select I[n] else Self(n-1)*(11*Self(n-1) - 16*Self(n-2))/(Self(n-1) + 10*Self(n-2)): n in [1..30]]; // G. C. Greubel, Aug 05 2018

(GAP) a:=[1, 2];; for n in [3..30] do a[n]:=a[n-1]*(11*a[n-1]-16*a[n-2])/(a[n-1]+10*a[n-2]); od; a; # Muniru A Asiru, Aug 05 2018

CROSSREFS

Cf. A247487.

Sequence in context: A134357 A049258 A228832 * A078076 A010247 A087605

Adjacent sequences:  A247515 A247516 A247517 * A247519 A247520 A247521

KEYWORD

sign

AUTHOR

Michael Somos, Sep 18 2014

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified February 25 05:01 EST 2020. Contains 332217 sequences. (Running on oeis4.)