如何手动分配社区和衡量模块化？

I have a network for which I would like to compare the modularity scores that are derived from various algorithms, e.g. walktrap, with the modularity scores that are derived by community membership of my own choosing (assigned by hand). For example, I would like to be able to assign every node a "commmunity" of 1 or 2. So far, I have used various means to try to achieve this and they typically crash the R environment when I run modularity(graph1, assigned_communities). I have a network for which I would like to comp