2

Rに3次元配列「arr」があります：

> v1 <- c("100", "75", "31", "41", "1000", "69")
> v2 <- c("10m", "6h", "5d", "11m", "6h", "5d")
> arr <- array(c(v1, v2), dim=c(3, 2, 2), dimnames=list(c("d1", "d2", "d3"), c("m1", "m2"), c("v1", "v2")))
> arr
, , v1

   m1    m2    
d1 "100" "41"  
d2 "75"  "1000"
d3 "31"  "69"  

, , v2

   m1    m2   
d1 "10m" "11m"
d2 "6h"  "6h" 
d3 "5d"  "5d"

次のようなLatexテーブルを作成したい：

          m1            m2
------------------------------
        v1  v2        v1  v2
------------------------------
d1     100 10m        41 11m
d2      75  6h      1000  6h
d3      31  5d        69  5d

上記のようなテーブルをラテックスにするためにRを使用するにはどうすればよいですか? R パッケージの "xtable" が、私が必要とする同様のことを実行できることを知っています。ただし、上記の正確な表を作成できるかどうかはわかりません。

PS: 上記以外に、表に 3D 配列を表示する方法が他にもあるのではないかと思います。

4

1 に答える 1

1 
> library(xtable)
> xtable(cbind(arr[,'m1',], arr[,'m2',]), align='lrrrr')
% latex table generated in R 3.0.2 by xtable 1.7-1 package
% Fri Dec 13 07:48:13 2013
\begin{table}[ht]
\centering
\begin{tabular}{lrrrr}
  \hline
 & v1 & v2 & v1 & v2 \\ 
  \hline
d1 & 100 & 10m & 41 & 11m \\ 
  d2 & 75 & 6h & 1000 & 6h \\ 
  d3 & 31 & 5d & 69 & 5d \\ 
   \hline
\end{tabular}
\end{table}
于 2013-12-13T06:48:40.720 に答える