Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).
%I #10 Aug 29 2024 18:32:16
%S 1,1,2,6,42,162,634,2726,9330,37814,186034,623934,2370354,10505738,
%T 37417658,113248562,738713250,2753640290,7522970666,46292418830,
%U 146514514914,496491671978,2915741154442,9464309679414,39098814277474,173211426442282,652232674100690
%N Alternating row sum of row 2n in A238453.
%C The alternating row sums of odd rows in A238453 are 0.
%H Tom Edgar, <a href="http://www.emis.de/journals/INTEGERS/papers/o62/o62.Abstract.html">Totienomial Coefficients</a>, INTEGERS, 14 (2014), #A62.
%F a(n) = Sum_{k=0..2n}(-1)^k*A238453(2n,k).
%o (Sage)
%o P=[euler_phi(i) for i in [0..100]]
%o Tr=[[prod(P[1:n+1])/(prod(P[1:k+1])*prod(P[1:(n-k)+1])) for k in [0..n]] for n in [0..len(P)-1]]
%o L=[sum((-1)^i*x[i] for i in [0..len(x)-1]) for x in Tr]
%o print([y for y in L if y!=0])
%Y Cf. A000010, A238453, A272079.
%K nonn
%O 0,3
%A _Tom Edgar_, Apr 21 2016