A241178 Numbers n such that there are exactly three numbers m with m + (some digit of m) = n.

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

Robert Israel, Table of n, a(n) for n = 1..10000

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

Related sequences: A241173, A241174, A241175, A241176, A241177, A241178, A241179, A241180, A241181, A241182, A241183.

Sequence in context: A043703 A174214 A072709 * A158282 A053425 A178071

Adjacent sequences: A241175 A241176 A241177 * A241179 A241180 A241181

Keyword

nonn,base

Author

N. J. A. Sloane, Apr 23 2014

Status

approved