A277948 Squares whose largest decimal digit is 4.

4, 144, 324, 400, 441, 1024, 1444, 2304, 2401, 10404, 14400, 23104, 32041, 32400, 33124, 40000, 40401, 44100, 101124, 102400, 103041, 110224, 114244, 121104, 131044, 144400, 203401, 204304, 213444, 230400, 232324, 240100, 300304, 301401, 421201, 1004004

Offset

1,1

Comments

A subsequence of A158082, in turn a subsequence of A000290.

Links

Colin Barker, Table of n, a(n) for n = 1..1000

Formula

a(n) = A277961(n)^2. - M. F. Hasler, Nov 12 2017

Intersection of A000290 and A277966. - M. F. Hasler, Nov 15 2017

Mathematica

Select[Range[1100]^2, Max[IntegerDigits[#]]==4&] (* Harvey P. Dale, Jul 01 2017 *)

Prog

(PARI) L=List(); for(n=1, 10000, if(vecmax(digits(n^2))==4, listput(L, n^2))); Vec(L)
(Magma) [n^2: n in [1..1000000] | Maximum(Intseq(n^2)) eq 4]; // Vincenzo Librandi, Nov 06 2016

Crossrefs

Cf. A000290 (the squares).

Cf. A277961 (square roots of these terms).

Cf. A277946, A277947, A295015, ..., A295019 (analog for largest digit = 2, 3, 5, ..., 9).

Cf. A058412, A058411, ..., A058474 and A136808, A136809, ..., A137147 for other restrictions on digits of squares.

Sequence in context: A225133 A122422 A307703 * A083688 A053899 A058414

Adjacent sequences: A277945 A277946 A277947 * A277949 A277950 A277951

Keyword

nonn,base

Author

Colin Barker, Nov 05 2016

Status

approved