|
|
A069086
|
|
Treated as strings, n begins with Floor(sqrt(n)).
|
|
0
|
|
|
1, 80, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 9800, 9900, 9901, 9902, 9903, 9904, 9905, 9906, 9907, 9908, 9909, 9910, 9911, 9912, 9913, 9914, 9915, 9916, 9917, 9918, 9919, 9920, 9921, 9922, 9923, 9924
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
EXAMPLE
|
9938 begins with 99 = Floor(sqrt(9938)), so 9938 is a term of the sequence.
|
|
MATHEMATICA
|
r = {}; Do[m = StringPosition[ToString[n], ToString[Floor[Sqrt[n]]]]; If[m != {}, If[m[[1]][[1]] == 1, r = Append[r, n]]], {n, 1, 10^4}]; r
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|