在表格中創建超鏈接並調整列以包裝文本Rmarkdown

Question

我試圖在表格中創建超鏈接並調整列以包裝文本並生成pdf。

例表：

variable<-"testing a long column to wrap testing a long column to wrap " 
col1<-"\href{https://www.google.co.uk/}{click here}" 
col2<-"[click here](https://www.google.co.uk/)" 
col3<-"[click here](https://www.google.co.uk/)" 
col4<-"[click here](https://www.google.co.uk/)" 
col5<-"[click here](https://www.google.co.uk/)" 
test<-data.frame(variable,col1,col2,col3,col4,col5) 

當我嘗試了以下它正確地給出了超鏈接，但不調整列寬

library(kableExtra) 
knitr::kable(test,row.names=FALSE) %>% 
    column_spec(1, width = "5cm") 

但是，當我與包括試圖format ='latex'然後超鏈接不工作，但列寬和包裝文本

library(kableExtra) 
knitr::kable(test,format ='latex' ,row.names=FALSE) %>% 
    column_spec(1, width = "5cm") 

請幫忙我添加超鏈接並調整Rmarkdown中的列寬。

Answer 1

kableExtra只適用於kable生成原始HTML/PDF代碼。這就是爲什麼當你不指定格式時，column_spec不起作用。

指定格式後，此問題轉變爲「如何將鏈接放在kable（latex）」問題中。事實上，你已經非常接近答案。問題是你必須在kable中設置escape爲F，這樣它才能保持LaTeX代碼的原樣。你也必須在col1中加倍轉義反斜槓，因爲它是一個「R的東西」。

variable<-"testing a long column to wrap testing a long column to wrap " 
col1<-"\\href{https://www.google.co.uk/}{click here}" 
col2<-"\\href{https://www.google.co.uk/}{click here}" 
col3<-"\\href{https://www.google.co.uk/}{click here}" 
col4<-"\\href{https://www.google.co.uk/}{click here}" 
col5<-"\\href{https://www.google.co.uk/}{click here}" 
test<-data.frame(variable,col1,col2,col3,col4,col5) 

knitr::kable(test,format ='latex',row.names=FALSE, escape = F) %>% 
    column_spec(1, width = "5cm")