|
Search: id:A101939
|
|
|
| A101939 |
|
Numbers n with omega(n) > omega of 3 nearest larger and 3 nearest smaller neighbors. |
|
+0
1
|
|
| 6, 30, 42, 60, 66, 70, 78, 84, 90, 110, 114, 120, 126, 150, 174, 186, 190, 204, 210, 246, 290, 294, 300, 322, 330, 336, 385, 390, 414, 420, 450, 462, 510, 540, 546, 570, 630, 660, 690, 714, 720, 770, 780, 786, 798, 840, 846, 858, 870, 910
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
EXAMPLE
|
6 is in the sequence because it has two unique prime factors (2 and 3) whereas 3, 4, 5, 7, 8, and 9 each have fewer.
|
|
MATHEMATICA
|
For[i=3, i<1000, If[And[Length[FactorInteger[i-3]]<Length[FactorInteger[i]], Length[FactorInteger[i-2]]<Length[FactorInteger[i]], Length[FactorInteger[i-1]]<Length[FactorInteger[i]], Length[FactorInteger[i+1]]<Length[FactorInteger[i]], Length[FactorInteger[i+2]]<Length[FactorInteger[i]], Length[FactorInteger[i+3]]<Length[FactorInteger[i]]], Print[i]]; i++ ]
|
|
CROSSREFS
|
Cf. A001221, A076763, A101937.
Sequence in context: A127662 A003062 A101937 this_sequence A114649 A090126 A100194
Adjacent sequences: A101936 A101937 A101938 this_sequence A101940 A101941 A101942
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
N. Fernandez (primeness(AT)borve.org), Dec 21 2004
|
|
|
Search completed in 0.002 seconds
|
