知识图谱主要是通过将应用数学，图形学，信息可视化技术，信息科学等学科的理论与方法与计量学引文分析、共现分析等方法结合，利用可视化的图谱形象地展示学科的核心结构、发展历史、前沿领域以及整体知识达到多学科融合目的的现代理论。
今天我们借助networkD3包里面的simpleNetwork 函数来绘制一个类似CSDN的知识图谱，效果图如下：
首先我们先来分析一下这张图，图里面的支付——微信支付，小程序——小程序，等这些，它们之间本不需要连线，但这里是为了美观好看，才有这些连线，但实际却没有什么意义。使用simpleNetwork 函数不能绘制类似微信支付——微信支付 的这种关系。我把这些数据整理写在了一个TXT文件里面，截图如下。
接下来我们分析一下 simpleNetwork，它的原型如下：
simpleNetwork(Data, Source = NULL, Target = NULL, height = NULL, width = NULL, linkDistance = 50, charge = -200, fontSize = 7, fontFamily = "serif", linkColour = "#666", nodeColour = "#3182bd", nodeClickColour = "#E34A33", textColour = "#3182bd", opacity = 0.6, zoom = F)
参数解释如下：
| Data | 数据源 |
| Source | 默认为数据框的第一行，网络源变量 |
| Target | 默认为数据框的第二行，网络源目标变量 |
| height | 设置图像所占页面大小 |
| width | 设置图像所占页面大小 |
| linkDistance | 中间连线的长度，默认为50，数值越大，连线越长 |
| charge | 点与点之间的吸引力，值越大，点与点之间距离越近，值越小，点与点之间距离越大 |
| fontSize | 节点名称字体大小 |
| fontFamily | 设置标签字体 |
| linkColour | 连线颜色 |
| nodeColour | 节点颜色 |
| nodeClickColour | 点击后颜色 |
| textColour | 字体颜色 |
| opacity | opacity=0时，透明度为0，看不到图像，最大值为1，超过1也默认为1 |
| zoom | 逻辑值为true是可以缩放，false时无法缩放 |
我想这里有了上面这个参数表，大家肯定就会对simpleNetwork这个函数十分了解了。首先我们来一个最简单。
data<-read.table("network.txt",header = FALSE, sep = "")#读取数据 simpleNetwork(data)
结果如下：
现在我们就多加一些参数，然后看一下整体效果。
simpleNetwork(data,#数据 fontFamily="华文行楷",#字体设置 linkColour="#B23AEE",#连线颜色 nodeColour="#00CD66",#节点颜色 textColour="#0000FF",#文本颜色 charge = -550,#节点之间的引力 opacity=0.9,#透明度 zoom=TRUE #可缩放
结果如下：
至于其他参数大家可以自己去试试。，关注我的微信公众号《跟着菜鸟一起学R语言》，回复simpleNetwork，即可获取这次试用到的数据以及 RGB颜色查询对照表。
转载请注明原文链接：http://blog.csdn.net/wzgl__wh/article/details/53290514