1

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) 
4

1 回答 1

0

SVG 文本元素不支持换行符。看,例如...

如何在javascript中换行svg文本?

如何在 SVG 中显示多行文本?

于 2017-08-30T10:03:55.993 回答