|
Search: id:A127678
|
|
|
| A127678 |
|
a(n) = numerator of b(n), where b(1) = 1, b(n+1) = (sum{k=1 to n} b(k))/product{j=1 to n} b(j). |
|
+0
2
|
|
| 1, 1, 2, 2, 3, 5, 7, 17, 39, 131, 241, 1843, 33951, 475103, 66624833, 17107028693, 33453912854619, 1200873381252944089, 200445185648334612665809, 14036199771684615424002710560757
(list; graph; listen)
|
|
|
OFFSET
|
1,3
|
|
|
LINKS
|
Leroy Quet, Home Page (listed in lieu of email address)
|
|
FORMULA
|
For n >= 4, b(n) = 1 +(b(n-1)-1)/b(n-2).
|
|
MATHEMATICA
|
f[l_List] := Append[l, Plus @@ l/Times @@ l]; Numerator[Nest[f, {1}, 20]] (*Chandler*)
|
|
CROSSREFS
|
Cf. A127679.
Sequence in context: A060699 A062724 A126024 this_sequence A114990 A157176 A111181
Adjacent sequences: A127675 A127676 A127677 this_sequence A127679 A127680 A127681
|
|
KEYWORD
|
easy,frac,nonn
|
|
AUTHOR
|
Leroy Quet Jan 23 2007
|
|
EXTENSIONS
|
Extended by Ray Chandler (rayjchandler(AT)sbcglobal.net), Feb 13 2007
|
|
|
Search completed in 0.002 seconds
|
