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.

A360175 a(n) = Sum_{k=0..n} (-1)^(n-k)*(n!/k!) * [x^n] (1 - exp(-LambertW(x*exp(-x))))^k.

This page as a plain text file.
%I A360175 #5 Jan 29 2023 21:02:30
%S A360175 1,1,6,53,647,10092,191915,4309769,111682044,3281731611,107860953795,
%T A360175 3921762633846,156322429050397,6779458454252941,317841794915501862,
%U A360175 16020304439710056785,863955306007083830051,49641711131738762890764,3027776406780183894833791,195382900651186641677702197
%N A360175 a(n) = Sum_{k=0..n} (-1)^(n-k)*(n!/k!) * [x^n] (1 - exp(-LambertW(x*exp(-x))))^k.
%F A360175 a(n) = Sum_{k=0..n} |A360176(n, k)|.
%p A360175 egf := k -> (1 - exp(-LambertW(x*exp(-x))))^k / k!:
%p A360175 ser := k -> series(egf(k), x, 22):
%p A360175 T := (n, k) -> (-1)^(n-k)*n!*coeff(ser(k), x, n):
%p A360175 seq(add(T(n, k), k = 0..n), n = 0..19);
%Y A360175 Cf. A360176.
%K A360175 nonn
%O A360175 0,3
%A A360175 _Peter Luschny_, Jan 29 2023