OFFSET
1,2
COMMENTS
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
MATHEMATICA
Select[Range[0, 300], Total[IntegerDigits[#]]==Total[IntegerDigits[4#]]&] (* Harvey P. Dale, Dec 25 2025 *)
PROG
(Magma) [n: n in [0..400] | &+Intseq(n) eq &+Intseq(4*n)]; // Vincenzo Librandi, Aug 05 2015
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Christina Steffan, Jul 05 2015
EXTENSIONS
More terms from Vincenzo Librandi, Aug 05 2015
STATUS
approved
