OFFSET
1,1
COMMENTS
Likely the same as A006443. - R. J. Mathar, Oct 13 2008
LINKS
V. A. Liskovets, Some easily derivable sequences, J. Integer Sequences, 3 (2000), #00.2.2.
FORMULA
MATHEMATICA
A[s_Integer] := With[{s6 = StringPadLeft[ToString[s], 6, "0"]}, Cases[ Import["https://oeis.org/A" <> s6 <> "/b" <> s6 <> ".txt", "Table"], {_, _}][[All, 2]]];
A006385 = A@006385;
A006384 = A@006384;
a /@ Range[17] (* Jean-François Alcover, Feb 21 2020 *)
CROSSREFS
KEYWORD
nonn,more
AUTHOR
N. J. A. Sloane, May 24 2000
STATUS
approved