search for: idebut1

Displaying 4 results from an estimated 4 matches for "idebut1".

Did you mean: idebut
2020 Oct 09
1
Aide pour finaliser ce code
...) Xkl=CentrageV(X,Xjhbar[[k]][l,],n) Vijkl=t(W[[i]][j]*Xij)%*%(W[[k]][l]*Xkl)/n Vij=t(W[[i]][j]*Xij)%*%Xij/n11[[i]][j] Vkl=t(W[[k]][l]*Xkl)%*%Xkl/n11[[k]][l] if (i==1) Idebut=((j-1)*p)+1 else Idebut=((sum(R[1:(i-1)])+j-1)*p)+1 if (i==1) Idebut1=(j*p) else Idebut1=((sum(R[1:(i-1)])+j)*p) if (k==1) Ifin=((l-1)*p)+1 else Ifin=((sum(R[1:(k-1)])+l-1)*p)+1 if (k==1) Ifin1=(l*p) else Ifin1=((sum(R[1:(k-1)])+l)*p) GSigma[Idebut:Idebut1,Ifin:Ifin1]=Vijkl+(P11[[i]][j]*P11[[k]][l]*(Vn-Vij-Vkl)) } } } } # D?terminations de...
2020 Oct 10
3
Please need help to finalize my code
...[[i]][,j]*Xij)%*%Xij/n11[[i]][j] 128 for (k in 1:q ){ 129 for (l in 1:R[k]){ 130 Xkl=CenteringV(X,Xjhbar[[k]][l,],n) 131 Vijkl=t(W[[i]][,j]*Xij)%*%(W[[k]][,l]*Xkl)/n 132 Vkl=t(W[[k]][,l]*Xkl)%*%Xkl/n11[[k]][l] 133 if (i==1) Idebut=((j-1)*p)+1 else Idebut=((sum(R[1:(i-1)])+j-1)*p)+1 134 if (i==1) Idebut1=(j*p) else Idebut1=((sum(R[1:(i-1)])+j)*p) 135 if (k==1) Ifin=((l-1)*p)+1 else Ifin=((sum(R[1:(k-1)])+l-1)*p)+1 136 if (k==1) Ifin1=(l*p) else Ifin1=((sum(R[1:(k-1)])+l)*p) 137 GSigma[Idebut:Idebut1,Ifin:Ifin1]=Vijkl+(P11[[i]][j]*P11[[k]][l]*(Vn-Vij-Vkl)) 138 } 139 } 140 } 141 } 141 # Determinat...
2020 Oct 13
1
Please need help to finalize my code
...r (k in 1:q ){ > 129 for (l in 1:R[k]){ > > 130 Xkl=CenteringV(X,Xjhbar[[k]][l,],n) > 131 Vijkl=t(W[[i]][,j]*Xij)%*%(W[[k]][,l]*Xkl)/n > > 132 Vkl=t(W[[k]][,l]*Xkl)%*%Xkl/n11[[k]][l] > 133 if (i==1) Idebut=((j-1)*p)+1 else Idebut=((sum(R[1:(i-1)])+j-1)*p)+1 > 134 if (i==1) Idebut1=(j*p) else Idebut1=((sum(R[1:(i-1)])+j)*p) > 135 if (k==1) Ifin=((l-1)*p)+1 else Ifin=((sum(R[1:(k-1)])+l-1)*p)+1 > 136 if (k==1) Ifin1=(l*p) else Ifin1=((sum(R[1:(k-1)])+l)*p) > > 137 > GSigma[Idebut:Idebut1,Ifin:Ifin1]=Vijkl+(P11[[i]][j]*P11[[k]][l]*(Vn-Vij-Vkl)) > 138 } > 1...
2020 Oct 13
0
Please need help to finalize my code
...1:R[k]){ > > > > 130 Xkl=CenteringV(X,Xjhbar[[k]][l,],n) > > 131 Vijkl=t(W[[i]][,j]*Xij)%*%(W[[k]][,l]*Xkl)/n > > > > 132 Vkl=t(W[[k]][,l]*Xkl)%*%Xkl/n11[[k]][l] > > 133 if (i==1) Idebut=((j-1)*p)+1 else Idebut=((sum(R[1:(i-1)])+j-1)*p)+1 > > 134 if (i==1) Idebut1=(j*p) else Idebut1=((sum(R[1:(i-1)])+j)*p) > > 135 if (k==1) Ifin=((l-1)*p)+1 else Ifin=((sum(R[1:(k-1)])+l-1)*p)+1 > > 136 if (k==1) Ifin1=(l*p) else Ifin1=((sum(R[1:(k-1)])+l)*p) > > > > 137 > > > GSigma[Idebut:Idebut1,Ifin:Ifin1]=Vijkl+(P11[[i]][j]*P11[[k]][l]*(V...