A152739 Sqrt((even members of A118962)/2).
1, 2, 3, 4, 5, 4, 6, 5, 4, 7, 8, 7, 6, 5, 9, 8, 7, 6, 10, 8, 11, 10, 9, 8, 7, 12, 11, 9, 8, 13, 11
Offset: 1
Keywords
Crossrefs
Extensions
Edited by N. J. A. Sloane, Dec 13 2008
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.
A[s_Integer] := With[{s6 = StringPadLeft[ToString[s], 6, "0"]}, Cases[ Import["https://oeis.org/A" <> s6 <> "/b" <> s6 <> ".txt", "Table"], {, }][[All, 2]]]; A046086 = A@046086; A046087 = A@046087; a[n_] := A046087[[n]] - A046086[[n]]; a /@ Range[10000]; (* Jean-François Alcover, Mar 07 2020 *)
Comments