nlmod <- nls(y ~  Const + A * exp(B * x))


Error in nlsModel(formula, mf, start, wts) :
  参数初始估计值里有奇异梯度矩阵