A164699 Base 10 integers n such that n base 16 is a substring of n base 7.

1, 2, 3, 4, 5, 6, 1266212, 1315153, 54936934, 54937154, 54937155, 84956246, 84956257, 84956467, 84956677

Offset

1,2

Links

Table of n, a(n) for n=1..15.

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

Adjacent sequences: A164696 A164697 A164698 * A164700 A164701 A164702

Keyword

base,easy,nonn

Author

Gil Broussard, Aug 22 2009

Status

approved