

A137079


Numbers k such that k and k^2 use only the digits 2, 3, 5 and 6.


1




OFFSET

1,1


COMMENTS

Generated with DrScheme.


LINKS

Table of n, a(n) for n=1..8.
J. Wellons, Tables of Shared Digits


EXAMPLE

2352365325^2 = 5533622622262355625.


MATHEMATICA

fQ[n_] := Block[{d = DigitCount@ n}, Total@ Delete[d, {{2}, {3}, {5}, {6}}] == 0]; Select[Range@ 100000, fQ@ # && fQ[#^2] &] (* Michael De Vlieger, Apr 29 2015 *)


PROG

(Python)
from itertools import product
A137079_list = [int(''.join(a)+b) for l in range(10) for a in product('2356', repeat = l) for b in ('5', '6') if set(str(int(''.join(a)+b)**2)) <= {'2', '3', '5', '6'}]
# Chai Wah Wu, Apr 29 2015


CROSSREFS

Sequence in context: A003226 A088834 A137081 * A163658 A121180 A022165
Adjacent sequences: A137076 A137077 A137078 * A137080 A137081 A137082


KEYWORD

base,nonn


AUTHOR

Jonathan Wellons (wellons(AT)gmail.com), Jan 22 2008


STATUS

approved



