This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A076380 Sum of digits in base 2 is a divisor of sum of prime divisors (A008472). 7
 2, 4, 8, 14, 15, 16, 26, 28, 32, 33, 35, 38, 39, 42, 45, 51, 52, 56, 64, 65, 66, 74, 75, 76, 81, 84, 91, 95, 98, 104, 112, 114, 119, 126, 128, 129, 130, 132, 134, 135, 146, 148, 152, 153, 154, 161, 168, 170, 175, 194, 196, 198, 206, 208, 215, 221, 222, 224, 225 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,1 COMMENTS Prime divisors counted without multiplicity. - Harvey P. Dale, Jan 08 2019 LINKS Harvey P. Dale, Table of n, a(n) for n = 0..1000 MAPLE A076380 := 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 2); t1 := floor(t1/2); 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; MATHEMATICA Select[Range[2, 250], Divisible[Total[FactorInteger[#][[All, 1]]], Total[ IntegerDigits[ #, 2]]]&] (* Harvey P. Dale, Jan 08 2019 *) CROSSREFS Cf. A075657, A076381 - A076387. Sequence in context: A026665 A174540 A253766 * A049133 A063033 A128309 Adjacent sequences:  A076377 A076378 A076379 * A076381 A076382 A076383 KEYWORD nonn,base AUTHOR Floor van Lamoen, Oct 08 2002 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified August 18 04:50 EDT 2019. Contains 326072 sequences. (Running on oeis4.)