我有一个数据框
df = data.frame("A" = c("a","b, c","c","d, e, f"), "B" = c(1,2,3,4), "link" = c("www.a.com", "www.b.com, www.c.com", "www.c.com", "www.d.com, www.e.com, www.f.com"))
A B链接
A 1 www.a.com
b、c 2 www.b.com、www.c.com
C3 www.c.com
d,e,f 4 www.d.com,www.e.com,www.f.com
我制作了格式表
dt.ft <- regulartable(data = dt[, list(A, B, link)])
我想让"A“列中的值与"link”列中的相应值进行超链接,这是我在@DavidGohel的帮助下使用以下命令实现的
dt.ft <- flextable(data = df, col_keys = c("A", "B"))
dt.ft <- compose(x = dt.ft, j = 1, value = as_paragraph( hyperlink_text(x = A, url = link)))
D
这很好用。但是正如你所看到的,在"A“列中有逗号分隔的值,在"link”列中有逗号分隔的链接。如何使相应的超链接显示在同一单元格中?这样,弹性表格将具有列"A“,第二行将具有"b”和"c“超链接到"www.b.com”和"www.c.com“。
如果有任何其他选择来设计DF,我可以做到。它只是我有动态的内容,它会从不同的价值,即。我不知道之前的链接数量。
https://stackoverflow.com/questions/55496434
复制相似问题