2019独角兽企业重金招聘Python工程师标准>>>
一、导入数据,初始图
> library(circlize)
> data<-read.table("C:/Users/cuiy/Desktop/PersonalData/qianxi.csv",sep=",",header=T)
> head(data)from to value
1 中山 珠海 21.1
2 珠海 中山 20.9
3 深圳 中山 8.6
4 广州 中山 15.5
5 佛山 中山 17.0
6 东莞 中山 8.2
> chordDiagram(data)
二、去掉刻度
chordDiagram(data,annotationTrack=c("name","grid",NULL))
三、调整顺序
chordDiagram(data,annotationTrack=c("name","grid",NULL),order=c("广州","深圳","佛山","中山","珠海","东莞"))
#使用order参数调整顺序,默认3点钟顺时针方向
四、调整外围sector颜色和透明度
> col<-c(广州="red",深圳="blue",佛山="darkcyan",中山="yellow",珠海="coral",东莞="bisque")
> chordDiagram(data,annotationTrack=c("name","grid",NULL),order=c("广州","深圳","佛山","中山","珠海","东莞"),grid.col=col,transparency=0.7)
参考:https://jokergoo.github.io/circlize_book/book/the-chorddiagram-function.html#self-links