There may be an easier way but you can extract the
desired values from the list values in t
str(t) to see the elements in t.
test <- matrix(c(1, 1,2,2), 2,2)
tt <- apply(test, 1, t.test)
ttable <- function(tlist) {
tframe <- data.frame(NULL)
for(i in 1:length(tlist)){
t.value <- tlist[[i]][1]
dfs <- tlist[[i]][2]
conf.int1 <- tlist[[i]]$conf.int[1]
conf.int2 <- tlist[[i]]$conf.int[2]
p.value <- tlist[[i]][3]
t.vect <- cbind(t.value, dfs, conf.int1, conf.int2,
p.value)
tframe <- rbind(tframe, t.vect)
}
}
myts <- ttable(tt) ; myts
--- Ng Stanley <[EMAIL PROTECTED]> wrote:
> Hi,
>
> Given
>
> test <- matrix(c(1, 1,2,2), 2,2)
> t <- apply(test, 1, t.test)
>
> How can I obtain a table of p-values, confidence
> interval etc, instead of
>
>
> [[1]]
>
> One Sample t-test
>
> data: newX[, i]
> t = 3, df = 1, p-value = 0.2048
> alternative hypothesis: true mean is not equal to 0
> 95 percent confidence interval:
> -4.853102 7.853102
> sample estimates:
> mean of x
> 1.5
>
>
> [[2]]
>
> One Sample t-test
>
> data: newX[, i]
> t = 3, df = 1, p-value = 0.2048
> alternative hypothesis: true mean is not equal to 0
> 95 percent confidence interval:
> -4.853102 7.853102
> sample estimates:
> mean of x
> 1.5
>
> [[alternative HTML version deleted]]
>
> ______________________________________________
> R-help@r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide
> http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained,
> reproducible code.
>
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
