|
|
A362594
|
|
Exponentially odd numbers that are neither squarefree nor prime powers.
|
|
2
|
|
|
24, 40, 54, 56, 88, 96, 104, 120, 135, 136, 152, 160, 168, 184, 189, 216, 224, 232, 248, 250, 264, 270, 280, 296, 297, 312, 328, 344, 351, 352, 375, 376, 378, 384, 408, 416, 424, 440, 456, 459, 472, 480, 486, 488, 513, 520, 536, 544, 552, 568, 584, 594, 608, 616
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
FORMULA
|
|
|
EXAMPLE
|
24 = 2^3 * 3^1 is in this sequence because it has 2 distinct prime factors whose multiplicities are odd and one such multiplicity exceeds 1.
|
|
MATHEMATICA
|
Select[Select[Range[1000], Nor[SquareFreeQ[#], PrimePowerQ[#]] &], Times @@ FactorInteger[#][[All, 1]] == (Sqrt[#] /. (c_ : 1)*a_^(b_ : 0) :> (c*a^b)^2) &]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|