OFFSET
0,4
MATHEMATICA
a[n_]:=Part[ResourceFunction["OEISSequence"]["A000798"], n+1]-Part[ResourceFunction["OEISSequence"]["A001035"], n+1]; Array[a, 18, 0] (* Stefano Spezia, Sep 08 2024 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Firdous Ahmad Mala, Sep 08 2024
STATUS
approved