已知函数f(x)=ax3+3x2-x+1在R上是减函数,求实数a的取值范围