A268620 Numbers whose digital sum is a multiple of 4.

0, 4, 8, 13, 17, 22, 26, 31, 35, 39, 40, 44, 48, 53, 57, 62, 66, 71, 75, 79, 80, 84, 88, 93, 97, 103, 107, 112, 116, 121, 125, 129, 130, 134, 138, 143, 147, 152, 156, 161, 165, 169, 170, 174, 178, 183, 187, 192, 196, 202, 206, 211, 215, 219, 220, 224, 228, 233, 237, 242, 246

Offset

1,2

Comments

a(1498) = 5999 is the smallest term that is congruent to 5 modulo 9.

Links

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

Maple

select(t -> convert(convert(t, base, 10), `+`) mod 4 = 0, [$1..1000]); # Robert Israel, Feb 09 2016

Mathematica

Select[Range[0, 250], IntegerQ[Total[IntegerDigits[#]]/4] &]

Prog

(Magma) [n: n in [0..250] | IsIntegral(&+Intseq(n)/4)];

Crossrefs

Cf. A007953, A061383 (supersequence).

Cf. numbers whose digital sum is a multiple of k: A054683 (k=2), A008585 (k=3), this sequence (k=4), A227793 (k=5).

Subsequences: A002278, A038446, A052218, A052222, A061387, A169967, A235151, A235227, A235229.

Sequence in context: A311927 A311928 A311929 * A311930 A311931 A311932

Adjacent sequences: A268617 A268618 A268619 * A268621 A268622 A268623

Keyword

nonn,base

Author

Bruno Berselli, Feb 09 2016

Status

approved