|
| |
|
|
A158304
|
|
Numbers n such that n^2 contains no digit bigger than 4.
|
|
4
| |
|
|
0, 1, 2, 10, 11, 12, 18, 20, 21, 32, 38, 48, 49, 100, 101, 102, 110, 111, 120, 149, 152, 179, 180, 182, 200, 201, 210, 318, 320, 321, 332, 338, 348, 351, 361, 362, 380, 451, 452, 462, 480, 482, 490, 548, 549, 649, 1000, 1001, 1002, 1010, 1011, 1012, 1020
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,3
|
|
|
LINKS
| Erich Friedman, What's Special About This Number?
|
|
|
MAPLE
| Contribution from R. J. Mathar (mathar(AT)strw.leidenuniv.nl), May 23 2010: (Start)
A158304 := proc(n) option remember; if n= 1 then 0; else for a from procname(n-1)+1 do d := convert(convert(a^2, base, 10), set) ; if max(op(d)) <= 4 then return a; end if; end do; end if; end proc:
seq(A158304(n), n=1..100) ; (End)
|
|
|
CROSSREFS
| Cf. A158082, A136810.
Sequence in context: A165451 A121717 A106518 * A007089 A159952 A136820
Adjacent sequences: A158301 A158302 A158303 * A158305 A158306 A158307
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| N. J. A. Sloane (njas(AT)research.att.com), May 23 2010
|
|
|
EXTENSIONS
| Extended by several correspondents, May 24 2010
|
| |
|
|
