A164700 Base 10 integers n such that n base 7 is a substring of n base 3.

0, 1, 2, 357, 358, 359, 449, 450, 2417, 2450, 4901, 5146, 34056, 34301, 36752, 39202, 39207, 151326, 153777, 154022, 156473, 156506, 156751, 6005594, 6605901, 12476003, 12490737, 12492410, 12505208, 12506909, 12622759, 13213405

Offset

1,3

Links

Zak Seidov, Table of n, a(n) for n = 1..99

Example

a(8)=2417 because 2417 base 10 = 10022 base 7 = 10022112 base 3, and the string 10022 appears in 10022112.

Mathematica

Select[Range[0, 133*10^5], SequenceCount[IntegerDigits[#, 3], IntegerDigits[ #, 7]]>0&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Dec 01 2018 *)

Crossrefs

Sequence in context: A278926 A187523 A172860 * A230688 A325629 A362476

Adjacent sequences: A164697 A164698 A164699 * A164701 A164702 A164703

Keyword

base,easy,nonn

Author

Gil Broussard, Aug 22 2009

Extensions

More terms from Zak Seidov, Aug 23 2009

Status

approved