|
%I #20 Oct 12 2017 03:36:34
%S 1,2,4,8,13,21,33,52,81,125,193,297,457,702,1078,1655,2540,3898,5981,
%T 9177,14080,21602,33142,50846,78007,119676,183603,281677,432138,
%U 662969,1017100,1560393,2393890,3672606,5634358,8643995,13261253,20344855,31212218,47884467
%N Number of binary strings of length n with no substrings equal to 0000, 0010, or 0111.
%H Alois P. Heinz, <a href="/A164420/b164420.txt">Table of n, a(n) for n = 0..2000</a> (terms n=4..500 from R. H. Hardin)
%H <a href="/index/Rec#order_06">Index entries for linear recurrences with constant coefficients</a>, signature (1,1,0,0,0,-1).
%F G.f.: (x+1)*(x^3+x^2+1)/((x-1)*(x^5+x^4+x^3+x^2-1)). - _R. J. Mathar_, Dec 01 2011
%t CoefficientList[Series[(x + 1) (x^3 + x^2 + 1)/((x - 1) (x^5 + x^4 + x^3 + x^2 - 1)), {x, 0, 39}], x] (* _Michael De Vlieger_, Oct 11 2017 *)
%K nonn,easy
%O 0,2
%A _R. H. Hardin_, Aug 14 2009
%E Edited by _Alois P. Heinz_, Oct 09 2017
|
