cp's OEIS Frontend

A076383 Numbers n such that sum of digits in base 5 is a divisor of sum of prime divisors (A008472).

%I A076383 #6 Mar 02 2015 16:08:49
%S A076383 2,3,5,21,25,27,30,35,42,78,105,110,115,123,125,126,130,132,141,150,
%T A076383 153,155,159,161,170,175,186,187,195,201,228,230,231,252,258,260,264,
%U A076383 276,290,301,327,329,340,357,372,378,381,395,396,402,410,411,429,434
%N A076383 Numbers n such that sum of digits in base 5 is a divisor of sum of prime divisors (A008472).
%p A076383 A076383 := proc(n) local i,j,t,t1, sod, sopd; t := NULL; for i from 2 to n do t1 := i; sod := 0; while t1 <> 0 do sod := sod + (t1 mod 5); t1 := floor(t1/5); od; sopd := 0; j := 1; while ithprime(j) <= i do if i mod ithprime(j) = 0 then sopd := sopd+ithprime(j); fi; j := j+1; od; if sopd mod sod = 0 then t := t,i; fi; od; t; end;
%Y A076383 Cf. A075657, A076381 - A076387.
%K A076383 nonn,base
%O A076383 1,1
%A A076383 _Floor van Lamoen_, Oct 08 2002