|
Search: id:A071639
|
|
|
| A071639 |
|
Numbers n such that core(n) = b(n,1)*b(n,0) where b(n,1) is the number of 1's in binary representation of n, b(n,0) the number of 0's and core(n) the square-free part of n. |
|
+0 1
|
|
| 24, 3500, 6048, 52855, 56320, 67270, 71874, 80920, 85536, 95830, 105600, 112000, 117670, 131625, 142373, 155925, 250173, 262392, 280800, 350142, 360672
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
PROGRAM
|
(PARI) for(s=1, 500000, b=binary(s); l=length(b); if(sum(i=1, l, if(component(b, i)-1, 0, 1))*sum(i=1, l, if(component(b, i), 0, 1))==core(s), print1(s, ", ")))
|
|
CROSSREFS
|
Sequence in context: A001512 A088731 A072529 this_sequence A061530 A007241 A106207
Adjacent sequences: A071636 A071637 A071638 this_sequence A071640 A071641 A071642
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
Benoit Cloitre (benoit7848c(AT)orange.fr), Jun 22 2002
|
|
|
Search completed in 0.002 seconds
|