R/group_sim.R
temp__GroupSim_SimDB.Rd
GroupSim_SimDB
GroupSim_SimDB(dag, group1, group2, verbose = simona_opt$verbose)
It is:
group_sim = 2*length(intersect(A, B))/(length(A) + length(B))