A329629 Products of distinct odd primes of squarefree index.
1, 3, 5, 11, 13, 15, 17, 29, 31, 33, 39, 41, 43, 47, 51, 55, 59, 65, 67, 73, 79, 83, 85, 87, 93, 101, 109, 113, 123, 127, 129, 137, 139, 141, 143, 145, 149, 155, 157, 163, 165, 167, 177, 179, 181, 187, 191, 195, 199, 201, 205, 211, 215, 219, 221, 233, 235, 237
Offset: 1
Keywords
Examples
The sequence of terms together with their corresponding set-systems begins: 1: {} 3: {{1}} 5: {{2}} 11: {{3}} 13: {{1,2}} 15: {{1},{2}} 17: {{4}} 29: {{1,3}} 31: {{5}} 33: {{1},{3}} 39: {{1},{1,2}} 41: {{6}} 43: {{1,4}} 47: {{2,3}} 51: {{1},{4}} 55: {{2},{3}} 59: {{7}} 65: {{2},{1,2}} 67: {{8}} 73: {{2,4}}
Crossrefs
Programs
-
Mathematica
Select[Range[100],OddQ[#]&&SquareFreeQ[#]&&And@@SquareFreeQ/@PrimePi/@First/@If[#==1,{},FactorInteger[#]]&]
Comments