Displaying 5 results from an estimated 5 matches for "sxz".
Did you mean:
sx8
2009 Jul 13
0
Partial Correlation
...xdata <- data.frame(xzdata[,c(1,2)])*
* zdata <- data.frame(xzdata[,-c(1,2)])*
* print("zdata..........................")*
* print(zdata)*
* Sxz <- cov(xdata,zdata,m=method)*
*
print("Sxz.....................................
")*
* print(Sxz)*
* *
* zdata <-
na.omit(data.frame(data[,-c(1,2)]))*
* Szz <- cov(zdata,zdata,m=metho...
2009 Jun 25
2
Error: system is computationally singular: reciprocal condition number
...ta <- data.frame(x,y,z)
if(na.rm == T){
data = na.omit(data)
}
xdata <- na.omit(data.frame(data[,c(1,2)]))
Sxx <- cov(xdata,xdata,m=method)
xzdata <- na.omit(data)
xdata <- data.frame(xzdata[,c(1,2)])
zdata <- data.frame(xzdata[,-c(1,2)])
Sxz <- cov(xdata,zdata,m=method)
zdata <- na.omit(data.frame(data[,-c(1,2)]))
Szz <- cov(zdata,zdata,m=method)
# is Szz positive definite?
zz.ev <- eigen(Szz)$values
if(min(zz.ev)[1]<0){
stop("\'Szz\' is not positive definite!\n")
}...
2011 Jul 20
0
The C function getQ0 returns a non-positive covariance matrix and causes errors in arima()
...SU%*%t(A2)
## Now, compute correlation matrix between X and Z
C1 <- matrix(0,q,q)
F <- row(C1)-col(C1)+1
E <- (F>=1) & (F<=p+1)
C1[E] <- tphi[F[E]]
g <- matrix(0,q,1)
if (q) g[1:q,1] <- ttheta[1:q]
rXZ <- forwardsolve(C1,g)
SXZ <- matrix(0, p, q+1)
F <- col(SXZ)-row(SXZ)
E <- F>=1
SXZ[E] <- rXZ[F[E]]
S <- rbind(cbind(SX,SXZ),cbind(t(SXZ),diag(q+1)))
}
Q0 <- A%*%S%*%t(A)
}
The second way is to resolve brutally the equation of Gardner et al.
in the form (12), page 314 of the...
2009 Jun 28
1
ERROR: system is computationally singular: reciprocal condition number = 4.90109e-18
...ta <- data.frame(x,y,z)
if(na.rm == T){
data = na.omit(data)
}
xdata <- na.omit(data.frame(data[,c(1,2)]))
Sxx <- cov(xdata,xdata,m=method)
xzdata <- na.omit(data)
xdata <- data.frame(xzdata[,c(1,2)])
zdata <- data.frame(xzdata[,-c(1,2)])
Sxz <- cov(xdata,zdata,m=method)
zdata <- na.omit(data.frame(data[,-c(1,2)]))
Szz <- cov(zdata,zdata,m=method)
# is Szz positive definite?
zz.ev <- eigen(Szz)$values
if(min(zz.ev)[1]<0){
stop("\'Szz\' is not positive definite!\n")
}...
2005 Jun 26
2
trouble with long filename copy
-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1
L.S.
I'm a new member here. I've been using Samba for about 7 years now.
Usually in Win 98/2K environment, but recently also in XP environments
My server basis is either Debian or Ubuntu linux.
Problem:
when someone drags and drops a folder from one location to another
on a windows client, they get an error saying
"this location does