2

私は壁にぶつかりました、そして私は非常に単純な何かを逃していると信じています。

複数のウィルコクソン検定（ボンフェローニ補正あり）の結果を含むリストがあり、ダネットの検定の出力に似たテーブルを作成したいと思いますmultcomp（つまり、行番号が表示されず、間隔が適切に配置されています）。

表の例

データフレームとして印刷すると、行番号が表示され、列のテキスト値が右寄せされます。

リストは次の人によって作成されます。

for (i in 2:length(split.set)) {
  wrs.mod <- suppressWarnings(wilcox.test(split.set[[1]]$VALUE, split.set[[i]]$VALUE))
  stn.results[i - 1] <- as.character(unique(split.set[[i]]$TREATMENT))
  stat.results[i - 1] <- as.numeric(wrs.mod$statistic)
  p.results[i - 1] <- signif(wrs.mod$p.value, 3)
  if (wrs.mod$p.value < 0.05/(length(split.set) - 1)) sig.results[i - 1] <- "*" else sig.results[i - 1] <- NA
}
wrs.results <- list(Treatment = stn.results, Statistic = stat.results, p = p.results, Significant = sig.results)

これを印刷用に見栄えの良いテーブルにフォーマットするにはどうすればよいですか？

4

1 に答える 1

3

としてフォーマットする代わりに、としてフォーマットして、list次のように出力data.frameします。

wrs.results <- data.frame(Treatment = stn.results, Statistic = stat.results, Pvalue = p.results, Significant = sig.results)
print(wrs.results)

データフレームの構造（したがって外観）は、いくつかの方法でカスタマイズできます。行名よりも扱いを好むかもしれません：

wrs.results <- data.frame(row.names = stn.results, Statistic = stat.results, Pvalue = p.results, Significant = sig.results)

または列名をカスタマイズします。

colnames(wrs.results) = c("Treatment", "Statistic", "P(>|t|)", "Significance")
于 2012-06-11T16:30:42.323 に答える