cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A154413 a(n) = A006551(n) - A018224(n).

This page as a plain text file.
%I A154413 #8 Sep 17 2016 00:30:16
%S A154413 0,0,0,2,30,202,2016,14394,151290,1294478,15660744,162298842,
%T A154413 2274318228,27968231436,447527038848,6382757516250,114890215021650,
%U A154413 1865385066804550,37307710791708600,679562209260462054
%N A154413 a(n) = A006551(n) - A018224(n).
%H A154413 G. C. Greubel, <a href="/A154413/b154413.txt">Table of n, a(n) for n = 0..300</a>
%F A154413 a(n) = Eulerian[n,Floor[n/2]] - Binomial[n,Floor[n/2]]^2.
%t A154413 t[n_, k_] = Sum[(-1)^j Binomial[n + 1, j](k + 1 - j)^n, {j, 0, k + 1}];
%t A154413 a0 = Table[t[n, Floor[n/2]], {n, 1, 30}];
%t A154413 b0 = Table[Binomial[n, Floor[(n)/2]]^2, {n, 0, 29}];
%t A154413 a=a0-b0
%Y A154413 Cf. A006551, A018224.
%K A154413 nonn
%O A154413 0,4
%A A154413 _Roger L. Bagula_, Jan 09 2009