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 A340451 #5 Jan 13 2021 11:48:05 %S A340451 1,1,2,13,98,721,7682,165313,4816898,154732801,7052328962, %T A340451 587435092993,67748952539138,9011561121239041,1692739935456460802, %U A340451 557257804202631217153,255875811615404841762818,138681207656726645785559041,105975684493162347867458764802 %N A340451 E.g.f.: Sum_{n>=0} x^n * cosh(2^n*x) / n!. %C A340451 a(n) = A047863(n) - A340452(n) for n >= 0, in which A047863 gives the number of labeled graphs with 2-colored nodes when connected only to nodes of a different color. %F A340451 E.g.f.: Sum_{n>=0} x^n * cosh(2^n*x) / n!. %F A340451 E.g.f.: Sum_{n>=0} x^(2*n) * exp(4^n*x) / (2*n)!. %e A340451 E.g.f.: A(x) = 1 + x + 2*x^2/2! + 13*x^3/3! + 98*x^4/4! + 721*x^5/5! + 7682*x^6/6! + 165313*x^7/7! + 4816898*x^8/8! + 154732801*x^9/9! + ... %e A340451 where %e A340451 A(x) = cosh(x) + x*cosh(2*x) + x^2*cosh(2^2*x)/2! + x^3*cosh(2^3*x)/3! + x^4*cosh(2^4*x)/4! + x^5*cosh(2^5*x)/5! + ... %e A340451 also %e A340451 A(x) = exp(x) + x^2*exp(2^2*x)/2! + x^4*exp(2^4*x)/4! + x^6*exp(2^6*x)/6! + x^8*exp(2^8*x)/8! + ... %o A340451 (PARI) {a(n) = my(A = sum(m=0, n, x^m/m! * cosh(2^m*x +x*O(x^n)) )); n!*polcoeff(A, n)} %o A340451 for(n=0, 20, print1(a(n), ", ")) %o A340451 (PARI) {a(n) = my(A = sum(m=0, n\2, x^(2*m)/(2*m)! * exp(2^(2*m)*x +x*O(x^n)) )); n!*polcoeff(A, n)} %o A340451 for(n=0, 20, print1(a(n), ", ")) %Y A340451 Cf. A047863, A172388, A340452. %K A340451 nonn %O A340451 0,3 %A A340451 _Paul D. Hanna_, Jan 12 2021