cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A030175 When squared gives number composed of digits {1,2,3}.

Original entry on oeis.org

1, 11, 111, 36361, 363639, 461761, 3636361, 34815389, 362397739, 176412364139, 57637950363639, 3497458093147239, 56843832676142723489, 557963558954625926861
Offset: 1

Views

Author

Keywords

Crossrefs

Cf. A136808, A136809, ..., A137147: n and n^2 have digits {...}.
Cf. A277959^2 = A277946 and A277960^2 = A277947: squares whose largest digit is 2 resp. 3.

Programs

  • Mathematica
    Do[ If[ Union[ Join[{1, 2, 3}, IntegerDigits[n^2] ] ] == {1, 2, 3}, Print[n] ], {n, 0, 10^9}]
  • PARI
    lista(nn) = for(n=1, nn, if(setminus(vecsort(digits(n^2), , 8), [1, 2, 3])==[], print1(n, ", "))) \\ Iain Fox, Nov 16 2017

Formula

a(n)^2 = A030174(n). - M. F. Hasler, Nov 16 2017

Extensions

More terms from Patrick De Geest, Mar 01 2000
More terms from C. Ronaldo (aga_new_ac(AT)hotmail.com), Jan 14 2005
Offset corrected by Iain Fox, Nov 16 2017