Search: id:A101918 Results 1-1 of 1 results found. %I A101918 %S A101918 1,1,1,1,1,1,1,1,1,0,1,2,3,4,5,6,7,7,6,4,1,3,8,14,21,28,34,38,39,36,28, %T A101918 14,7,35,69,107,146,182,210,224,217,182,113,6,140,322,532,756,973,1155, 1268, %U A101918 1274,1134,812,280,476,1449,2604,3872,5146,6280,7092,7372,6896,5447,2843, 1029 %V A101918 1,-1,1,-1,1,-1,1,-1,1,0,-1,2,-3,4,-5,6,-7,7,-6,4,-1,-3,8,-14,21,-28,34, -38,39,-36,28, %W A101918 -14,-7,35,-69,107,-146,182,-210,224,-217,182,-113,6,140,-322,532,-756, 973,-1155,1268, %X A101918 -1274,1134,-812,280,476,-1449,2604,-3872,5146,-6280,7092,-7372,6896,-5447, 2843,1029 %N A101918 G.f. satisfies: A(x) = 1/(1 + x*A(x^8)) and also the continued fraction: 1+x*A(x^9) = [1;1/x,1/x^8,1/x^64,1/x^512,...,1/x^(8^(n-1)),...]. %F A101918 G.f.: (1+x^7) / (1+x+x^8) (conjectured). - Ralf Stephan, May 17 2007 %o A101918 (PARI) {a(n)=local(A);A=1-x;for(i=1,n\8+1, A=1/(1+x*subst(A,x,x^8)+x*O(x^n))); polcoeff(A,n,x)} (PARI) {a(n)=local(M=contfracpnqn(concat(1, vector(ceil(log(n+1)/ log(8))+1,n,1/x^(8^(n-1)))))); polcoeff(M[1,1]/M[2,1]+x*O(x^(9*n+1)), 9*n+1)} %Y A101918 Cf. A101912-A101917. %Y A101918 Sequence in context: A066853 A141258 A117656 this_sequence A132125 A102672 A114955 %Y A101918 Adjacent sequences: A101915 A101916 A101917 this_sequence A101919 A101920 A101921 %K A101918 sign %O A101918 0,12 %A A101918 Paul D. Hanna (pauldhanna(AT)juno.com), Dec 20 2004 Search completed in 0.001 seconds