A325265 Numbers with sum of omega-sequence > 4.
6, 10, 12, 14, 15, 16, 18, 20, 21, 22, 24, 26, 28, 30, 32, 33, 34, 35, 36, 38, 39, 40, 42, 44, 45, 46, 48, 50, 51, 52, 54, 55, 56, 57, 58, 60, 62, 63, 64, 65, 66, 68, 69, 70, 72, 74, 75, 76, 77, 78, 80, 81, 82, 84, 85, 86, 87, 88, 90, 91, 92, 93, 94, 95, 96
Offset: 1
Keywords
Examples
The sequence of terms together with their omega-sequences begins: 6: 2 2 1 46: 2 2 1 80: 5 2 2 1 112: 5 2 2 1 10: 2 2 1 48: 5 2 2 1 81: 4 1 114: 3 3 1 12: 3 2 2 1 50: 3 2 2 1 82: 2 2 1 115: 2 2 1 14: 2 2 1 51: 2 2 1 84: 4 3 2 2 1 116: 3 2 2 1 15: 2 2 1 52: 3 2 2 1 85: 2 2 1 117: 3 2 2 1 16: 4 1 54: 4 2 2 1 86: 2 2 1 118: 2 2 1 18: 3 2 2 1 55: 2 2 1 87: 2 2 1 119: 2 2 1 20: 3 2 2 1 56: 4 2 2 1 88: 4 2 2 1 120: 5 3 2 2 1 21: 2 2 1 57: 2 2 1 90: 4 3 2 2 1 122: 2 2 1 22: 2 2 1 58: 2 2 1 91: 2 2 1 123: 2 2 1 24: 4 2 2 1 60: 4 3 2 2 1 92: 3 2 2 1 124: 3 2 2 1 26: 2 2 1 62: 2 2 1 93: 2 2 1 126: 4 3 2 2 1 28: 3 2 2 1 63: 3 2 2 1 94: 2 2 1 128: 7 1 30: 3 3 1 64: 6 1 95: 2 2 1 129: 2 2 1 32: 5 1 65: 2 2 1 96: 6 2 2 1 130: 3 3 1 33: 2 2 1 66: 3 3 1 98: 3 2 2 1 132: 4 3 2 2 1 34: 2 2 1 68: 3 2 2 1 99: 3 2 2 1 133: 2 2 1 35: 2 2 1 69: 2 2 1 100: 4 2 1 134: 2 2 1 36: 4 2 1 70: 3 3 1 102: 3 3 1 135: 4 2 2 1 38: 2 2 1 72: 5 2 2 1 104: 4 2 2 1 136: 4 2 2 1 39: 2 2 1 74: 2 2 1 105: 3 3 1 138: 3 3 1 40: 4 2 2 1 75: 3 2 2 1 106: 2 2 1 140: 4 3 2 2 1 42: 3 3 1 76: 3 2 2 1 108: 5 2 2 1 141: 2 2 1 44: 3 2 2 1 77: 2 2 1 110: 3 3 1 142: 2 2 1 45: 3 2 2 1 78: 3 3 1 111: 2 2 1 143: 2 2 1
Crossrefs
Programs
-
Mathematica
omseq[n_Integer]:=If[n<=1,{},Total/@NestWhileList[Sort[Length/@Split[#]]&,Sort[Last/@FactorInteger[n]],Total[#]>1&]]; Select[Range[100],Total[omseq[#]]>4&]
Comments