|
|
A084677
|
|
Position of the first zero in the decimal expansion of sqrt(n).
|
|
0
|
|
|
0, 2, 14, 5, 2, 5, 17, 11, 16, 2, 10, 10, 6, 3, 36, 12, 2, 6, 7, 13, 37, 16, 4, 26, 52, 2, 2, 12, 6, 9, 11, 13, 16, 14, 4, 5, 2, 2, 8, 18, 10, 3, 4, 12, 10, 3, 20, 9, 6, 2, 2, 48, 6, 4, 49, 11, 32, 13, 9, 15, 19, 4, 5, 21, 2, 2, 5, 24, 17, 3, 6, 19, 16, 5, 3, 4, 11, 17, 7, 19, 9, 2, 2, 4, 16, 19
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
EXAMPLE
|
sqrt(24) = 4.8989794855663561963945681494117827839318949613133402, first zero is at position 52.
|
|
MATHEMATICA
|
Join[{0}, Table[Position[RealDigits[Sqrt[n], 10, 100][[1]], 0, 1, 1], {n, 100}]// Flatten] (* Harvey P. Dale, Jan 28 2021 *)
|
|
PROG
|
(PARI) \\ zeros in sqrt(p) where p is prime.
frootp(n) = default(realprecision, 100); forprime(x=2, n, for(x=0, n, r = sqrt(x); print(x" "r); v = Vec(Str(r)); c=-1; for(y=1, 100, c++; if(v[y] == "0", print1(c", "); break))))
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|