|
Search: id:A100368
|
|
|
| A100368 |
|
Even numbers of which number of distinct prime-factors equals 2 and the odd factor is prime. |
|
+0
3
|
|
| 6, 10, 12, 14, 20, 22, 24, 26, 28, 34, 38, 40, 44, 46, 48, 52, 56, 58, 62, 68, 74, 76, 80, 82, 86, 88, 92, 94, 96, 104, 106, 112, 116, 118, 122, 124, 134, 136, 142, 146, 148, 152, 158, 160, 164, 166, 172, 176, 178, 184, 188, 192, 194, 202, 206, 208, 212, 214, 218, 224
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
A proper subset of A098202. E.g. 210 is not here, but it is there. Also differs from A100367: 36,100,108,196 etc.. are missing here. Different also from A036348 because 90,180 are not here.
|
|
FORMULA
|
Numbers of the form 2^k*p where k>0, p is an odd prime.
|
|
MATHEMATICA
|
<<NumberTheory`NumberTheoryFunctions` p2[x_] :=Part[PrimeFactorList[x], 2]; lf[x_] :=Length[FactorInteger[x]]; ta={{0}}; Do[If[Equal[lf[n], 2]&&EvenQ[n]&&IntegerQ[Log[2, n/p2[n]]], ta=Append[ta, n]; Print[n]], {n, 1, 256}]; ta=Delete[ta, 1]
|
|
CROSSREFS
|
Cf. A001221, A098902, A100367, A036348.
Sequence in context: A036350 A088829 A036348 this_sequence A128691 A028919 A015921
Adjacent sequences: A100365 A100366 A100367 this_sequence A100369 A100370 A100371
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Labos E. (labos(AT)ana.sote.hu), Nov 22 2004
|
|
|
Search completed in 0.002 seconds
|
