OFFSET
0,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..2000
M. A. Nyblom, Counting Palindromic Binary Strings Without r-Runs of Ones, J. Int. Seq. 16 (2013) #13.8.7, P_6(n).
Index entries for linear recurrences with constant coefficients, signature (0,1,0,1,0,1,0,1,0,1,0,1).
FORMULA
G.f.: -(1+x+x^2)*(x^2-x+1)*(x^7+2*x+1)/(-1+x^2+x^4+x^6+x^8+x^10+x^12).
MATHEMATICA
LinearRecurrence[{0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1}, {1, 2, 2, 4, 4, 8, 7, 15, 14, 30, 28, 60}, 50] (* Vincenzo Librandi, May 20 2025 *)
PROG
(Magma) m:=50; R<x>:=PowerSeriesRing(Integers(), m); Coefficients(R!(-(1+x+x^2)*(x^2-x+1)*(x^7+2*x+1)/(-1+x^2+x^4+x^6+x^8+x^10+x^12))); // Vincenzo Librandi, May 20 2025
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
R. J. Mathar, Mar 28 2025
STATUS
approved
