OFFSET
1,1
LINKS
MATHEMATICA
Select[Tally[Table[m+Total[IntegerDigits[m, 3]], {m, 200}]], #[[2]]==2&][[All, 1]] (* Harvey P. Dale, Aug 17 2019 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
N. J. A. Sloane, Oct 31 2013
STATUS
approved