在表格對象中插入一列

我發現這個博客的嵌入式表格變成乳膠格式(Blog Link)。我喜歡結果，但想在rownames後面的開頭插入一個列。我習慣於處理數據幀，因此處理這個野獸比典型的列索引更困難。在表格對象中插入一列

這是我現在有：

  pre   post  
approach mean sd mean sd 
1  24.17 8.310 54.33 11.01 
2  25.50 9.434 65.25 16.32 
3  26.33 9.139 63.17 12.53

這裏還有想什麼我它看起來像：

   pre   post  
approach n mean sd mean sd 
1  12 24.17 8.310 54.33 11.01 
2  12 25.50 9.434 65.25 16.32 
3  12 26.33 9.139 63.17 12.53

這裏是z的dput以及N-就是我想要的列喜歡插入。

預先感謝您。

z <- structure(list(24.1666666666667, 25.5, 26.3333333333333, 8.31027111835746, 
    9.4339811320566, 9.13866245766587, 54.3333333333333, 65.25, 
    63.1666666666667, 11.0068848977136, 16.3157759685081, 12.5323822978956), .Dim = 3:4, .Dimnames = list(
    NULL, c("term", "term", "term", "term")), rowLabels = structure(c("1", 
"2", "3"), .Dim = c(3L, 1L), .Dimnames = list(NULL, "approach"), justification = structure(c(NA_character_, 
NA_character_, NA_character_), .Dim = c(3L, 1L)), colnamejust = NA_character_, justify = NA, suppress = 0), colLabels = structure(c("pre", 
"mean", NA, "sd", "post", "mean", NA, "sd"), .Dim = c(2L, 4L), justification = structure(c(NA_character_, 
NA_character_, NA_character_, NA_character_, NA_character_, NA_character_, 
NA_character_, NA_character_), .Dim = c(2L, 4L)), colnamejust = character(0), justify = NA, suppress = 0), table = value * 
    v * approach ~ variable2 * result_variable, formats = structure(c(NA, 
NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA), .Dim = 3:4, .Dimnames = list(
    NULL, c("format", "format", "format", "format"))), justification = structure(c(NA, 
NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA), .Dim = 3:4, .Dimnames = list(
    NULL, c("justification", "justification", "justification", 
    "justification"))), class = "tabular") 

structure(c(12L, 12L, 12L), .Names = c("1", "2", "3"))

來源

2012-09-12 Tyler Rinker

我想實際瞭解未來需求的結構。 –

你嘗試過你發佈的'structure'嗎？它確實給了你顯示的data.frame。 –

唯一的（？知道）的方法是重新分配重新排序：

R> mockup <- data.frame(B=21:23, C=31:33) 
R> mockup 
    B C 
1 21 31 
2 22 32 
3 23 33 
R>

現在添加列A：

R> mockup[,"A"] <- 1:3 
R> mockup 
    B C A 
1 21 31 1 
2 22 32 2 
3 23 33 3 
R>

和重新排列：

R> mockup <- mockup[,c("A", "B", "C")] 
R> mockup 
    A B C 
1 1 21 31 
2 2 22 32 
3 3 23 33 
R>

Presto。開始的新列。

來源

2012-09-12 15:14:09

我做了'str'，看到了列表，並嘗試了一些列表索引'[[]]'，它不起作用。「表格式」不起作用，我假設（不正確）它不是data.frame對象（忘記data.frame是列表）。完美的作品，對我來說無疑是一個時刻。 –

事情是這樣的：

z <- data.frame(approach = gl(3, 12), pre = rnorm(36)*50, post = rnorm(36)*60) 
library(tables) 
tabular(approach ~ (pre + post) * (mean + sd)) 

     pre   post   
approach mean sd mean sd 
1  -5.431 61.01 3.766 54.76 
2  20.408 29.14 -9.261 54.58 
3  -7.854 53.55 -30.046 62.41 
tabular(approach ~ (n=1) + (pre + post) * (mean + sd)) 

    pre   post   
approach n mean sd mean sd 
1  12 -5.431 61.01 3.766 54.76 
2  12 20.408 29.14 -9.261 54.58 
3  12 -7.854 53.55 -30.046 62.41 
tabular(approach + 1 ~ (n=1) + (pre + post) * (mean + sd)) 

    pre   post   
approach n mean sd mean sd 
1  12 -5.431 61.01 3.766 54.76 
2  12 20.408 29.14 -9.261 54.58 
3  12 -7.854 53.55 -30.046 62.41 
All  36 2.374 50.06 -11.847 57.46

欲瞭解更多詳情，請參閱該tables包vignette。

來源

2013-01-16 15:18:25

在表格對象中插入一列

回答

相關問題