我有以下表格，我想知道是否有辦法改變表格的格式，使分隔線不僅可以水平顯示，而且可以像excel中的單元格那樣顯示，或者像kable、kableExtra那樣顯示。然而，我認為我所看到的唯一的例子是以某種HTML方式呈現表格。
代碼：
library("htmltools") /span>
library("webshot")
library(formattable)
DF <- data. frame(Ticker=c("。 ""。 "", "IBM"/span>。 "AAPL", "MSFT"),
名稱=c("道瓊斯", "S&。 P 500", "Technology",
"IBM", "蘋果"。 "Microsoft"）,
值=會計(c（15988. 08, 1880.33, 50,
130.00, 97.05, 50. 99)),
變化=%(c(-0。 0239, -0. 0216, 0.021,
-0.0219,/span> -0. 0248, -0. 0399）））
FT <- formattable(DF, list()
Name=formatter("span",
style= x ~ ifelse(x = "Technology"。 style(font. weight = "bold"）。 NA)),
#Value = color_tile("white", "orange"),
值 = color_bar("orange" ,/span> fun = unit.scale
）,
改變=formatter("span",)
style = x ~ style(color = ifelse( x < 0 , "red"。 "green")),
x ~ icontext(ifelse(x < 0, "箭頭向下"。 "arrow-up"）。 x))) )
傅園慧
當前表格：
我想使用的樣式：
萬一不能使用格子的正方形風格，你認為是否至少可以將分割線從原來的灰色改為黑色或紅色的線條？
謝謝！
uj5u.com熱心網友回復：
你可以像這樣在最終的HTML小部件中添加css：
library（webshot）
library(formattable)
library(htmltools)
library(htmlwidgets)
DF <- data.frame()
Ticker = c(""。 "", ""。 "IBM",/span> "AAPL"。 "MSFT"),
名稱 = c()
"道瓊斯", "S& P 500", "Technology",
"IBM", "Apple", "Microsoft"
),
值 =會計(c()
15988.08, 1880.33, 50,
130.00, 97.05, 50.99[/span
)),
改變=百分比(c()
-0.0239, -0. 0216, 0.021,
-0.0219,/span> -0. 0248, -0.0399。
））
)
formattable(DF)%>%
as.htmlwidget（） %>%
prependContent(tags$style("table, td, tr, th { border: 1px solid black !important;}"））
轉載請註明出處，本文鏈接：https://www.uj5u.com/shujuku/318949.html
標籤：
下一篇：波譜圖：標記一個離群點