%I A147660
%S A147660 1,1,2,3,5,8,13,21,34,54,87,140,225,362,582,936,1505,2420,3892,6259,
%T A147660 10065,16186,26029,41858,67313,108248,174077,279938,450176,723941,
%U A147660 1164190,1872167,3010685,4841568,7785863,12520667,20134840,32379408
%N A147660 Coefficient expansion of toral of inverse of low ratio (1.6081283851873882) 
               Pisot Polynomial: a(n)=Coefficient_Expansion(1/( -1 + x^2 - x^9 - 
               x^10 + x^11)).
%C A147660 The next 1 + x^2 - x^10 - x^11 + x^12, is not Pisot, so x^11 is the limit 
               that sequence of polynomials below the Golden mean ratio.
%F A147660 a(n)=Coefficient_Expansion(1/( -1 + x^2 - x^9 - x^10 + x^11)).
%t A147660 f[x_] = -1 + x^2 - x^9 - x^10 + x^11; g[x] = ExpandAll[x^11*f[1/x]]; 
               a = Table[SeriesCoefficient[Series[1/g[x], {x, 0, 50}], n], {n, 0, 
               50}]
%Y A147660 Sequence in context: A013986 A121343 A023439 this_sequence A013987 A023440 
               A077373
%Y A147660 Adjacent sequences: A147657 A147658 A147659 this_sequence A147661 A147662 
               A147663
%K A147660 nonn
%O A147660 0,3
%A A147660 Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Nov 09 2008