A001165 Position of first even digit after decimal point in sqrt(n).

1, 1, 3, 1, 1, 1, 1, 1, 1, 2, 3, 1, 1, 2, 1, 1, 2, 1, 3, 1, 2, 1, 4, 1, 1, 1, 3, 1, 2, 1, 2, 1, 2, 1, 3, 1, 1, 2, 1, 2, 1, 1, 4, 1, 2, 2, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 4, 1, 1, 2, 2, 1, 2, 2, 1, 1, 2, 1, 1, 7, 3, 1, 1, 2, 1, 1, 3, 2, 1, 1, 2

Offset

1,3

Links

T. D. Noe, Table of n, a(n) for n = 1..1000 (corrected by Sean A. Irvine, April 17 2019)

Mathematica

Flatten[Table[First[Position[Rest[RealDigits[Sqrt[n], 10, 20][[1]]], _?(EvenQ[#]&)]], {n, 100}]] (* Harvey P. Dale, Oct 27 2011 *)

Crossrefs

Sequence in context: A223728 A030596 A031277 * A137420 A134866 A340085

Adjacent sequences: A001162 A001163 A001164 * A001166 A001167 A001168

Keyword

nonn,base

Author

Howard Givner

Status

approved