OFFSET
1,2
COMMENTS
The terms come frequently in runs of consecutive integers. In particular, all intervals [10^k-1, ..., 10^k+(10^k-1)/9], k >= 1, e.g., {9, 10, 11}, {99, 100, ..., 111}, {999, ..., 1111}, ..., are subsequences. For k > 1, the actual intervals are strictly larger than that, to the left: instead of 1, one can subtract 5*(10^(k-1)-1)/9.
A342145 contains this as a subsequence.
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..5000
MATHEMATICA
Select[Range[0, 150], Length[Intersection[IntegerDigits[2#+1], IntegerDigits[#+1]]]>0&] (* Harvey P. Dale, Dec 04 2024 *)
PROG
(PARI) select( is_A342147(n)=#setintersect(Set(digits(n+1)), Set(digits(2*n+1))), [0..199])
CROSSREFS
KEYWORD
nonn,base
AUTHOR
M. F. Hasler, Mar 01 2021
STATUS
approved