OFFSET
1,1
COMMENTS
The terms come frequently in runs of consecutive integers. In particular, all intervals [10^k, ..., 10^k+(10^k-1)/9-1], k >= 1, e.g., {10}, {100, ..., 110}, {1000, ..., 1110}, ..., are subsequences.
A342145 contains this as a subsequence.
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
EXAMPLE
9 is in the sequence because 9 + 10 = 19 shares a digit with 9.
No smaller number has this property: 0 + 1 = 1, ..., 8 + 9 = 17 do not share a digit with 1, ..., 8, respectively; nor does 11 + 12 = 23 share a digit with 11.
So the next term is 12, sharing the digit '2' with 12 + 13 = 25, but not 13 (13 + 14 = 27), nor 14 (14 + 15 = 29), but 15 shares again a digit with 15 + 16 = 31.
MATHEMATICA
Select[Range[200], Length[Intersection[IntegerDigits[#], IntegerDigits[ 2 #+1]]]> 0&] (* Harvey P. Dale, Dec 17 2021 *)
PROG
(PARI) select( is_A342146(n)=#setintersect(Set(digits(n)), Set(digits(2*n+1))), [0..199])
CROSSREFS
KEYWORD
nonn,base
AUTHOR
M. F. Hasler, Mar 01 2021
STATUS
approved