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 A337730 #8 Sep 17 2020 20:31:52 %S A337730 1,841,6660721,218205219961,20298322381652065,4313799472548696853801, %T A337730 1816972337837511114820981201,1372104830641374893468212163747161, %U A337730 1724241814377177346127894133451232399041,3403694723384093133512770088891935585284510985 %N A337730 a(n) = (4*n+3)! * Sum_{k=0..n} 1 / (4*k+3)!. %F A337730 E.g.f.: (1/2) * (sinh(x) - sin(x)) / (1 - x^4) = x^3/3! + 841*x^7/7! + 6660721*x^11/11! + 218205219961*x^15/15! + ... %F A337730 a(n) = floor(c * (4*n+3)!), where c = (sinh(1) - sin(1)) / 2 = A334365. %t A337730 Table[(4 n + 3)! Sum[1/(4 k + 3)!, {k, 0, n}], {n, 0, 9}] %t A337730 Table[(4 n + 3)! SeriesCoefficient[(1/2) (Sinh[x] - Sin[x])/(1 - x^4), {x, 0, 4 n + 3}], {n, 0, 9}] %t A337730 Table[Floor[(1/2) (Sinh[1] - Sin[1]) (4 n + 3)!], {n, 0, 9}] %o A337730 (PARI) a(n) = (4*n+3)!*sum(k=0, n, 1/(4*k+3)!); \\ _Michel Marcus_, Sep 17 2020 %Y A337730 Cf. A000522, A051396, A051397, A087350, A330045, A334365, A337725, A337726, A337727, A337728, A337729. %K A337730 nonn %O A337730 0,2 %A A337730 _Ilya Gutkovskiy_, Sep 17 2020