library(dply)
data1<-head(iris)
data1
library(base)
library(table1)
table1(~ Sepal.Length Petal.Length Petal.Width,data = data1,overall = "Total")
table1(~ Sepal.Length Petal.Length Petal.Width,data = data1,overall = "Total",
topclass="Rtable1-zebra Rtable1-grid")
#Zebra:交替出現有陰影和無陰影的行(斑馬線)。
#grid:顯示所有網格線
#shade:對标題行進行灰色陰影處理
#times:使用襯線字體
#center:将所有列居中,包括包含行标簽的第一列。
以上制作并修改的白表格是沒有進行分成的,若想要進行分層,示例如下:
table1(~ 屬性1 屬性2 屬性3 ......| 分層的内容, data=數據集, overall = "Total")
PS:表格的制作是不可以根據自己喜好修改表格!
,更多精彩资讯请关注tft每日頭條,我们将持续为您更新最新资讯!