R ppcor包和ggm包的比较

ggm

> score = read.csv("学生成绩.csv")[,-1]
> score
   工数1 工数2 线性代数 概率论 应用统计
1     95    96       95    100     84.0
2     95    96       97     94     95.5
3     94    93       94    100     77.0
4     93    95       95     99     83.0
5     91    90       86     95     81.0
6     91    96       95     93     69.0
7     91    93      100     99     75.0
8     89    91       90     95     72.0
9     89    84       85     96     84.0
10    88    77       94</