|
| |
|
|
A015460
|
|
q-Fibonacci numbers for q=3.
|
|
6
|
|
|
|
0, 1, 1, 4, 13, 121, 1174, 30577, 886423, 67758322, 5883579625, 1339570631551, 348759063908176, 237649677731273173, 185582515360156234789, 379075929664916795231668, 888014493839316022947740209
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
0,4
|
|
|
LINKS
|
Vincenzo Librandi, Table of n, a(n) for n = 0..90
|
|
|
FORMULA
|
a(n) = a(n-1) + 3^(n-2) a(n-2).
Associated constant: C_3=lim n-->infty a(n)*a(n-2)/a(n-1)^2 =1.147262608254535257774121586.... - Benoit Cloitre, Aug 30 2003
|
|
|
MATHEMATICA
|
RecurrenceTable[{a[0]==0, a[1]==1, a[n]==a[n-1]+a[n-2]*3^(n-2)}, a, {n, 30}] (* Vincenzo Librandi, Nov 08 2012 *)
|
|
|
PROG
|
(MAGMA) [0] cat[n le 2 select 1 else Self(n-1) + Self(n-2)*(3^(n-2)): n in [1..20]]; // Vincenzo Librandi, Nov 08 2012
|
|
|
CROSSREFS
|
Cf. A015459.
Sequence in context: A222764 A058014 A045886 * A121813 A197897 A203380
Adjacent sequences: A015457 A015458 A015459 * A015461 A015462 A015463
|
|
|
KEYWORD
|
nonn,easy
|
|
|
AUTHOR
|
Olivier Gérard
|
|
|
STATUS
|
approved
|
| |
|
|