login
A037318
Numbers whose base-4 and base-7 expansions have the same digit sum.
0
1, 2, 3, 8, 9, 10, 11, 21, 22, 23, 28, 29, 30, 31, 35, 42, 43, 52, 53, 54, 55, 60, 61, 62, 70, 71, 77, 78, 79, 91, 100, 101, 102, 103, 108, 109, 110, 111, 112, 113, 114, 115, 120, 121, 122, 123, 148, 149, 150, 151, 156, 157, 158, 159
OFFSET
1,2
MATHEMATICA
Select[Range[200], Total[IntegerDigits[#, 4]]==Total[IntegerDigits[#, 7]]&] (* Harvey P. Dale, Feb 17 2023 *)
CROSSREFS
Sequence in context: A347397 A037462 A309125 * A253317 A277971 A080288
KEYWORD
nonn,base
STATUS
approved