r - ループ回帰内に na.action=na.exclude を含める

Question

データ フレーム A と B の 2 つのセットがあります。データ フレーム A には 590 列、B には 6 つの変数があります。データセット A の各列は従属変数です。データセット B の 6 つの変数はすべて独立変数です。データセット A と B の両方に NA が含まれています。B の 6 つの変数で A の各列を実行します。次に、適合値を 590 列の行列に入れます。これらのコードを実行しています。

set.seed(1)
n<-590
fitted2<-matrix(0, nrow = 678, ncol = 590)

fitttedqr2<-function(x)
  {fitted2[,x]<-fitted(rq(Retprice[,x]~ Vix + Eqreturn + Changetbill + 
    Liqsprd + Creditsprd + Bondslope, tau = 0.01 ))
    }

 fittedvalue2<-sapply(1:m, fitttedqr2)

データ A の各列は、データ B のすべての変数で回帰されます。B には変数 Vix + Eqreturn + Changetbill + Liqsprd + Creditsprd + Bondslop があります。この関数に na.action=na.exclude または ....=na.omit を含めて、データの任意の列の na(s) を処理する方法を教えてください。