A136931 Numbers k such that k and k^2 use only the digits 0, 3, 4, 6 and 8.
0, 6, 8, 60, 80, 600, 800, 6000, 6638, 6808, 6844, 8000, 60000, 60406, 60688, 66380, 66808, 68080, 68440, 80000, 600000, 604060, 606880, 663800, 668080, 680800, 684400, 800000, 6000000, 6003406, 6004006, 6040600, 6068800, 6638000, 6680800, 6808000, 6844000, 8000000, 60000000, 60034060, 60040060, 60406000, 60688000, 66363008, 66380000
Offset: 1
Examples
683084686436344^2 = 466604688843838404646364086336.
Links
- Jonathan Wellons, Table of n, a(n) for n = 1..378
- J. Wellons, Tables of Shared Digits [archived]
Crossrefs
Programs
-
Mathematica
s={0,3,4,6,8}; Select[Range[0,10^6], SubsetQ[s, Sort[DeleteDuplicates[IntegerDigits[#]]]] && SubsetQ[s, Sort[DeleteDuplicates[IntegerDigits[#^2]]]] &] (* Stefano Spezia, Aug 11 2025 *)
Comments