我想在使用knitr
'skable
函数时在一些数字前后添加符号和字母,但不知道如何有效地做到这一点。然而,我也愿意考虑pandoc
/pander
如果它更好/更有效。
最终结果应该是一个 HTML 表格......或者一个非常好的图形......
请参阅以下代码作为 .Rmd 文件中的模拟可重现示例:
### Notional and Cumulative P&L
```{r echo=FALSE}
Notional <- 10000
yday_pnl <- -2942
wtd_pnl <- 2300
mtd_pnl <- -3334
ytd_pnl <- 5024
yday_rtn <- (yday_pnl/Notional)*10000
wtd_rtn <- (wtd_pnl/Notional)*10000
mtd_rtn <- (mtd_pnl/Notional)*10000
ytd_rtn <- (ytd_pnl/Notional)*10000
Value <- c(Notional,yday_pnl,wtd_pnl,mtd_pnl,ytd_pnl)
rtn <- c(NA,yday_rtn,wtd_rtn,mtd_rtn,ytd_rtn)
COB.basics <- as.data.frame(cbind(Value,rtn))
rownames(COB.basics) <- c('Notional','yday pnl','wtd_pnl','mtd_pnl','ytd_pnl')
```
```{r results='asis',echo=FALSE}
kable(COB.basics,digits=2)
```
与 Excel 的货币或会计格式类型非常相似,我希望值字段在列中使用 $ 符号Value
,而对于rtn
列,我希望bps
在数字后面加上字符串……为了便于阅读,是否可以如果在小数点之前,三位数字后面有逗号吗?即代表数千等。
也可以给细胞上色吗?并且也为文本/数字着色?即红色表示负值?