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.
%I A340838 #5 Jan 23 2021 10:47:10 %S A340838 1,4,139,11928,1909787,491329088,185373016419,96425597012608, %T A340838 66139668570414571,57840395870803141632,62813828698519808489915, %U A340838 82933938539372018962724864,130828514220436815006398809563,243020960809424084526916839817216,525038425527430196237626528753654867 %N A340838 a(n) = (1/2) * Sum_{k>=0} (k*(k + n))^n / 2^k. %F A340838 a(n) = Sum_{k=0..n} binomial(n,k) * A000670(2*n-k) * n^k. %t A340838 Table[(1/2) Sum[(k (k + n))^n/2^k, {k, 0, Infinity}], {n, 0, 14}] %t A340838 Join[{1}, Table[(1/2) Sum[Binomial[n, k] HurwitzLerchPhi[1/2, k - 2 n, 0] n^k, {k, 0, n}], {n, 1, 14}]] %Y A340838 Cf. A000670, A098696, A249938, A292916, A340822. %K A340838 nonn %O A340838 0,2 %A A340838 _Ilya Gutkovskiy_, Jan 23 2021