R:solve.QP始终显示约束不一致

它总是在solve.QP中表示错误（Dmat、dvec、Amat、bvec、meq=2）： 约束不一致，没有解决方案
我检查了矩阵和数据，找不到原因

betatargetstartegy<-function(beta,targetbeta,Re,C,lamda,Wp)
{
  dvec=Re
  Dmat=2*lamda*C
  Amat=cbind(beta,1,diag(13),-diag(13))
  bvec=c(targetbeta,1,rep(-2,26))-t(Amat)%*%Wp
  result=solve.QP(Dmat,dvec,Amat,bvec,meq=2)$solutions+Wp
  return(result)
}

t=c(0.5,1,1.5)
Wp=t(t(rep(1/13,13)))
a=expected_return(60,65)
b=covariance(60,65)
betatargetstartegy(beta,t,a,b,0.5,Wp)

betatatargetstartegy