A045872 a(n) = A006792(n)/2.
1, 0, 0, 0, 0, 2, 4, 0, 2, 0, 41, 0, 0, 0, 56, 0, 66, 0
Offset: 10
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.
A006792 = Join[Array[0&, 10], Cases[Import["https://oeis.org/A006792/b006792.txt", "Table"], {, }][[All, 2]]]; A006799 = Cases[Import["https://oeis.org/A006799/b006799.txt", "Table"], {, }][[All, 2]]; a[n_] := A006799[[n]] - A006792[[n+1]]; Array[a, 47] (* Jean-François Alcover, Sep 05 2019 *)
# See M. Farrokhi Github repository for a GAP program.
Comments