login
A076382
Numbers n such that sum of digits in base 4 is a divisor of sum of prime divisors (A008472).
1
2, 3, 4, 8, 9, 16, 26, 32, 42, 64, 65, 78, 81, 84, 86, 92, 94, 95, 104, 114, 115, 119, 128, 130, 143, 146, 156, 161, 168, 170, 178, 186, 209, 212, 215, 228, 234, 244, 256, 258, 259, 260, 287, 294, 308, 312, 319, 322, 326, 332, 335, 336, 338, 340, 342, 343, 344
OFFSET
1,1
MAPLE
A076382 := 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 4); t1 := floor(t1/4); 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;
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Floor van Lamoen, Oct 08 2002
STATUS
approved