パンダー テーブルのセルを太字にするかどうかに応じた基準を適用したいと考えています。ただし、この基準を他の列ではなく、テーブルの単一の列に適用したいと考えています。
完全なマークダウン ドキュメントは次のとおりです。
---
title: "Untitled"
output: pdf_document
---
```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```
```{r toy data}
pVal <- as.character(c(0.9, 0.04, 0.6, 0.0003))
FVal <- as.character(c(0.03, 2.51, 1.7, 32.1))
Group <- c("A", "B", "C", "D")
df <- data.frame(Group, FVal, pVal, stringsAsFactors = FALSE)
library(pander)
emphasize.strong.cells(which(df < 0.05, arr.ind = TRUE))
pander(df)
```
ここには 2 つの問題があります。
FVal1 つ目は、列の基準を満たす値も太字になっているという事実です。pVal値 <.05 を列のみで太字にしたい。emphasize.strong.cells私はそのよう に関数にサブセット化しようとしました
emphasize.strong.cells(which(df$pVal < 0.05, arr.ind = TRUE))
また
emphasize.strong.cells(which(df[,"pVal"] < 0.05, arr.ind = TRUE))
しかし、どちらも機能しませんでした。このようにサブセット化すると、emphasize.strong.cells関数に複数の次元を持つオブジェクトが与えられないため、これが発生していると思われますが、基準に対して1つの列のみが「アクティブ」であるようなオブジェクトを作成する方法がわかりません。
2番目の問題は、pVal列の最後の要素が最終的なrmarkdown pdfで太字にされていないことです。科学表記法への変換が原因であると思います。
どんな解決策も大歓迎です。