|
|
A010915
|
|
Pisot sequence E(6,16), a(n) = floor( a(n-1)^2/a(n-2) + 1/2 ).
|
|
1
|
|
|
6, 16, 43, 116, 313, 845, 2281, 6157, 16619, 44858, 121081, 326823, 882164, 2381146, 6427213, 17348397, 46826965, 126395808, 341168818, 920886256, 2485665312, 6709332453, 18109896673, 48882412640, 131943892815, 356144263570, 961308127021, 2594772426806
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
FORMULA
|
Conjectured not to satisfy a linear recurrence.
|
|
MATHEMATICA
|
RecurrenceTable[{a[1]==6, a[2]==16, a[n]==Floor[a[n-1]^2/a[n-2]+1/2]}, a[n], {n, 30}] (* Harvey P. Dale, Jun 26 2011 *)
|
|
PROG
|
(PARI) pisotE(nmax, a1, a2) = {
a=vector(nmax); a[1]=a1; a[2]=a2;
for(n=3, nmax, a[n] = floor(a[n-1]^2/a[n-2]+1/2));
a
}
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|