login
A241178
Numbers n such that there are exactly three numbers m with m + (some digit of m) = n.
12
14, 16, 18, 20, 22, 26, 28, 30, 34, 38, 40, 42, 44, 46, 50, 52, 56, 58, 62, 64, 66, 68, 70, 74, 78, 80, 82, 86, 88, 90, 92, 94, 100, 101, 103, 105, 107, 110, 114, 116, 118, 120, 122, 124, 136, 142, 148, 152, 154, 160, 162, 176, 182, 184, 192, 196, 198, 203, 205, 207, 210, 212, 214, 222, 226, 228, 230, 232, 234, 236
OFFSET
1,1
COMMENTS
The numbers 14, 114, 1114, ..., 111...114, ... are terms of the sequence. - Marius A. Burtea, Feb 18 2020
REFERENCES
Eric Angelini, Posting to Sequence Fans Mailing List, Apr 20 2014.
LINKS
EXAMPLE
14 = 7 + 7 = 12 + 2 = 13 + 1.
28 = 19 + 9 = 24 + 4 = 26 + 2.
MAPLE
See A241177.
MATHEMATICA
A241178[n_] := Module[{m, c = 0},
Do[c = c + Count[m + Union[IntegerDigits[m]], n], {m, 0, n}]; c];
Select[Range[0, 236], A241178[#] == 3 &] (* Robert Price, Mar 20 2019 *)
PROG
(Magma) f:=func<n, m|exists(c){a:a in Intseq(m)|m+a eq n }>; [k:k in [11..236]| #[m:m in [1..k]| f(k, m)] eq 3]; // Marius A. Burtea, Feb 18 2020
CROSSREFS
KEYWORD
nonn,base
AUTHOR
N. J. A. Sloane, Apr 23 2014
STATUS
approved