A173100 a(1)=2, a(2)=2, a(n)=2*a(n-2)*a(n-1)-a(n-2)-a(n-1).

2, 2, 4, 10, 66, 1244, 162898, 405126082, 131988051722292, 106943604398142563191514, 28230555977340642743866391573263146370, 6038154820760673175690853635193471535603786459126013221470476

Offset

1,1

Links

Table of n, a(n) for n=1..12.

Mathematica

a=2; b=2; lst={a, b}; Do[c=2*a*b-a-b; AppendTo[lst, c]; a=b; b=c, {n, 12}]; lst

Crossrefs

Cf. A173093, A173094, A173096, A173097, A173098, A173099

Sequence in context: A006181 A366425 A322924 * A092635 A270549 A321204

Adjacent sequences: A173097 A173098 A173099 * A173101 A173102 A173103

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Feb 09 2010

Status

approved