Displaying 2 results from an estimated 2 matches for "slo2".
Did you mean:
lo2
2005 Jan 18
4
Data Simulation in R
...ction(x) x$coefficient[2])
################
#Clean up workspace
rm(glsrun1)
gc()
glsrun2 <- lapply(long, function(x) gls(score.2~I(time-1), data=x,
correlation=corAR1(form=~1|V1), method='ML'))
# Extract intercepts and slopes
int2 <- sapply(glsrun2, function(x) x$coefficient[1])
slo2 <- sapply(glsrun2, function(x) x$coefficient[2])
#Clean up workspace
rm(glsrun2)
gc()
# Print Results
cat("Original Standard Errors","\n", "Intercept","\t",
sd(int1),"\n","Slope","\t","\t", sd(slo1),"\n&q...
2005 Jan 08
2
Does R accumulate memory
...x) gls(score.2~I(time-1), data=x,
correlation=corAR1(form=~1|V1), method='ML'))
# Step 5 Extract Intercepts and slopes
int1 <- lapply(glsrun1, function(x) x$coefficient[1])
slo1 <- lapply(glsrun1, function(x) x$coefficient[2])
int2 <- lapply(glsrun2, function(x) x$coefficient[1])
slo2 <- lapply(glsrun2, function(x) x$coefficient[2])
# Step 6 Compute SD of intercepts and slopes
int.sd1 <- sapply(glsrun1, function(x) x$coefficient[1])
slo.sd1 <- sapply(glsrun1, function(x) x$coefficient[2])
int.sd2 <- sapply(glsrun2, function(x) x$coefficient[1])
slo.sd2 <- sapply...