PDF Rmarkdown-多行单元格中的对齐不正确_Pdf_Alignment_R Markdown_Knitr_Kable

PDF Rmarkdown-多行单元格中的对齐不正确

pdf

PDF Rmarkdown-多行单元格中的对齐不正确,pdf,alignment,r-markdown,knitr,kable,Pdf,Alignment,R Markdown,Knitr,Kable,出于某种原因，下面的代码生成一个表，其中最后一列交替对齐（左、右、中、左……）。我曾尝试将\\用作换行符而不是\n，但这只会在每个功能之间产生一个笨拙且巨大的空间。我更希望最后一篇专栏文章是以中心为中心的——有人知道为什么会发生这种情况吗 library(knitr) library(kableExtra) df <- data.frame(Metric = c("ECG (mV)", "EDA ($\\mu$s)","EMG (mV)&q

出于某种原因，下面的代码生成一个表，其中最后一列交替对齐（左、右、中、左……）。我曾尝试将\\用作换行符而不是\n，但这只会在每个功能之间产生一个笨拙且巨大的空间。我更希望最后一篇专栏文章是以中心为中心的——有人知道为什么会发生这种情况吗

library(knitr)
library(kableExtra)
df <- data.frame(Metric = c("ECG (mV)", "EDA ($\\mu$s)","EMG (mV)", "Temp (C$^\\circ$)","Resp ($\\%$)", 
                            "BVP", "EDA ($\\mu$s)", "Temp (C$^\\circ$)"), 
                 Description = linebreak(c("Electrocardiography", "Electrodermal Activity", "Electromyography", "Body Temperature", "Respiration",
                                           "Blood Volume Pulse", "Electrodermal Activity", "Skin Temperature")), 
                 Features = linebreak(c("Mean \n Std Deviation \n Peaks", "Mean \n Std Deviation", "Mean \n Std Deviation", 
                                        "Mean \n Std Deviation", "Mean \n Std Deviation \n Peaks", 
                                        "Mean \n Std Deviation \n Heart Rate Variability", "Mean \n Std Deviation", 
                                        "Mean \n Std Deviation")))
kable(df, format = "latex", escape = F, align="c") %>%
  group_rows(index = c("RespiBAN Chest Sensor" = 5, "Empatica E4 Wrist Sensor" = 3)) %>%
  kable_styling(bootstrap_options = c("hover"))

库（knitr）
图书馆（kableExtra）
df%
组行（索引=c（“RespiBAN胸部传感器”=5，“Empatica E4腕部传感器”=3））%>%
可缩放样式（引导选项=c（“悬停”））

折叠行数\u dt%
组行（索引=c（“RespiBAN胸部传感器”=12，“Empatica E4腕部传感器”=7））%>%
列规格（1，粗体=T）%>%
折叠行（列=1:2，latex_hline=“major”，valign=“middle”）

绝对不是一个理想的解决方案，但它确实起到了作用

折叠行数\u dt%
组行（索引=c（“RespiBAN胸部传感器”=12，“Empatica E4腕部传感器”=7））%>%
列规格（1，粗体=T）%>%
折叠行（列=1:2，latex_hline=“major”，valign=“middle”）

绝对不是一个理想的解决方案，但它确实起到了作用

将

align=“c”

添加到

linebreak

应该可以工作

library(knitr)
library(kableExtra)
df <- data.frame(Metric = c("ECG (mV)", "EDA ($\\mu$s)","EMG (mV)", "Temp (C$^\\circ$)","Resp ($\\%$)", 
                            "BVP", "EDA ($\\mu$s)", "Temp (C$^\\circ$)"), 
                 Description = linebreak(c("Electrocardiography", "Electrodermal Activity", "Electromyography", "Body Temperature", "Respiration",
                                           "Blood Volume Pulse", "Electrodermal Activity", "Skin Temperature")), 
                 Features = linebreak(c("Mean \n Std Deviation \n Peaks", "Mean \n Std Deviation", "Mean \n Std Deviation", 
                                        "Mean \n Std Deviation", "Mean \n Std Deviation \n Peaks", 
                                        "Mean \n Std Deviation \n Heart Rate Variability", "Mean \n Std Deviation", 
                                        "Mean \n Std Deviation"), align = "c")) #This parameter

库（knitr）
图书馆（kableExtra）
df将align=“c”
添加到linebreak
应该有效
library(knitr)
library(kableExtra)
df <- data.frame(Metric = c("ECG (mV)", "EDA ($\\mu$s)","EMG (mV)", "Temp (C$^\\circ$)","Resp ($\\%$)", 
                            "BVP", "EDA ($\\mu$s)", "Temp (C$^\\circ$)"), 
                 Description = linebreak(c("Electrocardiography", "Electrodermal Activity", "Electromyography", "Body Temperature", "Respiration",
                                           "Blood Volume Pulse", "Electrodermal Activity", "Skin Temperature")), 
                 Features = linebreak(c("Mean \n Std Deviation \n Peaks", "Mean \n Std Deviation", "Mean \n Std Deviation", 
                                        "Mean \n Std Deviation", "Mean \n Std Deviation \n Peaks", 
                                        "Mean \n Std Deviation \n Heart Rate Variability", "Mean \n Std Deviation", 
                                        "Mean \n Std Deviation"), align = "c")) #This parameter

库（knitr）
图书馆（kableExtra）
df