|
| |
|
|
A088655
|
|
Limiting infinite Pisot inverse roots as positive integers.
|
|
0
| |
|
|
4, 14, 55, 205, 777, 2937, 11118, 42072, 159220, 602554, 2280320, 8629690, 32658395, 123593159, 467728718, 1770083028, 6698741833, 25350868523, 95938394252, 363071406534, 1374015557281, 5199855228676, 19678448512407
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| Infinite Pisot: Product[ x-((2-E)/E)^n,{n,1,Infinity}]*(x-E/2)=0
|
|
|
FORMULA
| a(n) =Floor[Abs[(E/(2-E))^n]]
|
|
|
MATHEMATICA
| digits=40 a = Table[Floor[Abs[(E/(2-E))^n]], {i, 1, digits}]
|
|
|
CROSSREFS
| Sequence in context: A180142 A045501 A162481 * A149490 A143406 A132837
Adjacent sequences: A088652 A088653 A088654 * A088656 A088657 A088658
|
|
|
KEYWORD
| nonn,uned
|
|
|
AUTHOR
| Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Nov 21 2003
|
| |
|
|
