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 A349089 #9 Apr 05 2022 17:08:38 %S A349089 0,1,2,6,24,121,726,5082,40656,365905,3659050,40249550,482994600, %T A349089 6278929801,87905017214,1318575258210,21097204131360,358652470233121, %U A349089 6455744464196178,122659144819727382,2453182896394547640,51516840824285500441,1133370498134281009702 %N A349089 a(n) = n! * Sum_{k=0..floor((n-1)/4)} 1 / (4*k+1)!. %F A349089 E.g.f.: (sin(x) + sinh(x)) / (2*(1 - x)). %F A349089 a(n) = floor(c * n!) for n > 0, where c = 1.008336089... = A334363. %t A349089 Table[n! Sum[1/(4 k + 1)!, {k, 0, Floor[(n - 1)/4]}], {n, 0, 22}] %t A349089 nmax = 22; CoefficientList[Series[(Sin[x] + Sinh[x])/(2 (1 - x)), {x, 0, nmax}], x] Range[0, nmax]! %Y A349089 Cf. A002627, A009628, A186763, A334363, A337728, A349088, A352660. %K A349089 nonn %O A349089 0,3 %A A349089 _Ilya Gutkovskiy_, Mar 25 2022