OFFSET
1,2
LINKS
Robert Israel, Table of n, a(n) for n = 1..3323
J.-L. Baril, Avoiding patterns in irreducible permutations, Discrete Mathematics and Theoretical Computer Science, Vol 17, No 3 (2016). See Table 4.
FORMULA
G.f.: ((1 + 2*x)*sqrt(1 - 4*x^2) - 1 + 4*x^2 - 2*x^3 + 2*x^4 + 4*x^5 )/((1 - 2*x)*(2*x^4 + 1 + sqrt(1 - 4*x^2))). - From Baril, corrected by Robert Israel, Jul 23 2020.
MAPLE
f:= gfun:-rectoproc({(20 + 4*n)*a(n) + (-54 - 8*n)*a(1 + n) + (25 + 3*n)*a(n + 2) + (64 + 6*n)*a(n + 3) + (11 + 3*n)*a(n + 4) + (-67 - 9*n)*a(n + 5) + (45 + 7*n)*a(n + 6) + (10 - 2*n)*a(n + 7) + (2*n + 16)*a(n + 8) + (51 + 5*n)*a(n + 9) + (-9 - n)*a(n + 10) + (-13 - n)*a(n + 11), a(0) = 0, a(1) = 1, a(2) = 3, a(3) = 4, a(4) = 9, a(5) = 16, a(6) = 31, a(7) = 58, a(8) = 112, a(9) = 211, a(10) = 411, a(11) = 781}, a(n), remember):
map(f, [$1..50]); # Robert Israel, Jul 23 2020
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Nov 09 2016
EXTENSIONS
More terms from Lars Blomberg, Nov 11 2016
STATUS
approved