v=7
b=7
k=3
N=matrix(c(1 , 0 , 0 , 0 , 1 , 0 , 1 ,
0 , 0 , 0 , 1 , 0 , 1 , 1 ,
0 , 0 , 1 , 0 , 1 , 1 , 0 ,
1 , 0 , 1 , 1 , 0 , 0 , 0 ,
0 , 1 , 1 , 0 , 0 , 0 , 1 ,
1 , 1 , 0 , 0 , 0 , 1 , 0 ,
0 , 1 , 0 , 1 , 1 , 0 , 0
),nrow=7,byrow=TRUE)
D_eff(v,b,k,N)Run the code above in your browser using DataLab