login
A164699
Base 10 integers n such that n base 16 is a substring of n base 7.
0
1, 2, 3, 4, 5, 6, 1266212, 1315153, 54936934, 54937154, 54937155, 84956246, 84956257, 84956467, 84956677
OFFSET
1,2
EXAMPLE
a(7)=1266212 because 1266212 base 10 = 135224 base 16 = 13522403 base 7, and the string 135224 appears in 135522403.
MATHEMATICA
okQ[n_]:=Module[{idn16=IntegerDigits[n, 16], idn7=IntegerDigits[n, 7]}, MemberQ[Partition[ idn7, Length[idn16], 1], idn16]]; Select[ Range[85000000], okQ] (* Harvey P. Dale, Apr 29 2011 *)
CROSSREFS
Sequence in context: A004912 A292125 A330928 * A228050 A331561 A308070
KEYWORD
base,easy,nonn
AUTHOR
Gil Broussard, Aug 22 2009
STATUS
approved