255 個の変数を持つデータ セットがあります。
を使用してデータセットをロードします
>agep=read.csv("ncsucurrent.csv")
>attach(agep)
データセットから、4 つの変数のサブセットを集計したいだけです。だから私はサブセットを選択します
>enroll=agep[,16:19]
id Q1_Item1 Q1_Item2 Q1_Item3 Q1_Item4
1 4 4 4 2
2 1 2 3 4
3 3 4 4 4
4 3 3 3 3
5 2 1 1 1
サブセット内の変数は数値形式です。それらを要因として使用するので、次を使用します。
enroll<- lapply(enroll, factor, levels=1:4, labels=c("Not at all", "To a small extent", "To some extent", "To a great extent") ) t( sapply(enroll, table) )
これにより、各カテゴリの変数ごとの回答数を表示するマトリックスが生成されます (つまり、「まったくない」....「かなりの程度」)。
Not at all To a small extent To some extent To a great extent
Item1 1 1 2 1
Item2 1 1 1 2
Item3 1 0 2 2
Item4 1 1 1 2
今度は xtable を使用して素敵なテーブルを作成したいと思います。私が使う
>require(xtable)
>library(xtable)
>enroll=as.data.frame(enroll)
>enroll=xtable(enroll)
>print(enroll)
ただし、ラベル付きの元のサブセットを返すもの
% latex table generated in R 2.15.0 by xtable 1.7-0 package
% Wed Jul 11 00:27:10 2012
\begin{table}[ht]
\begin{center}
\begin{tabular}{rlll}
\hline
& Q1_item1 & Q1_item2 & Q1_item3 & Q1_item4 \\
\hline
1 & To a great extent & To a great extent& To a great extent & To a small extent \\
2 & Not at all & To a small extent & To some extent & To a great extent\\
3 & To some extent & To a great extent & To a great extent & To a great extent\\
4 & To some extent & To some extent & To some extent & To some extent \\
5 & To a small extent& Not at all& Not at all& Not at all\\
\hline
\end{tabular}
\end{center}
\end{table}
xtableを使用してデータをサブセット化し、マトリックス(上から2番目)を印刷する正しい方法は何ですか?