perms.mod.sig <- perms.sig(g[[1]], g[[2]], perms.all, 'mod', level='graph',
'less', groups, ylabel='Modularity')
perms.mod.btwn <- perms.sig(g[[1]], g[[2]], perms.btwn, 'btwn.cent',
level='vertex')Run the code above in your browser using DataLab