search for: akro

Displaying 5 results from an estimated 5 matches for "akro".

Did you mean: aklo
2011 Jan 17
0
(no subject)
...############################### n <- 5 t <- 4 nt <- n*t pData <- data.frame(id = rep(paste("JohnDoe", 1:n, sep = "_"), each = t),time = rep(1981:1984, n)) rho <-0.95 alphai <- rnorm(n,mean=0,sd=1)#alphai simulation x<- as.matrix(rnorm(nt,1))#xi simulation akro <- kronecker(alphai ,matrix(1,t,1))#kronecker of alphai cormat<-matrix(c(1,rho,rho,1),nrow=2,ncol=2)#correlation matrix cormat.chold <- chol(cormat)#choleski transformation of correlation matrix akrox <- cbind(akro,x) ax <- akrox%*%cormat.chold ai <- as.matrix(ax[,1]) pData$alphai...
2011 Jan 17
0
PANEL DATA SIMULATION(sorry for my previous email with no subject)
...############################### n <- 5 t <- 4 nt <- n*t pData <- data.frame(id = rep(paste("JohnDoe", 1:n, sep = "_"), each = t),time = rep(1981:1984, n)) rho <-0.95 alphai <- rnorm(n,mean=0,sd=1)#alphai simulation x<- as.matrix(rnorm(nt,1))#xi simulation akro <- kronecker(alphai ,matrix(1,t,1))#kronecker of alphai cormat<-matrix(c(1,rho,rho,1),nrow=2,ncol=2)#correlation matrix cormat.chold <- chol(cormat)#choleski transformation of correlation matrix akrox <- cbind(akro,x) ax <- akrox%*%cormat.chold ai <- as.matrix(ax[,1]) pData$alphai...
2011 Jan 18
0
Need help in a simulation study
...################################# n <- 5 t <- 4 nt <- n*t pData <- data.frame(id = rep(paste("JohnDoe", 1:n, sep = "_"), each = t),time = rep(1981:1984, n)) rho <-0.95 alphai <- rnorm(n,mean=0,sd=1)#alphai simulation x<- as.matrix(rnorm(nt,1))#xi simulation akro <- kronecker(alphai ,matrix(1,t,1))#kronecker of alphai cormat<-matrix(c(1,rho,rho,1),nrow=2,ncol=2)#correlation matrix cormat.chold <- chol(cormat)#choleski transformation of correlation matrix akrox <- cbind(akro,x) ax <- akrox%*%cormat.chold ai <- as.matrix(ax[,1]) pData$alphai...
2011 Jan 17
0
PANEL DATA SIMULATION
...###################### n <- 5 t <- 4 nt <- n*t pData <- data.frame(id = rep(paste("JohnDoe", 1:n, sep = "_"), each = t),time = rep(1981:1984, n)) rho <-0.95 alphai <- rnorm(n,mean=0,sd=1)#alphai simulation x<- as.matrix(rnorm(nt,1))#xi simulation akro <- kronecker(alphai ,matrix(1,t,1))#kronecker of alphai cormat<-matrix(c(1,rho,rho,1),nrow=2,ncol=2)#correlation matrix cormat.chold <- chol(cormat)#choleski transformation of correlation matrix akrox <-...
2011 Jan 25
0
How to simulate a variable Xt=Wit+0.5Wit-1 with
...- 5 nt <- n*t pData <- data.frame(id = rep(paste("JohnDoe", 1:n, sep = "."), each = t),time = rep(1981:1985, n)) rho <-0.99#simulate alphai corelated with the xi print(rho) alphai <- rnorm(n,mean=0,sd=1)#alphai simulation x<- as.matrix(rnorm(nt,1))#xi simulation akro <- kronecker(alphai ,matrix(1,t,1))#kronecker of alphai cormat<-matrix(c(1,rho,rho,1),nrow=2,ncol=2)#correlation matrix cormat.chold <- chol(cormat)#choleski transformation of correlation matrix akrox <- cbind(akro,x) ax <- akrox%*%cormat.chold ai <- as.matrix(ax[,1]) pData$alphai...