|
|
A113507
|
|
Numbers whose square root in base 10 starts with 10 distinct digits.
|
|
3
|
|
|
1362, 1843, 2540, 4280, 5507, 6896, 14601, 15143, 17547, 18393, 20337, 22710, 23560, 25887, 27487, 30728, 32286, 32615, 33144, 34499, 37194, 43422, 46075, 46167, 47293, 47497, 56125, 58465, 58495, 60552, 60911, 62069, 62091, 65743
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
sqrt(1362) = 36.90528417...
|
|
MATHEMATICA
|
Do[If[Union@Take[RealDigits[s = Sqrt[k], 10, 20][[1]], 10] == Range[0, 9], Print[{k, N[s, 15]}]], {k, 10^5}]
Select[Range[75000], Sort[RealDigits[Sqrt[#], 10, 10][[1]]]==Range[0, 9]&] (* Harvey P. Dale, Dec 19 2015 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,easy,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|