2013-07-23 1 views
0

나는쓰기 또는 이미지

thelist

$Delägare.Totalt 

    Welch Two Sample t-test 

data: x by datattest$Uttaxeringskassa 
t = -4.2515, df = 4525.773, p-value = 0.00002166 
alternative hypothesis: true difference in means is not equal to 0 
95 percent confidence interval: 
-194.58860 -71.76597 
sample estimates: 
mean in group 0 mean in group 1 
     207.2441  340.4214 


$Delägare.AndelKvinnor 

    Welch Two Sample t-test 

data: x by datattest$Uttaxeringskassa 
t = -3.358, df = 5204.392, p-value = 0.0007907 
alternative hypothesis: true difference in means is not equal to 0 
95 percent confidence interval: 
-3.3451054 -0.8790346 
sample estimates: 
mean in group 0 mean in group 1 
     35.09412  37.20619 

class(thelist) 
[1] "list" 

class(thelist[[1]]) 
[1] "htest" 

내가 멋지게을 수출하려는 Excel로 목록 또는 JPG 파일을 가지고있다. 어떤 제안?

최고 감사합니다.

dput(thelist) 
structure(list(Delägare.Totalt = structure(list(statistic = structure(-4.25153766803811, .Names = "t"), 
    parameter = structure(4525.77251107907, .Names = "df"), p.value = 0.0000216586994081083, 
    conf.int = structure(c(-194.588596176246, -71.7659721316704 
    ), conf.level = 0.95), estimate = structure(c(207.244090610637, 
    340.421374764595), .Names = c("mean in group 0", "mean in group 1" 
    )), null.value = structure(0, .Names = "difference in means"), 
    alternative = "two.sided", method = "Welch Two Sample t-test", 
    data.name = "x by datattest$Uttaxeringskassa"), .Names = c("statistic", 
"parameter", "p.value", "conf.int", "estimate", "null.value", 
"alternative", "method", "data.name"), class = "htest"), Delägare.AndelKvinnor = structure(list(
    statistic = structure(-3.35800910076486, .Names = "t"), parameter = structure(5204.39192454832, .Names = "df"), 
    p.value = 0.000790696715995022, conf.int = structure(c(-3.34510541135959, 
    -0.879034608967678), conf.level = 0.95), estimate = structure(c(35.0941200840133, 
    37.2061900941769), .Names = c("mean in group 0", "mean in group 1" 
    )), null.value = structure(0, .Names = "difference in means"), 
    alternative = "two.sided", method = "Welch Two Sample t-test", 
    data.name = "x by datattest$Uttaxeringskassa"), .Names = c("statistic", 
"parameter", "p.value", "conf.int", "estimate", "null.value", 
"alternative", "method", "data.name"), class = "htest")), .Names = c("Delägare.Totalt", 
"Delägare.AndelKvinnor")) 
+0

이 gplots :: textplot' – James

답변

2

당신은 사용할 수 있습니다 IST 저장 한 후

> sapply(thelist, unlist) 
           Delägare.Totalt     Delägare.AndelKvinnor    
statistic.t     "-4.25153766803811"    "-3.35800910076486"    
parameter.df     "4525.77251107907"    "5204.39192454832"    
p.value      "2.16586994081083e-05"   "0.000790696715995022"   
conf.int1      "-194.588596176246"    "-3.34510541135959"    
conf.int2      "-71.7659721316704"    "-0.879034608967678"    
estimate.mean in group 0  "207.244090610637"    "35.0941200840133"    
estimate.mean in group 1  "340.421374764595"    "37.2061900941769"    
null.value.difference in means "0"        "0"        
alternative     "two.sided"      "two.sided"      
method       "Welch Two Sample t-test"   "Welch Two Sample t-test"   
data.name      "x by datattest$Uttaxeringskassa" "x by datattest$Uttaxeringskassa" 

write.table를 통해.

업데이트

당신이 ::: grid.table gridExtra를 사용할 수 .JPEG에 저장하기 :

df <- sapply(thelist, unlist) 
require(gridExtra) 
jpeg("output.jpg") 
grid.table(df) 
dev.off() 

enter image description here

+0

그래 내가 알고'시도 그런데'thelist'을 이미지로 저장하고 싶습니다. :) – user1665355

+0

> 멋지게 엑셀로 내보내고 싶습니다. ??? – EDi

+0

내 업데이트를 참조하십시오. – EDi