1
我在用chordNetwork標籤打包長文本（用分號分隔）時出現問題。chordNetwork - 在標籤中包裝文本
我試過在分號後粘貼"\n"，但沒有奏效。
結果，我想在標籤：
xxxxxxxxxxxxxxxxxxxxxxxxxx;
yyyyyyyyyyyyyyyyyy
下面是代碼：
# create a simple data frame
d2 <- data.frame(from=LETTERS[1:5],to=c("xxxxxxxxxxxxxxxxxxxxxxxxxx;\n yyyyyyyyyyyyyyyyyy","X","X","Y","Y"),v=runif(5),stringsAsFactors = F)
d2
# convert data frame into a square matrix for chordNetwork data structure
d2 <- rbind(d2, data.frame(from=d2$to,to=d2$from,v=NA))
d2
str(d2)
library(tidyr)
library(dplyr)
library(networkD3)
d2 %>% spread(key = to,value = v) %>% select(-from) %>% as.matrix() ->d2
rownames(d2) <- colnames(d2)
d2;dim(d2)
chordNetwork(d2, height = 500, width = 500, initialOpacity = 0.8,
useTicks = 0, padding = 0.1, fontSize = 9,
fontFamily = "sans-serif", labels = colnames(d2), labelDistance = 0)