我正在尝试在 rMarkdown ioslides_presentation 文档中使用 formattable 的示例(link)。一切正常,但幻灯片中的表格看起来不像我只是从R运行而没有编织HTML。
```{r echo=FALSE, results='asis',error=F, warning=F}
library(formattable)
library(plotly)
DF <- data.frame(Ticker=c("", "", "", "IBM", "AAPL", "MSFT"),
Name=c("Dow Jones", "S&P 500", "Technology",
"IBM", "Apple", "Microsoft"),
Value=accounting(c(15988.08, 1880.33, NA,
130.00, 97.05, 50.99)),
Change=percent(c(-0.0239, -0.0216, 0.021,
-0.0219, -0.0248, -0.0399)))
DF
formattable(DF, list(
Name=formatter(
"span",
style = x ~ ifelse(x == "Technology",
formattable::style(font.weight = "bold"), NA)),
Value = color_tile("white", "orange"),
Change = formatter(
"span",
style = x ~ formattable::style(color = ifelse(x < 0 , "red", "green")),
x ~ icontext(ifelse(x < 0, "arrow-down", "arrow-up"), x)))
)
```
如何在ioslides_presentation中获得相同的表格外观?
答案 0 :(得分:0)
添加以下样式表:
<link rel="stylesheet" href="https://maxcdn.bootstrapcdn.com/bootstrap/3.3.7/css/bootstrap.min.css">
您也可以在本地使用,因为即使您在YAML标头中使用self_contained: true
,上述解决方案也需要互联网连接。