A144564 - OEIS

%I #19 May 06 2024 12:37:10

%S 1,101,10101,1011101,101111101,10111111101,1011111111101,

%T 101111111111101,10111111111111101,1011111111111111101,

%U 101111111111111111101,10111111111111111111101,1011111111111111111111101,101111111111111111111111101,10111111111111111111111111101

%N Bisection of A147757.

%H <a href="/index/Rec#order_02">Index entries for linear recurrences with constant coefficients</a>, signature (101,-100).

%F G.f.: x*(1+10*x)*(100*x^2-10*x+1)/((100*x-1)*(x-1)). - _R. J. Mathar_, Aug 24 2011

%e n ...... a(n)

%e 1 ....... 1

%e 2 ...... 101

%e 3 ..... 10101

%e 4 .... 1011101

%e 5 ... 101111101

%t Rest[CoefficientList[Series[x(1+10x)(100x^2-10x+1)/((100x-1)(x-1)),{x,0,20}],x]] (* or *) Join[{1,101},Table[FromDigits[Join[{1,0},PadRight[ {},2n+1,1],{0,1}]],{n,0,20}]] (* _Harvey P. Dale_, Dec 26 2014 *)

%Y Cf. A135577, A138120, A138146, A147757, A152756.

%K easy,nonn,base

%O 1,2

%A _Omar E. Pol_, Dec 14 2008