A274319 - OEIS

%I #17 Aug 18 2016 12:18:47

%S 0,6,15,24,33,39,42,48,51,57,60,66,75,84,93,99,105,114,123,129,132,

%T 138,141,147,150,156,165,174,183,189,192,198,204,213,219,222,228,231,

%U 237,240,246,255,264,273,279,282,288,291,297,303,309,312,318,321,327,330,336,345,354,363,369,372,378,381

%N Numbers whose digit sum is divisible by 6.

%C Numbers n such that A007953(n) is a term of A008588. - _Felix Fröhlich_, Aug 18 2016

%C Any term of the sequence is also a term of A008585. - _Felix Fröhlich_, Aug 18 2016

%o (C)

%o int i = 0;

%o while(1){

%o    int sum = 0;

%o    int powerof10 = 10;

%o    int i2 = i;

%o    while(i2 != 0){

%o       sum += i2%powerof10;

%o       i2 /= 10;

%o       powerof10 *= 10;

%o    }

%o    if(sum%6 == 0) printf("%d\n", i);

%o    i++;

%o }

%o (PARI) is(n)=my(d=digits(n));sum(k=1,#d,d[n])%6==0; \\ _Joerg Arndt_, Aug 18 2016

%o (PARI) is(n)=sumdigits(n)%6==0 \\ _Charles R Greathouse IV_, Aug 18 2016

%Y Cf. A007953.

%K base,nonn,easy

%O 1,2

%A _Elana Lessing_, Jun 17 2016