A034102 Fractional part of square root of a(n) starts with digit 6.

7, 13, 22, 32, 44, 58, 59, 74, 75, 93, 94, 113, 114, 135, 136, 159, 160, 161, 185, 186, 187, 214, 215, 216, 244, 245, 246, 276, 277, 278, 310, 311, 312, 313, 346, 347, 348, 349, 385, 386, 387, 388, 425, 426, 427, 428, 467, 468, 469, 470, 511, 512, 513, 514

Offset

1,1

Links

Table of n, a(n) for n=1..54.

Mathematica

dp6Q[n_]:=Module[{srn=Sqrt[n], rdn, d}, rdn=RealDigits[srn, 10, 10]; If[ !IntegerQ[srn], d=rdn[[2]]+1, d=1]; !IntegerQ[srn]&&rdn[[1, d]]==6]; Select[Range[600], dp6Q] (* Harvey P. Dale, May 18 2012 *)

Crossrefs

Cf. A034112.

Sequence in context: A288655 A124192 A335277 * A034112 A236312 A301691

Adjacent sequences: A034099 A034100 A034101 * A034103 A034104 A034105

Keyword

nonn,easy,base

Author

Patrick De Geest, Sep 15 1998

Status

approved