OFFSET
1,2
LINKS
Andrew Howroyd, Table of n, a(n) for n = 1..50
V. A. Liskovets, Some easily derivable sequences, J. Integer Sequences, 3 (2000), #00.2.2.
FORMULA
MATHEMATICA
nn = 15; g[z] :=Sum[(1 + 2 u)^Binomial[n, 2] z^n/n!, {n, 0, nn}]; Drop[
Map[Total[#[[2 ;; Binomial[nn, 2] + 1 ;; 2]]]&, Range[0, nn]!CoefficientList[
Series[Log[g[z]], {z, 0, nn}], {z, u}]], 1] (* Geoffrey Critzer, Jul 28 2016 *)
PROG
(PARI) seq(n)={my(A=O(x*x^n)); Vec(serlaplace(log(sum(k=0, n, 3^binomial(k, 2)*x^k/k!) + A) - log(cos(x + A) + sin(x + A)))/2, -n)} \\ Andrew Howroyd, Sep 10 2018
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, May 24 2000
EXTENSIONS
More terms from Vladeta Jovovic, Mar 11 2003
STATUS
approved