<?xml version="1.0" encoding="utf-8"?>
<!DOCTYPE article PUBLIC "-//NLM//DTD JATS (Z39.96) Journal Publishing DTD v1.0 20120330//EN" "JATS-journalpublishing1.dtd">
<article xmlns:mml="http://www.w3.org/1998/Math/MathML" xmlns:xlink="http://www.w3.org/1999/xlink" article-type="research-article">
<front>
<journal-meta>
<journal-id journal-id-type="publisher-id">NEJSDS</journal-id>
<journal-title-group><journal-title>The New England Journal of Statistics in Data Science</journal-title></journal-title-group>
<issn pub-type="ppub">2693-7166</issn><issn-l>2693-7166</issn-l>
<publisher>
<publisher-name>New England Statistical Society</publisher-name>
</publisher>
</journal-meta>
<article-meta>
<article-id pub-id-type="publisher-id">NEJSDS32</article-id>
<article-id pub-id-type="doi">10.51387/23-NEJSDS32</article-id>
<article-categories>
<subj-group subj-group-type="heading"><subject>Methodology Article</subject></subj-group>
<subj-group subj-group-type="area"><subject>Statistical Methodology</subject></subj-group>
</article-categories>
<title-group>
<article-title>Constrained Community Detection in Social Networks</article-title>
</title-group>
<contrib-group>
<contrib contrib-type="author">
<name><surname>Viles</surname><given-names>Weston D.</given-names></name><email xlink:href="mailto:w.viles@northeastern.edu">w.viles@northeastern.edu</email><xref ref-type="aff" rid="j_nejsds32_aff_001"/><xref ref-type="corresp" rid="cor1">∗</xref>
</contrib>
<contrib contrib-type="author">
<name><surname>O’Malley</surname><given-names>A. James</given-names></name><email xlink:href="mailto:james.omalley@dartmouth.edu">james.omalley@dartmouth.edu</email><xref ref-type="aff" rid="j_nejsds32_aff_002"/>
</contrib>
<aff id="j_nejsds32_aff_001">Khoury College of Computer Science, <institution>Northeastern University, Roux Institute</institution>, Portland, ME <country>USA</country>. E-mail address: <email xlink:href="mailto:w.viles@northeastern.edu">w.viles@northeastern.edu</email></aff>
<aff id="j_nejsds32_aff_002">Department of Biomedical Data Science and The Dartmouth Institute for Health Policy and Clinical Practice, <institution>Geisel School of Medicine, Dartmouth College</institution>, Hanover, NH <country>USA</country>. E-mail address: <email xlink:href="mailto:james.omalley@dartmouth.edu">james.omalley@dartmouth.edu</email></aff>
</contrib-group>
<author-notes>
<corresp id="cor1"><label>∗</label>Corresponding author.</corresp>
</author-notes>
<pub-date pub-type="ppub"><year>2024</year></pub-date><pub-date pub-type="epub"><day>28</day><month>4</month><year>2023</year></pub-date><volume>2</volume><issue>3</issue><fpage>368</fpage><lpage>379</lpage><history><date date-type="accepted"><day>5</day><month>3</month><year>2023</year></date></history>
<permissions><copyright-statement>© 2024 New England Statistical Society</copyright-statement><copyright-year>2024</copyright-year>
<license license-type="open-access" xlink:href="http://creativecommons.org/licenses/by/4.0/">
<license-p>Open access article under the <ext-link ext-link-type="uri" xlink:href="http://creativecommons.org/licenses/by/4.0/">CC BY</ext-link> license.</license-p></license></permissions>
<abstract>
<p>Community detection in networks is the process by which unusually well-connected sub-networks are identified–a central component of many applied network analyses. The paradigm of <italic>modularity quality function optimization</italic> stipulates a partition of the network’s vertexes that maximizes the difference between the fraction of edges within communities and the corresponding expected fraction if edges were randomly allocated among all vertex pairs while conserving the degree distribution. The modularity quality function incorporates exclusively the network’s topology and has been extensively studied whereas the integration of constraints or external information on community composition has largely remained unexplored. We define a greedy, recursive-backtracking search procedure to identify the constitution of high-quality network communities that satisfy the global constraint that each community be comprised of at least one vertex among a set of so-called <italic>special vertexes</italic> and apply our methodology to identifying health care communities (HCCs) within a network of hospitals such that each HCC consists of at least one hospital wherein at least a minimum number of cardiac defibrillator surgeries were performed. This restriction permits meaningful comparisons in cardiac care among the resulting health care communities by standardizing the distribution of cardiac care across the hospital network.</p>
</abstract>
<kwd-group>
<label>Keywords and phrases</label>
<kwd>Modularity</kwd>
<kwd>Discrete and constrained optimization</kwd>
<kwd>Patient-sharing network</kwd>
<kwd>Health care network communities</kwd>
</kwd-group>
<funding-group><award-group><funding-source xlink:href="https://doi.org/10.13039/100000002">NIH</funding-source><award-id>U01 AG046830</award-id><award-id>P01 AG019783</award-id></award-group><funding-statement>Research for the paper was supported by NIH grants U01 AG046830 and P01 AG019783.</funding-statement></funding-group>
</article-meta>
</front>
<body>
<sec id="j_nejsds32_s_001">
<label>1</label>
<title>Introduction</title>
<p>Networks are collections of interconnected entities, e.g. social networks of communicating actors, ecological networks of flora and fauna commensalism, and computer networks.[<xref ref-type="bibr" rid="j_nejsds32_ref_031">31</xref>, <xref ref-type="bibr" rid="j_nejsds32_ref_026">26</xref>] Network-graphs, or simply graphs, are mathematical objects consisting of a vertex set, e.g., one vertex per network entity, and an edge set, e.g., a set of pairs of vertexes involved in a network connection, that represent the arrangements of pairwise relationships in the network.[<xref ref-type="bibr" rid="j_nejsds32_ref_009">9</xref>]</p>
<p>Methodology developed in the fields of social networks, network science, and graph theory provides for the analysis of relational data generated from a variety of measurements across scientific disciplines.[<xref ref-type="bibr" rid="j_nejsds32_ref_022">22</xref>, <xref ref-type="bibr" rid="j_nejsds32_ref_008">8</xref>] Community detection is the process of identifying exceptionally dense subnetworks of mutually well-connected network entities, known as communities, that often have functional meaning in the network.[<xref ref-type="bibr" rid="j_nejsds32_ref_012">12</xref>] Notable approaches to community detection include the clique percolation method [<xref ref-type="bibr" rid="j_nejsds32_ref_024">24</xref>], spectral partitioning [<xref ref-type="bibr" rid="j_nejsds32_ref_005">5</xref>], degree-corrected stochastic block models [<xref ref-type="bibr" rid="j_nejsds32_ref_018">18</xref>], modularity optimization [<xref ref-type="bibr" rid="j_nejsds32_ref_021">21</xref>], and multi-slice network community detection [<xref ref-type="bibr" rid="j_nejsds32_ref_020">20</xref>]. These approaches are designed for the unsupervised partitioning of the vertex set of a graph into unusually cohesive subsets of vertexes, and with varied applications in sociology [<xref ref-type="bibr" rid="j_nejsds32_ref_033">33</xref>], computer architecture [<xref ref-type="bibr" rid="j_nejsds32_ref_013">13</xref>], and biology [<xref ref-type="bibr" rid="j_nejsds32_ref_002">2</xref>], illustrate that myriad methodology in community detection procedures are applied broadly in scientific research.</p>
<p>Community detection procedures commonly integrate network connectivity exclusively, without regard for other quantities of interest, e.g., auxiliary measurements on vertexes.[<xref ref-type="bibr" rid="j_nejsds32_ref_010">10</xref>]. We refer the reader to recent expositions on the state of the science of community detection in networks including [<xref ref-type="bibr" rid="j_nejsds32_ref_016">16</xref>, <xref ref-type="bibr" rid="j_nejsds32_ref_030">30</xref>, <xref ref-type="bibr" rid="j_nejsds32_ref_034">34</xref>, <xref ref-type="bibr" rid="j_nejsds32_ref_027">27</xref>] that detail existing methods with respect to certain applications. It is essential to note that constraints are not commonly imposed on the community structure in networks by existing methods.</p>
<p>We are motivated to partition a nation-wide network of hospitals into subnetworks of hospitals that (i) exhibit a high level of within-group patient sharing as quantified by the network modularity quality function and (ii) consist of at least one hospital that has hosted a minimum number of <italic>implantable cardioverter defibrillator</italic> (ICD) surgeries to define as <italic>health care communities</italic> (HCCs) that provide a comparable level of cardiac care. We utilize data acquired from health insurance claims made to the Medicare national social insurance program during the period 2006-2011 in addition to the quantity of ICD surgeries at the major cardiovascular referral centers known as <italic>cardiac care facilities</italic> (CCFs). The preeminent work in this domain is the <italic>Dartmouth Atlas</italic> in which the then Center for the Evaluative Clinical Sciences, Dartmouth Medical School [<xref ref-type="bibr" rid="j_nejsds32_ref_028">28</xref>] assigned hospitals to one of 306 <italic>health referral regions</italic> (HRRs) representing markets for tertiary medical care. The significant contributions made by the Dartmouth Atlas to health services research motivates our work but our methodology, which is based on network-graph topology, is a departure from the HRRs strict adherence to geographic proximity that continues to be pursued by some efforts to modernize the designations. [<xref ref-type="bibr" rid="j_nejsds32_ref_029">29</xref>] Related work in defining regions according to network topology for the purposes of measuring health care variation across regions are nonetheless fundamentally based on geography. [<xref ref-type="bibr" rid="j_nejsds32_ref_014">14</xref>, <xref ref-type="bibr" rid="j_nejsds32_ref_017">17</xref>, <xref ref-type="bibr" rid="j_nejsds32_ref_015">15</xref>] Note that geographic proximity could be an alternative or additional constraint to our network-based method but is not necessary. In particular, if the analysis health care services provided by telemedicine or remote monitoring is desired then geographic information may be ignored intentionally in the discovery of network communities.</p>
<p>We develop in the following a recursive backtracking procedure for greedy search of high modularity communities that are each constrained by the requirement to contain at least one of the so-called <italic>special vertexes</italic>, which in the present application are the network-graph representatives of the hospital network cardiac care facilities at which a minimum number of ICD surgeries were performed and apply the method to approximate the optimal health care community assignment for each hospital in the network.</p>
<p>The inclusion of constraints in community detection, particularly a constraint of the nature under present consideration, is pertinent across many domains and applications. The community structure in any social network consisting of entities possessing distinct classes or attributes, e.g., standard entities versus noteworthy entities, may be more accurately characterized by our methodology. For example, a researcher seeking to partition the individuals of social communication networks that are the result of correspondences among senior and junior members of an organization, e.g., the Enron corpus [<xref ref-type="bibr" rid="j_nejsds32_ref_019">19</xref>], may enforce through our methodology the constraint that each community of organization members in the network consist of at least one senior member. (A reason for doing this is that the researcher knows how the organization structures its workforce but does not know which senior employee is grouped with which junior employees). This example is retrospective in that latent groups are being rediscovered by the researcher. The same example could apply in a prospective form. For example, given a network of professional relationships among its employees of different ranks, a company could use the algorithm to form optimal groups with at least one senior employee per group. Analogous examples might also arise in peer mentoring situations – a teacher in a classroom might use a friendship network among the students to form workgroups such that each group consists of at least one student who is performing very well (on course for the top possible grade) who can help the other students understand the material. On the other hand, a researcher investigating the community structure in a trophic network [<xref ref-type="bibr" rid="j_nejsds32_ref_011">11</xref>] may desire a partition of species in which each community contains at least one member of the Canidae taxonomic family. We emphasize that applications of our methodology abound in networks consisting of heterogeneous entities.</p>
</sec>
<sec id="j_nejsds32_s_002">
<label>2</label>
<title>Background</title>
<p>We represent the nation-wide hospital network with the weighted, undirected graph <inline-formula id="j_nejsds32_ineq_001"><alternatives><mml:math>
<mml:mi mathvariant="script">G</mml:mi>
<mml:mo>=</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">V</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="bold">E</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$\mathcal{G}=(\mathbf{V},\mathbf{E})$]]></tex-math></alternatives></inline-formula> which designates one vertex <inline-formula id="j_nejsds32_ineq_002"><alternatives><mml:math>
<mml:mi mathvariant="italic">v</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:mi mathvariant="bold">V</mml:mi></mml:math><tex-math><![CDATA[$v\in \mathbf{V}$]]></tex-math></alternatives></inline-formula> for each hospital and a positively weighted edge <inline-formula id="j_nejsds32_ineq_003"><alternatives><mml:math>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:mi mathvariant="italic">u</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">v</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">w</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">u</mml:mi>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo fence="true" stretchy="false">}</mml:mo>
<mml:mo stretchy="false">∈</mml:mo>
<mml:mi mathvariant="bold">E</mml:mi></mml:math><tex-math><![CDATA[$\{u,v,{w_{uv}}\}\in \mathbf{E}$]]></tex-math></alternatives></inline-formula> for each pair of vertexes <inline-formula id="j_nejsds32_ineq_004"><alternatives><mml:math>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:mi mathvariant="italic">u</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">v</mml:mi>
<mml:mo fence="true" stretchy="false">}</mml:mo>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup></mml:math><tex-math><![CDATA[$\{u,v\}\in {\mathbf{V}^{2}}$]]></tex-math></alternatives></inline-formula> that represents interacting entities in the network, e.g., patient-sharing hospitals, where <inline-formula id="j_nejsds32_ineq_005"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo>=</mml:mo>
<mml:mi mathvariant="bold">V</mml:mi>
<mml:mo>×</mml:mo>
<mml:mi mathvariant="bold">V</mml:mi></mml:math><tex-math><![CDATA[${\mathbf{V}^{2}}=\mathbf{V}\times \mathbf{V}$]]></tex-math></alternatives></inline-formula> is the set of vertex pairs. Note that if <inline-formula id="j_nejsds32_ineq_006"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">w</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">u</mml:mi>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>=</mml:mo>
<mml:mn>0</mml:mn></mml:math><tex-math><![CDATA[${w_{uv}}=0$]]></tex-math></alternatives></inline-formula> then <inline-formula id="j_nejsds32_ineq_007"><alternatives><mml:math>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:mi mathvariant="italic">u</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">v</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>0</mml:mn>
<mml:mo fence="true" stretchy="false">}</mml:mo>
<mml:mo stretchy="false">∉</mml:mo>
<mml:mi mathvariant="bold">E</mml:mi></mml:math><tex-math><![CDATA[$\{u,v,0\}\notin \mathbf{E}$]]></tex-math></alternatives></inline-formula>. The weight <inline-formula id="j_nejsds32_ineq_008"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">w</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">u</mml:mi>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${w_{uv}}$]]></tex-math></alternatives></inline-formula> of edge <inline-formula id="j_nejsds32_ineq_009"><alternatives><mml:math>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:mi mathvariant="italic">v</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">u</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">w</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">u</mml:mi>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo fence="true" stretchy="false">}</mml:mo></mml:math><tex-math><![CDATA[$\{v,u,{w_{uv}}\}$]]></tex-math></alternatives></inline-formula> reflects the quantity of shared patient visits recorded in Medicare claims data between the hospitals represented by vertexes <inline-formula id="j_nejsds32_ineq_010"><alternatives><mml:math>
<mml:mi mathvariant="italic">u</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">v</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:mi mathvariant="bold">V</mml:mi></mml:math><tex-math><![CDATA[$u,v\in \mathbf{V}$]]></tex-math></alternatives></inline-formula>.</p>
<p>Suppose that the vertex subset <inline-formula id="j_nejsds32_ineq_011"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo stretchy="false">⊆</mml:mo>
<mml:mi mathvariant="bold">V</mml:mi></mml:math><tex-math><![CDATA[${\mathbf{V}^{\prime }}\subseteq \mathbf{V}$]]></tex-math></alternatives></inline-formula> contains the vertexes that are called <italic>special vertexes</italic> and represent network entities of a distinguishing nature. In the present scenario, <inline-formula id="j_nejsds32_ineq_012"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup></mml:math><tex-math><![CDATA[${\mathbf{V}^{\prime }}$]]></tex-math></alternatives></inline-formula> consists of the vertexes that represent the cardiac care facilities at which at least <italic>τ</italic> ICD surgeries, for some <inline-formula id="j_nejsds32_ineq_013"><alternatives><mml:math>
<mml:mi mathvariant="italic">τ</mml:mi>
<mml:mo stretchy="false">≥</mml:mo>
<mml:mn>0</mml:mn></mml:math><tex-math><![CDATA[$\tau \ge 0$]]></tex-math></alternatives></inline-formula>,<xref ref-type="fn" rid="j_nejsds32_fn_001">2</xref><fn id="j_nejsds32_fn_001"><label><sup>2</sup></label>
<p>The case that <inline-formula id="j_nejsds32_ineq_014"><alternatives><mml:math>
<mml:mi mathvariant="italic">τ</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>0</mml:mn></mml:math><tex-math><![CDATA[$\tau =0$]]></tex-math></alternatives></inline-formula> corresponds to unconstrained community detection, in which <inline-formula id="j_nejsds32_ineq_015"><alternatives><mml:math>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo>=</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup></mml:math><tex-math><![CDATA[$p={p^{\prime }}$]]></tex-math></alternatives></inline-formula>, and we include it here as a special case.</p></fn> were performed and define <inline-formula id="j_nejsds32_ineq_016"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo>=</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msubsup></mml:math><tex-math><![CDATA[${\mathbf{V}^{\prime }}={\mathbf{V}^{\prime }_{\tau }}$]]></tex-math></alternatives></inline-formula> accordingly. The information contained in the labeling of these special vertexes in <inline-formula id="j_nejsds32_ineq_017"><alternatives><mml:math>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msubsup></mml:math><tex-math><![CDATA[${\mathbf{V}^{\prime }_{\tau }}$]]></tex-math></alternatives></inline-formula> is information not encoded in the graph topology induced by the edge set <bold>E</bold> itself and, therefore, its integration into a standard community detection procedure must be made explicitly.</p>
<p>A useful mathematical representation of the weighted, undirected network-graph <inline-formula id="j_nejsds32_ineq_018"><alternatives><mml:math>
<mml:mi mathvariant="script">G</mml:mi></mml:math><tex-math><![CDATA[$\mathcal{G}$]]></tex-math></alternatives></inline-formula> in a variety of approaches to network science applications is the non-negative, symmetric <inline-formula id="j_nejsds32_ineq_019"><alternatives><mml:math>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo>×</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi></mml:math><tex-math><![CDATA[$p\times p$]]></tex-math></alternatives></inline-formula> matrix <bold>W</bold> in which <inline-formula id="j_nejsds32_ineq_020"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">W</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>=</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">w</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${W_{ij}}={w_{{v_{i}}{v_{j}}}}$]]></tex-math></alternatives></inline-formula>, for <inline-formula id="j_nejsds32_ineq_021"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup></mml:math><tex-math><![CDATA[${v_{i}},{v_{j}}\in {\mathbf{V}^{2}}$]]></tex-math></alternatives></inline-formula>, i.e. <inline-formula id="j_nejsds32_ineq_022"><alternatives><mml:math>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">j</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:mi mathvariant="double-struck">Z</mml:mi></mml:math><tex-math><![CDATA[$i,j\in \mathbb{Z}$]]></tex-math></alternatives></inline-formula> such that <inline-formula id="j_nejsds32_ineq_023"><alternatives><mml:math>
<mml:mn>1</mml:mn>
<mml:mo stretchy="false">≤</mml:mo>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mo mathvariant="normal">&lt;</mml:mo>
<mml:mi mathvariant="italic">j</mml:mi>
<mml:mo stretchy="false">≤</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi></mml:math><tex-math><![CDATA[$1\le i\lt j\le p$]]></tex-math></alternatives></inline-formula> corresponding to some ordering of the vertexes <inline-formula id="j_nejsds32_ineq_024"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">k</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">∈</mml:mo>
<mml:mi mathvariant="bold">V</mml:mi></mml:math><tex-math><![CDATA[${v_{k}}\in \mathbf{V}$]]></tex-math></alternatives></inline-formula>. The <italic>network modularity</italic> quality function 
<disp-formula id="j_nejsds32_eq_001">
<label>(2.1)</label><alternatives><mml:math display="block">
<mml:mtable displaystyle="true" columnalign="right left" columnspacing="0pt">
<mml:mtr>
<mml:mtd class="align-odd">
<mml:mi mathvariant="italic">Q</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">s</mml:mi>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="bold">W</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mtd>
<mml:mtd class="align-even">
<mml:mo>=</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
<mml:mi mathvariant="italic">m</mml:mi>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:munderover accentunder="false" accent="false">
<mml:mrow>
<mml:mstyle displaystyle="true">
<mml:mo largeop="true" movablelimits="false">∑</mml:mo></mml:mstyle>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
</mml:munderover>
<mml:mfenced separators="" open="(" close=")">
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">W</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>−</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
<mml:mi mathvariant="italic">m</mml:mi>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
</mml:mrow>
</mml:mfenced>
<mml:mn>1</mml:mn>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>=</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo fence="true" stretchy="false">}</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[\begin{aligned}{}Q(\mathbf{s}|\mathbf{W})& =\frac{1}{2m}{\sum \limits_{i,j}^{p}}\left({W_{ij}}-\frac{{d_{i}}{d_{j}}}{2m}\right)1\{{s_{i}}={s_{j}}\},\end{aligned}\]]]></tex-math></alternatives>
</disp-formula> 
where <inline-formula id="j_nejsds32_ineq_025"><alternatives><mml:math>
<mml:mi mathvariant="bold">s</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msub>
<mml:mrow/>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>=</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>2</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mo>…</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo fence="true" stretchy="false">}</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
</mml:msup></mml:math><tex-math><![CDATA[$\mathbf{s}\in {_{p}}={\{1,2,\dots ,p\}^{p}}$]]></tex-math></alternatives></inline-formula> is a community assignment vector consisting of at most <italic>p</italic> unique community membership labels, <inline-formula id="j_nejsds32_ineq_026"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>=</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mo largeop="false" movablelimits="false">∑</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>1</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
</mml:msubsup>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">W</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${d_{j}}={\textstyle\sum _{i=1}^{p}}{W_{ij}}$]]></tex-math></alternatives></inline-formula> is the degree of vertex <inline-formula id="j_nejsds32_ineq_027"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${v_{j}}$]]></tex-math></alternatives></inline-formula>, and <inline-formula id="j_nejsds32_ineq_028"><alternatives><mml:math>
<mml:mn>2</mml:mn>
<mml:mi mathvariant="italic">m</mml:mi>
<mml:mo>=</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mo largeop="false" movablelimits="false">∑</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>1</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
</mml:msubsup>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[$2m={\textstyle\sum _{j=1}^{p}}{d_{j}}$]]></tex-math></alternatives></inline-formula> is the total degree of the network-graph <inline-formula id="j_nejsds32_ineq_029"><alternatives><mml:math>
<mml:mi mathvariant="script">G</mml:mi></mml:math><tex-math><![CDATA[$\mathcal{G}$]]></tex-math></alternatives></inline-formula>. Note that <inline-formula id="j_nejsds32_ineq_030"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">W</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${W_{ij}}$]]></tex-math></alternatives></inline-formula> is the observed (true) weight of the edge connecting vertexes <inline-formula id="j_nejsds32_ineq_031"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${v_{i}}$]]></tex-math></alternatives></inline-formula> and <inline-formula id="j_nejsds32_ineq_032"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${v_{j}}$]]></tex-math></alternatives></inline-formula> whereas <inline-formula id="j_nejsds32_ineq_033"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">E</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>=</mml:mo><mml:mstyle displaystyle="false">
<mml:mfrac>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
<mml:mi mathvariant="italic">m</mml:mi>
</mml:mrow>
</mml:mfrac>
</mml:mstyle></mml:math><tex-math><![CDATA[${E_{ij}}=\frac{{d_{i}}{d_{j}}}{2m}$]]></tex-math></alternatives></inline-formula> is the expected weight of the edge connecting these vertexes under randomization via the configuration model. [<xref ref-type="bibr" rid="j_nejsds32_ref_003">3</xref>]</p>
<p>The process of unconstrained modularity optimization involves the identifying of a partition <inline-formula id="j_nejsds32_ineq_034"><alternatives><mml:math>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mo>…</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">n</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo fence="true" stretchy="false">}</mml:mo>
<mml:mo stretchy="false">⊆</mml:mo>
<mml:mi mathvariant="bold">V</mml:mi></mml:math><tex-math><![CDATA[$\{{\mathbf{V}_{1}},\dots ,{\mathbf{V}_{n}}\}\subseteq \mathbf{V}$]]></tex-math></alternatives></inline-formula> of size <inline-formula id="j_nejsds32_ineq_035"><alternatives><mml:math>
<mml:mi mathvariant="italic">n</mml:mi>
<mml:mo stretchy="false">≤</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi></mml:math><tex-math><![CDATA[$n\le p$]]></tex-math></alternatives></inline-formula> corresponding to the community assignment vector <bold>s</bold> such that <inline-formula id="j_nejsds32_ineq_036"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">k</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>=</mml:mo>
<mml:mi mathvariant="italic">r</mml:mi></mml:math><tex-math><![CDATA[${s_{k}}=r$]]></tex-math></alternatives></inline-formula> if <inline-formula id="j_nejsds32_ineq_037"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">k</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">r</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${v_{k}}\in {\mathbf{V}_{r}}$]]></tex-math></alternatives></inline-formula>, for some <inline-formula id="j_nejsds32_ineq_038"><alternatives><mml:math>
<mml:mi mathvariant="italic">r</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>2</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mo>…</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">n</mml:mi>
<mml:mo fence="true" stretchy="false">}</mml:mo></mml:math><tex-math><![CDATA[$r\in \{1,2,\dots ,n\}$]]></tex-math></alternatives></inline-formula>. For a partition of size <inline-formula id="j_nejsds32_ineq_039"><alternatives><mml:math>
<mml:mi mathvariant="italic">n</mml:mi>
<mml:mo stretchy="false">≤</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi></mml:math><tex-math><![CDATA[$n\le p$]]></tex-math></alternatives></inline-formula>, the <italic>Stirling number of the second kind</italic> [<xref ref-type="bibr" rid="j_nejsds32_ref_001">1</xref>] 
<disp-formula id="j_nejsds32_eq_002">
<alternatives><mml:math display="block">
<mml:mtable displaystyle="true" columnalign="right left" columnspacing="0pt">
<mml:mtr>
<mml:mtd class="align-odd">
<mml:mi mathvariant="italic">S</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">n</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mtd>
<mml:mtd class="align-even">
<mml:mo>=</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">n</mml:mi>
<mml:mo>!</mml:mo>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:munderover accentunder="false" accent="false">
<mml:mrow>
<mml:mstyle displaystyle="true">
<mml:mo largeop="true" movablelimits="false">∑</mml:mo></mml:mstyle>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">k</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>0</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">n</mml:mi>
</mml:mrow>
</mml:munderover>
<mml:msup>
<mml:mrow>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mo>−</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">k</mml:mi>
</mml:mrow>
</mml:msup>
<mml:mfenced separators="" open="(" close=")">
<mml:mfrac linethickness="0.0pt">
<mml:mrow>
<mml:mi mathvariant="italic">n</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">k</mml:mi>
</mml:mrow>
</mml:mfrac>
</mml:mfenced>
<mml:msup>
<mml:mrow>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">n</mml:mi>
<mml:mo>−</mml:mo>
<mml:mi mathvariant="italic">k</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
</mml:msup>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[\begin{aligned}{}S(p,n)& =\frac{1}{n!}{\sum \limits_{k=0}^{n}}{(-1)^{k}}\left(\genfrac{}{}{0.0pt}{}{n}{k}\right){(n-k)^{p}}\end{aligned}\]]]></tex-math></alternatives>
</disp-formula> 
counts the number of unique community assignments. Note that if the <inline-formula id="j_nejsds32_ineq_040"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo>=</mml:mo>
<mml:mo stretchy="false">|</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msubsup>
<mml:mo stretchy="false">|</mml:mo></mml:math><tex-math><![CDATA[${p^{\prime }}=|{\mathbf{V}^{\prime }_{\tau }}|$]]></tex-math></alternatives></inline-formula> special vertexes are partitioned into <italic>n</italic> vertex sets then the number of feasible community assignments is 
<disp-formula id="j_nejsds32_eq_003">
<label>(2.2)</label><alternatives><mml:math display="block">
<mml:mtable displaystyle="true" columnalign="right left" columnspacing="0pt">
<mml:mtr>
<mml:mtd class="align-odd">
<mml:mi mathvariant="italic">C</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">n</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mtd>
<mml:mtd class="align-even">
<mml:mo>=</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">n</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo>−</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
</mml:mrow>
</mml:msup>
<mml:mi mathvariant="italic">S</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">n</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[\begin{aligned}{}C(p,{p^{\prime }},n)& ={n^{p-{p^{\prime }}}}S({p^{\prime }},n),\end{aligned}\]]]></tex-math></alternatives>
</disp-formula> 
with <inline-formula id="j_nejsds32_ineq_041"><alternatives><mml:math>
<mml:mi mathvariant="italic">n</mml:mi>
<mml:mo stretchy="false">≤</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup></mml:math><tex-math><![CDATA[$n\le {p^{\prime }}$]]></tex-math></alternatives></inline-formula>, which displays asymptotics similar to the number of unconstrained partitions. The special case when <inline-formula id="j_nejsds32_ineq_042"><alternatives><mml:math>
<mml:mi mathvariant="italic">n</mml:mi>
<mml:mo>=</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup></mml:math><tex-math><![CDATA[$n={p^{\prime }}$]]></tex-math></alternatives></inline-formula>, for which <inline-formula id="j_nejsds32_ineq_043"><alternatives><mml:math>
<mml:mi mathvariant="italic">C</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">n</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo>=</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">n</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo>−</mml:mo>
<mml:mi mathvariant="italic">n</mml:mi>
</mml:mrow>
</mml:msup>
<mml:mo stretchy="false">∈</mml:mo>
<mml:mi mathvariant="italic">O</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">n</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
</mml:msup>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$C(p,{p^{\prime }},n)={n^{p-n}}\in O({n^{p}})$]]></tex-math></alternatives></inline-formula>, amounts to the unconstrained optimization of the modularity quality function over the set of non-special vertexes <inline-formula id="j_nejsds32_ineq_044"><alternatives><mml:math>
<mml:mi mathvariant="italic">v</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:mi mathvariant="bold">V</mml:mi>
<mml:mo>∖</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup></mml:math><tex-math><![CDATA[$v\in \mathbf{V}\setminus {\mathbf{V}^{\prime }}$]]></tex-math></alternatives></inline-formula> with each of the special vertexes <inline-formula id="j_nejsds32_ineq_045"><alternatives><mml:math>
<mml:mi mathvariant="italic">v</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup></mml:math><tex-math><![CDATA[$v\in {\mathbf{V}^{\prime }}$]]></tex-math></alternatives></inline-formula> each belonging to a unique community. This observation accordingly supports a bottom-up approach that is a part of our forthcoming procedure.</p>
<p>On the extreme end of the spectrum, if <inline-formula id="j_nejsds32_ineq_046"><alternatives><mml:math>
<mml:mi mathvariant="italic">τ</mml:mi>
<mml:mo>=</mml:mo>
<mml:mi mathvariant="italic">ω</mml:mi></mml:math><tex-math><![CDATA[$\tau =\omega $]]></tex-math></alternatives></inline-formula>, where <italic>ω</italic> equals the maximum number of ICD surgeries performed at any cardiac care facility in the network, then <inline-formula id="j_nejsds32_ineq_047"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup></mml:math><tex-math><![CDATA[${p^{\prime }}$]]></tex-math></alternatives></inline-formula> achieves its minimum tenable value. In particular, if the maximum number <italic>ω</italic> of ICD surgeries performed at any hospital in the network is unique then <inline-formula id="j_nejsds32_ineq_048"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo>=</mml:mo>
<mml:mn>1</mml:mn></mml:math><tex-math><![CDATA[${p^{\prime }}=1$]]></tex-math></alternatives></inline-formula>. Moreover, if <inline-formula id="j_nejsds32_ineq_049"><alternatives><mml:math>
<mml:mi mathvariant="italic">τ</mml:mi>
<mml:mo mathvariant="normal">&gt;</mml:mo>
<mml:mi mathvariant="italic">ω</mml:mi></mml:math><tex-math><![CDATA[$\tau \gt \omega $]]></tex-math></alternatives></inline-formula> then no feasible solution to the constrained optimization problem exists. In general, <inline-formula id="j_nejsds32_ineq_050"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup></mml:math><tex-math><![CDATA[${p^{\prime }}$]]></tex-math></alternatives></inline-formula> is a non-increasing function of <inline-formula id="j_nejsds32_ineq_051"><alternatives><mml:math>
<mml:mi mathvariant="italic">τ</mml:mi>
<mml:mo stretchy="false">≥</mml:mo>
<mml:mn>0</mml:mn></mml:math><tex-math><![CDATA[$\tau \ge 0$]]></tex-math></alternatives></inline-formula>.</p>
<p>The community assignment vector that optimizes the modularity quality function 
<disp-formula id="j_nejsds32_eq_004">
<label>(2.3)</label><alternatives><mml:math display="block">
<mml:mtable displaystyle="true" columnalign="right left" columnspacing="0pt">
<mml:mtr>
<mml:mtd class="align-odd">
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="bold">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">o</mml:mi>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mi mathvariant="italic">t</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
</mml:msubsup>
</mml:mtd>
<mml:mtd class="align-even">
<mml:mo>=</mml:mo>
<mml:munder>
<mml:mrow>
<mml:mo movablelimits="false">arg max</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="bold">s</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msub>
<mml:mrow/>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:munder>
<mml:mspace width="5.0pt"/>
<mml:mi mathvariant="italic">Q</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">s</mml:mi>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="bold">W</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[\begin{aligned}{}{\mathbf{s}_{opt}^{\tau }}& =\underset{\mathbf{s}\in {_{p}}}{\operatorname{arg\,max}}\hspace{5.0pt}Q(\mathbf{s}|\mathbf{W}),\end{aligned}\]]]></tex-math></alternatives>
</disp-formula> 
where <inline-formula id="j_nejsds32_ineq_052"><alternatives><mml:math>
<mml:msub>
<mml:mrow/>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>=</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>2</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mo>…</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo fence="true" stretchy="false">}</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
</mml:msup></mml:math><tex-math><![CDATA[${_{p}}={\{1,2,\dots ,p\}^{p}}$]]></tex-math></alternatives></inline-formula>, is the community assignment vector which, on average, labels similarly vertexes that are more well-connected than expected to the same community among the <inline-formula id="j_nejsds32_ineq_053"><alternatives><mml:math>
<mml:mi mathvariant="italic">n</mml:mi>
<mml:mo stretchy="false">≤</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi></mml:math><tex-math><![CDATA[$n\le p$]]></tex-math></alternatives></inline-formula> different communities.</p>
<p>Suppose that <inline-formula id="j_nejsds32_ineq_054"><alternatives><mml:math>
<mml:mi mathvariant="italic">R</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">s</mml:mi>
<mml:mo stretchy="false">|</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msubsup>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$R(\mathbf{s}|{\mathbf{V}^{\prime }_{\tau }})$]]></tex-math></alternatives></inline-formula> is the boolean function that returns true if the community assignment vector <bold>s</bold> satisfies the desired property that each community contain at least one special vertex <inline-formula id="j_nejsds32_ineq_055"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msubsup></mml:math><tex-math><![CDATA[${v^{\prime }}\in {\mathbf{V}^{\prime }_{\tau }}$]]></tex-math></alternatives></inline-formula> and define the <italic>restricted</italic> community assignment vector that optimizes the modularity quality function 
<disp-formula id="j_nejsds32_eq_005">
<label>(2.4)</label><alternatives><mml:math display="block">
<mml:mtable displaystyle="true" columnalign="right left" columnspacing="0pt">
<mml:mtr>
<mml:mtd class="align-odd">
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="bold">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">R</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
</mml:msubsup>
</mml:mtd>
<mml:mtd class="align-even">
<mml:mo>=</mml:mo>
<mml:munder>
<mml:mrow>
<mml:mo movablelimits="false">arg max</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="bold">s</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msub>
<mml:mrow/>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:munder>
<mml:mspace width="5.0pt"/>
<mml:mfenced separators="" open="{" close="}">
<mml:mrow>
<mml:mi mathvariant="italic">Q</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">s</mml:mi>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="bold">W</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo>:</mml:mo>
<mml:mi mathvariant="italic">R</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">s</mml:mi>
<mml:mo stretchy="false">|</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msubsup>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
</mml:mfenced>
<mml:mo mathvariant="normal">,</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[\begin{aligned}{}{\mathbf{s}_{R}^{\tau }}& =\underset{\mathbf{s}\in {_{p}}}{\operatorname{arg\,max}}\hspace{5.0pt}\left\{Q(\mathbf{s}|\mathbf{W}):R(\mathbf{s}|{\mathbf{V}^{\prime }_{\tau }})\right\},\end{aligned}\]]]></tex-math></alternatives>
</disp-formula> 
where, in the present scenario, 
<disp-formula id="j_nejsds32_eq_006">
<alternatives><mml:math display="block">
<mml:mtable displaystyle="true" columnalign="right left" columnspacing="0pt">
<mml:mtr>
<mml:mtd class="align-odd">
<mml:mi mathvariant="italic">R</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">s</mml:mi>
<mml:mo stretchy="false">|</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msubsup>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mtd>
<mml:mtd class="align-even">
<mml:mo>=</mml:mo>
<mml:mfenced separators="" open="{" close="">
<mml:mrow>
<mml:mtable columnspacing="10.0pt" equalrows="false" columnlines="none" equalcolumns="false" columnalign="left left">
<mml:mtr>
<mml:mtd class="array">
<mml:mtext>True</mml:mtext>
<mml:mspace width="1em"/>
</mml:mtd>
<mml:mtd class="array">
<mml:mspace width="2.5pt"/>
<mml:mtext>if</mml:mtext>
<mml:mspace width="2.5pt"/>
<mml:mi mathvariant="script">U</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">s</mml:mi>
<mml:mo stretchy="false">|</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msubsup>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo>=</mml:mo>
<mml:mi mathvariant="script">U</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">s</mml:mi>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="bold">V</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mtd>
</mml:mtr>
<mml:mtr>
<mml:mtd class="array">
<mml:mtext>False</mml:mtext>
<mml:mspace width="1em"/>
</mml:mtd>
<mml:mtd class="array">
<mml:mspace width="2.5pt"/>
<mml:mtext>otherwise,</mml:mtext>
</mml:mtd>
</mml:mtr>
</mml:mtable>
</mml:mrow>
</mml:mfenced>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[\begin{aligned}{}R(\mathbf{s}|{\mathbf{V}^{\prime }_{\tau }})& =\left\{\begin{array}{l@{\hskip10.0pt}l}\text{True}\hspace{1em}& \hspace{2.5pt}\text{if}\hspace{2.5pt}\mathcal{U}(\mathbf{s}|{\mathbf{V}^{\prime }_{\tau }})=\mathcal{U}(\mathbf{s}|\mathbf{V})\\ {} \text{False}\hspace{1em}& \hspace{2.5pt}\text{otherwise,}\end{array}\right.\end{aligned}\]]]></tex-math></alternatives>
</disp-formula> 
where <inline-formula id="j_nejsds32_ineq_056"><alternatives><mml:math>
<mml:mi mathvariant="script">U</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">s</mml:mi>
<mml:mo stretchy="false">|</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msubsup>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$\mathcal{U}(\mathbf{s}|{\mathbf{V}^{\prime }_{\tau }})$]]></tex-math></alternatives></inline-formula> is, for example, the set of <italic>unique</italic> community labels for those vertexes <inline-formula id="j_nejsds32_ineq_057"><alternatives><mml:math>
<mml:mi mathvariant="italic">v</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msubsup></mml:math><tex-math><![CDATA[$v\in {\mathbf{V}^{\prime }_{\tau }}$]]></tex-math></alternatives></inline-formula>. Defined as such, <inline-formula id="j_nejsds32_ineq_058"><alternatives><mml:math>
<mml:mi mathvariant="italic">R</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">s</mml:mi>
<mml:mo stretchy="false">|</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msubsup>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$R(\mathbf{s}|{\mathbf{V}^{\prime }_{\tau }})$]]></tex-math></alternatives></inline-formula> returns <inline-formula id="j_nejsds32_ineq_059"><alternatives><mml:math>
<mml:mtext>True</mml:mtext></mml:math><tex-math><![CDATA[$\text{True}$]]></tex-math></alternatives></inline-formula> when each community is constituted by at least one special vertex <inline-formula id="j_nejsds32_ineq_060"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msubsup></mml:math><tex-math><![CDATA[${v^{\prime }}\in {\mathbf{V}^{\prime }_{\tau }}$]]></tex-math></alternatives></inline-formula>.</p>
<p>We define a <italic>health care community assignment</italic> as the designation of hospitals to communities in a community assignment vector that optimizes the network modularity quality function <inline-formula id="j_nejsds32_ineq_061"><alternatives><mml:math>
<mml:mi mathvariant="italic">Q</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">s</mml:mi>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="bold">W</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$Q(\mathbf{s}|\mathbf{W})$]]></tex-math></alternatives></inline-formula> in Equation (<xref rid="j_nejsds32_eq_001">2.1</xref>). The quantity <inline-formula id="j_nejsds32_ineq_062"><alternatives><mml:math>
<mml:mi mathvariant="italic">Q</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">s</mml:mi>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="bold">W</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$Q(\mathbf{s}|\mathbf{W})$]]></tex-math></alternatives></inline-formula> is proportional to the difference between the fraction of (weighted) edges within communities and the expected fraction if edges were randomly distributed according to the configuration model, i.e. edge randomization with degree distribution conserved, subject to the constraint that to each community belongs at least one special vertex, e.g. a vertex representing a cardiac care facility where at least <inline-formula id="j_nejsds32_ineq_063"><alternatives><mml:math>
<mml:mi mathvariant="italic">τ</mml:mi>
<mml:mo stretchy="false">≥</mml:mo>
<mml:mn>0</mml:mn></mml:math><tex-math><![CDATA[$\tau \ge 0$]]></tex-math></alternatives></inline-formula> ICD implantations occurred. Specifically, we seek to maximize modularity while requiring that the number of cardiac care facilities per health care community is at least <inline-formula id="j_nejsds32_ineq_064"><alternatives><mml:math>
<mml:mi mathvariant="italic">τ</mml:mi>
<mml:mo stretchy="false">≥</mml:mo>
<mml:mn>0</mml:mn></mml:math><tex-math><![CDATA[$\tau \ge 0$]]></tex-math></alternatives></inline-formula>: a restriction we encode with Boolean variable <inline-formula id="j_nejsds32_ineq_065"><alternatives><mml:math>
<mml:mi mathvariant="italic">R</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">s</mml:mi>
<mml:mo stretchy="false">|</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msubsup>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$R(\mathbf{s}|{\mathbf{V}^{\prime }_{\tau }})$]]></tex-math></alternatives></inline-formula> indicating the feasibility of a community assignment.</p>
<p>Existing work in this realm considers incorporating additional information in the form of individual entity labels and pairwise constraints, i.e., that two vertexes must be labeled similarly or differently. [<xref ref-type="bibr" rid="j_nejsds32_ref_007">7</xref>] A restriction of the type we consider here has, to our knowledge, remained unstudied. In the context of the hospital network, the HRRs defined previously associated local health care markets to the tertiary care facilities where the plurality of the residents were referred for major cardiac procedures. An HRR is a reflection of its regional health care market and, because necessarily within each is a hospital specialized in cardiac surgery, a comparison across regions is facilitated. In an effort to standardize cardiac care among health care subnetworks, we present an initial undertaking towards developing a paradigm of constrained community detection. In particular, because constraint satisfaction in optimization problems provides context, the health care communities identified by our constrained community detection approach have real-world utility.</p>
<p>The organization of this article is as follows. In Section <xref rid="j_nejsds32_s_003">3</xref>, we mathematically formulate the constrained optimization problem. In Section <xref rid="j_nejsds32_s_004">4</xref>, we define a greedy, recursively-backtracking procedure for identifying high-quality, constrained communities. Utilizing our procedure in Section <xref rid="j_nejsds32_s_011">5</xref>, we estimate the health care communities of the nation-wide hospital network and illustrate in Section <xref rid="j_nejsds32_s_016">6</xref> our method on a network-graph of well-known community structure.</p>
</sec>
<sec id="j_nejsds32_s_003">
<label>3</label>
<title>Problem Specification</title>
<p>Suppose that <inline-formula id="j_nejsds32_ineq_066"><alternatives><mml:math>
<mml:mi mathvariant="script">G</mml:mi>
<mml:mo>=</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">V</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="bold">E</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$\mathcal{G}=(\mathbf{V},\mathbf{E})$]]></tex-math></alternatives></inline-formula>, with <inline-formula id="j_nejsds32_ineq_067"><alternatives><mml:math>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo>=</mml:mo>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="bold">V</mml:mi>
<mml:mo stretchy="false">|</mml:mo></mml:math><tex-math><![CDATA[$p=|\mathbf{V}|$]]></tex-math></alternatives></inline-formula>, is a network-graph and that <inline-formula id="j_nejsds32_ineq_068"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo stretchy="false">⊂</mml:mo>
<mml:mi mathvariant="bold">V</mml:mi></mml:math><tex-math><![CDATA[${\mathbf{V}^{\prime }}\subset \mathbf{V}$]]></tex-math></alternatives></inline-formula> is a subset of vertexes. Moreover, suppose that <inline-formula id="j_nejsds32_ineq_069"><alternatives><mml:math>
<mml:mi mathvariant="bold">s</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>2</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mo>…</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">n</mml:mi>
<mml:mo fence="true" stretchy="false">}</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
</mml:msup></mml:math><tex-math><![CDATA[$\mathbf{s}\in {\{1,2,\dots ,n\}^{p}}$]]></tex-math></alternatives></inline-formula>, for some <inline-formula id="j_nejsds32_ineq_070"><alternatives><mml:math>
<mml:mi mathvariant="italic">n</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="double-struck">Z</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>+</mml:mo>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[$n\in {\mathbb{Z}_{+}}$]]></tex-math></alternatives></inline-formula>, is a vector of labels such at each label is applied at least once. We define the collection of <inline-formula id="j_nejsds32_ineq_071"><alternatives><mml:math>
<mml:mfenced separators="" open="(" close=")">
<mml:mfrac linethickness="0.0pt">
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:mfrac>
</mml:mfenced>
</mml:math><tex-math><![CDATA[$\left(\genfrac{}{}{0.0pt}{}{p}{2}\right)$]]></tex-math></alternatives></inline-formula> binary variables <inline-formula id="j_nejsds32_ineq_072"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">x</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>=</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>=</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo fence="true" stretchy="false">}</mml:mo></mml:math><tex-math><![CDATA[${x_{ij}}=1\{{s_{i}}={s_{j}}\}$]]></tex-math></alternatives></inline-formula>, for <inline-formula id="j_nejsds32_ineq_073"><alternatives><mml:math>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">j</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>2</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mo>…</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo fence="true" stretchy="false">}</mml:mo></mml:math><tex-math><![CDATA[$i,j\in \{1,2,\dots ,p\}$]]></tex-math></alternatives></inline-formula>, along with the corresponding collection of edge values <inline-formula id="j_nejsds32_ineq_074"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">b</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>=</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">w</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>−</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" stretchy="false">/</mml:mo>
<mml:mn>2</mml:mn>
<mml:mi mathvariant="italic">m</mml:mi></mml:math><tex-math><![CDATA[${b_{ij}}={w_{ij}}-{d_{i}}{d_{j}}/2m$]]></tex-math></alternatives></inline-formula> and the vertex values <inline-formula id="j_nejsds32_ineq_075"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">u</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">k</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>=</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">k</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo fence="true" stretchy="false">}</mml:mo></mml:math><tex-math><![CDATA[${u_{k}}=1\{{v_{k}}\in {\mathbf{V}^{\prime }}\}$]]></tex-math></alternatives></inline-formula>, for <inline-formula id="j_nejsds32_ineq_076"><alternatives><mml:math>
<mml:mi mathvariant="italic">k</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>2</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mo>…</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo fence="true" stretchy="false">}</mml:mo></mml:math><tex-math><![CDATA[$k\in \{1,2,\dots ,p\}$]]></tex-math></alternatives></inline-formula>. Let <inline-formula id="j_nejsds32_ineq_077"><alternatives><mml:math>
<mml:mi mathvariant="bold">B</mml:mi>
<mml:mo>=</mml:mo>
<mml:mo fence="true" stretchy="false">[</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">b</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo fence="true" stretchy="false">]</mml:mo></mml:math><tex-math><![CDATA[$\mathbf{B}=[{b_{ij}}]$]]></tex-math></alternatives></inline-formula>.</p>
<p>The constrained optimization problem under consideration is described as follows. 
<disp-formula id="j_nejsds32_eq_007">
<alternatives><mml:math display="block">
<mml:mtable displaystyle="true" columnalign="right left" columnspacing="0pt">
<mml:mtr>
<mml:mtd class="align-odd">
<mml:mtext>Maximize:</mml:mtext>
<mml:mspace width="2.5pt"/>
</mml:mtd>
<mml:mtd class="align-even">
<mml:mi mathvariant="italic">f</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">s</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="bold">B</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo>=</mml:mo>
<mml:munderover accentunder="false" accent="false">
<mml:mrow>
<mml:mstyle displaystyle="true">
<mml:mo largeop="true" movablelimits="false">∑</mml:mo></mml:mstyle>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
</mml:munderover>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">b</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">x</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mspace width="2.5pt"/>
<mml:mtext>over</mml:mtext>
<mml:mspace width="2.5pt"/>
<mml:mi mathvariant="bold">s</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>2</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mo>…</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">n</mml:mi>
<mml:mo fence="true" stretchy="false">}</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
</mml:msup>
</mml:mtd>
</mml:mtr>
<mml:mtr>
<mml:mtd class="align-odd"/>
<mml:mtd class="align-even">
<mml:mspace width="10.0pt"/>
<mml:mspace width="2.5pt"/>
<mml:mtext>and</mml:mtext>
<mml:mspace width="2.5pt"/>
<mml:mi mathvariant="italic">n</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="double-struck">Z</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>+</mml:mo>
</mml:mrow>
</mml:msub>
</mml:mtd>
</mml:mtr>
<mml:mtr>
<mml:mtd class="align-odd">
<mml:mtext>Subject to:</mml:mtext>
<mml:mspace width="2.5pt"/>
</mml:mtd>
<mml:mtd class="align-even">
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">x</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>=</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>=</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo fence="true" stretchy="false">}</mml:mo>
<mml:mspace width="2.5pt"/>
<mml:mtext>for</mml:mtext>
<mml:mspace width="2.5pt"/>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">j</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>2</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mo>…</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo fence="true" stretchy="false">}</mml:mo>
</mml:mtd>
</mml:mtr>
<mml:mtr>
<mml:mtd class="align-odd"/>
<mml:mtd class="align-even">
<mml:mspace width="10.0pt"/>
<mml:munder>
<mml:mrow>
<mml:mstyle displaystyle="true">
<mml:mo largeop="true" movablelimits="false">∑</mml:mo></mml:mstyle>
</mml:mrow>
<mml:mrow>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:mi mathvariant="italic">h</mml:mi>
<mml:mo>:</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">h</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>=</mml:mo>
<mml:mi mathvariant="italic">r</mml:mi>
<mml:mo fence="true" stretchy="false">}</mml:mo>
</mml:mrow>
</mml:munder>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">u</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">h</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">≥</mml:mo>
<mml:mi mathvariant="italic">η</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mspace width="2.5pt"/>
<mml:mtext>for</mml:mtext>
<mml:mspace width="2.5pt"/>
<mml:mi mathvariant="italic">r</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>2</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mo>…</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">n</mml:mi>
<mml:mo fence="true" stretchy="false">}</mml:mo>
</mml:mtd>
</mml:mtr>
<mml:mtr>
<mml:mtd class="align-odd"/>
<mml:mtd class="align-even">
<mml:mspace width="10.0pt"/>
<mml:mi mathvariant="italic">η</mml:mi>
<mml:mo stretchy="false">≥</mml:mo>
<mml:mn>0</mml:mn>
</mml:mtd>
</mml:mtr>
<mml:mtr>
<mml:mtd class="align-odd"/>
<mml:mtd class="align-even">
<mml:mspace width="10.0pt"/>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">u</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">h</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>=</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">h</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo fence="true" stretchy="false">}</mml:mo>
<mml:mspace width="2.5pt"/>
<mml:mtext>for</mml:mtext>
<mml:mspace width="2.5pt"/>
<mml:mi mathvariant="italic">h</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>2</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mo>…</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo fence="true" stretchy="false">}</mml:mo>
<mml:mo>.</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[\begin{aligned}{}\text{Maximize:}\hspace{2.5pt}& f(\mathbf{s},\mathbf{B})={\sum \limits_{ij}^{p}}{b_{ij}}{x_{ij}}\hspace{2.5pt}\text{over}\hspace{2.5pt}\mathbf{s}\in {\{1,2,\dots ,n\}^{p}}\\ {} & \hspace{10.0pt}\hspace{2.5pt}\text{and}\hspace{2.5pt}n\in {\mathbb{Z}_{+}}\\ {} \text{Subject to:}\hspace{2.5pt}& {x_{ij}}=1\{{s_{i}}={s_{j}}\}\hspace{2.5pt}\text{for}\hspace{2.5pt}i,j\in \{1,2,\dots ,p\}\\ {} & \hspace{10.0pt}\sum \limits_{\{h:{s_{h}}=r\}}{u_{h}}\ge \eta ,\hspace{2.5pt}\text{for}\hspace{2.5pt}r\in \{1,2,\dots ,n\}\\ {} & \hspace{10.0pt}\eta \ge 0\\ {} & \hspace{10.0pt}{u_{h}}=1\{{v_{h}}\in {\mathbf{V}^{\prime }}\}\hspace{2.5pt}\text{for}\hspace{2.5pt}h\in \{1,2,\dots ,p\}.\end{aligned}\]]]></tex-math></alternatives>
</disp-formula> 
This discrete optimization problem is, in general, at least as difficult as the corresponding, unconstrained NP-hard decision problem which seeks an answer to whether or not a partition of the vertex set exists with a modularity quality function value of at least some minimum value. In particular, the boundary value <inline-formula id="j_nejsds32_ineq_078"><alternatives><mml:math>
<mml:mi mathvariant="italic">η</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>0</mml:mn></mml:math><tex-math><![CDATA[$\eta =0$]]></tex-math></alternatives></inline-formula> corresponds to the special case of an unconstrained optimization problem in the description above.</p>
<p>A greedy unconstrained method may readily agglomerate communities toward achieving a local maximum of the network modularity function <inline-formula id="j_nejsds32_ineq_079"><alternatives><mml:math>
<mml:mi mathvariant="italic">f</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">s</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="bold">B</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$f(\mathbf{s},\mathbf{B})$]]></tex-math></alternatives></inline-formula>. On the other hand, satisfying the constraint requires the consideration of many permutations of such mergers and any recursive backtracking procedure for identifying high-quality, with respect to the network modularity function, has potentially intractably-many paths in the search space to traverse. Note that if the graph <inline-formula id="j_nejsds32_ineq_080"><alternatives><mml:math>
<mml:mi mathvariant="script">G</mml:mi></mml:math><tex-math><![CDATA[$\mathcal{G}$]]></tex-math></alternatives></inline-formula> happens to be unweighted then the adjacency matrix <bold>W</bold> is binary and, up to quantities involving a <inline-formula id="j_nejsds32_ineq_081"><alternatives><mml:math>
<mml:mn>2</mml:mn>
<mml:mi mathvariant="italic">m</mml:mi></mml:math><tex-math><![CDATA[$2m$]]></tex-math></alternatives></inline-formula> denominator, Equations (<xref rid="j_nejsds32_eq_009">4.1</xref>) and (<xref rid="j_nejsds32_eq_010">4.2</xref>) involve integers on similar scales. Accordingly, the various sequences of community assignment label updates through the recursive backtracking procedure are reduced. In the application of our method toward the defining of health care communities in the nationwide social network of cardiac-related Medicare referrals between hospitals we make this binary transformation <inline-formula id="j_nejsds32_ineq_082"><alternatives><mml:math>
<mml:mi mathvariant="bold">A</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:mi mathvariant="italic">g</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">W</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo mathvariant="normal">&gt;</mml:mo>
<mml:mi mathvariant="italic">ζ</mml:mi>
<mml:mo fence="true" stretchy="false">}</mml:mo></mml:math><tex-math><![CDATA[$\mathbf{A}=1\{g(\mathbf{W})\gt \zeta \}$]]></tex-math></alternatives></inline-formula>, where <inline-formula id="j_nejsds32_ineq_083"><alternatives><mml:math>
<mml:mi mathvariant="italic">g</mml:mi>
<mml:mo>:</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="double-struck">R</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo>×</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
</mml:msup>
<mml:mo stretchy="false">↦</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="double-struck">R</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo>×</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
</mml:msup></mml:math><tex-math><![CDATA[$g:{\mathbb{R}^{p\times p}}\mapsto {\mathbb{R}^{p\times p}}$]]></tex-math></alternatives></inline-formula> is defined in Section <xref rid="j_nejsds32_s_012">5.1</xref>, the indicator function <inline-formula id="j_nejsds32_ineq_084"><alternatives><mml:math>
<mml:mn>1</mml:mn>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:mi mathvariant="italic">P</mml:mi>
<mml:mo fence="true" stretchy="false">}</mml:mo>
<mml:mo>=</mml:mo>
<mml:mn>1</mml:mn></mml:math><tex-math><![CDATA[$1\{P\}=1$]]></tex-math></alternatives></inline-formula> if proposition <italic>P</italic> is true and <inline-formula id="j_nejsds32_ineq_085"><alternatives><mml:math>
<mml:mn>1</mml:mn>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:mi mathvariant="italic">P</mml:mi>
<mml:mo fence="true" stretchy="false">}</mml:mo>
<mml:mo>=</mml:mo>
<mml:mn>0</mml:mn></mml:math><tex-math><![CDATA[$1\{P\}=0$]]></tex-math></alternatives></inline-formula> otherwise, and <inline-formula id="j_nejsds32_ineq_086"><alternatives><mml:math>
<mml:mi mathvariant="italic">ζ</mml:mi>
<mml:mo mathvariant="normal">&gt;</mml:mo>
<mml:mn>0</mml:mn></mml:math><tex-math><![CDATA[$\zeta \gt 0$]]></tex-math></alternatives></inline-formula> is determined from the data, to facilitate tractable computations.</p>
</sec>
<sec id="j_nejsds32_s_004">
<label>4</label>
<title>Greedy, Recursive-backtracking Procedure</title>
<p>We begin this section by presenting the existing work on unconstrained network modularity quality function optimization upon which our generalized procedure, which seeks to maximize the network modularity quality function over the space of feasible community assignment vectors, is based. Subsequently we outline our method for constrained optimization of the network modularity quality function and provide pseudocode for pertinent procedures.</p>
<sec id="j_nejsds32_s_005">
<label>4.1</label>
<title>Louvain Method</title>
<p>The Louvain method [<xref ref-type="bibr" rid="j_nejsds32_ref_004">4</xref>] is a greedy modularity optimization procedure that proceeds in two fundamental and repeating steps: (i) the local optimization of the modularity quality function and (ii) the folding of communities into super-vertexes to create a super-graph in which the newly-created super-vertexes are representatives in the super-graph of the communities in the former graph and the newly-created edge weights between super-vertexes are the sums of the edge weights between pairs of communities in the original graph. This process is continued until the super-graph resulting from repeated local optimizations and folds no longer warrants a subsequent fold, at which point, the folding process is reversed to recover the vertex-level community assignment vector, see [<xref ref-type="bibr" rid="j_nejsds32_ref_004">4</xref>] for details.</p>
</sec>
<sec id="j_nejsds32_s_006">
<label>4.2</label>
<title>Modifications to Base Louvain Procedures</title>
<p>We modify the local optimization procedure of the Louvain method to cycle through the vertex set <bold>V</bold> in turn, with the exception of vertexes <inline-formula id="j_nejsds32_ineq_087"><alternatives><mml:math>
<mml:mi mathvariant="italic">v</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:mi mathvariant="bold">U</mml:mi></mml:math><tex-math><![CDATA[$v\in \mathbf{U}$]]></tex-math></alternatives></inline-formula>, and assigning its community label <inline-formula id="j_nejsds32_ineq_088"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">k</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${s_{k}}$]]></tex-math></alternatives></inline-formula> to 
<disp-formula id="j_nejsds32_eq_008">
<alternatives><mml:math display="block">
<mml:mtable displaystyle="true" columnalign="right left" columnspacing="0pt">
<mml:mtr>
<mml:mtd class="align-odd">
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">k</mml:mi>
</mml:mrow>
</mml:msub>
</mml:mtd>
<mml:mtd class="align-even">
<mml:mo stretchy="false">←</mml:mo>
<mml:munder>
<mml:mrow>
<mml:mo movablelimits="false">arg max</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">k</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">∈</mml:mo>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mo movablelimits="false">…</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">n</mml:mi>
<mml:mo fence="true" stretchy="false">}</mml:mo>
</mml:mrow>
</mml:munder>
<mml:mspace width="5.0pt"/>
<mml:mi mathvariant="italic">Q</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">k</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">|</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>−</mml:mo>
<mml:mi mathvariant="italic">k</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="bold">W</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo>.</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[\begin{aligned}{}{s_{k}}& \gets \underset{{s_{k}}\in \{1,\dots ,n\}}{\operatorname{arg\,max}}\hspace{5.0pt}Q({s_{k}}|{\mathbf{s}_{-k}},\mathbf{W}).\end{aligned}\]]]></tex-math></alternatives>
</disp-formula> 
This process is continued until no community label has been modified in one complete pass through the vertex set. The modification to restrict the updating of vertex community assignment labels to vertexes <inline-formula id="j_nejsds32_ineq_089"><alternatives><mml:math>
<mml:mi mathvariant="italic">v</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:mi mathvariant="bold">V</mml:mi>
<mml:mo>∖</mml:mo>
<mml:mi mathvariant="bold">U</mml:mi></mml:math><tex-math><![CDATA[$v\in \mathbf{V}\setminus \mathbf{U}$]]></tex-math></alternatives></inline-formula> permits, in the present context, the community labels of special vertexes <inline-formula id="j_nejsds32_ineq_090"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msubsup></mml:math><tex-math><![CDATA[${v^{\prime }}\in {\mathbf{V}^{\prime }_{\tau }}$]]></tex-math></alternatives></inline-formula> to be updated while the community labels of non-special vertexes <inline-formula id="j_nejsds32_ineq_091"><alternatives><mml:math>
<mml:mi mathvariant="italic">v</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:mi mathvariant="bold">V</mml:mi>
<mml:mo>∖</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msubsup></mml:math><tex-math><![CDATA[$v\in \mathbf{V}\setminus {\mathbf{V}^{\prime }_{\tau }}$]]></tex-math></alternatives></inline-formula> are held constant and <italic>vice versa</italic>. Moreover, we modify the folding procedure to trace a subset of vertexes <inline-formula id="j_nejsds32_ineq_092"><alternatives><mml:math>
<mml:mi mathvariant="bold">U</mml:mi>
<mml:mo stretchy="false">⊆</mml:mo>
<mml:mi mathvariant="bold">V</mml:mi></mml:math><tex-math><![CDATA[$\mathbf{U}\subseteq \mathbf{V}$]]></tex-math></alternatives></inline-formula> through to the super-vertexes which ultimately represent them as part of the community folding process. This permits, in the present context, super-vertexes to inherit the <italic>special</italic> designation.</p>
</sec>
<sec id="j_nejsds32_s_007">
<label>4.3</label>
<title>Constraint Corrected Louvain Method</title>
<p>Perhaps the most straightforward approach toward constrained greedy optimization of the modularity quality function leads through the unconstrained greedy optimization procedure of the Louvain method. That is, one may consider first estimating the unconstrained community assignment vector and then, subsequently, modify the unconstrained solution to a feasible state. We provide pseudocode in Procedure <xref rid="j_nejsds32_fig_001">1</xref> for this recursive-backtracking procedure that modifies an infeasible community assignment vector in an agglomerative approach, i.e. by merging communities, in a manner that least reduces modularity until a constraint-satisfying solution is achieved. Of course, given enough community mergers, this procedure is guaranteed to eventually halt.</p>
<fig id="j_nejsds32_fig_001">
<label>Procedure 1:</label>
<caption>
<p>Recur.</p>
</caption>
<graphic xlink:href="nejsds32_g001.jpg"/>
</fig>
<p>Note that within Procedure <xref rid="j_nejsds32_fig_001">1</xref>, the <monospace>Correct</monospace> local function is simplified by the fact that the merging of two communities that are respectively constituted by vertexes with indices in <inline-formula id="j_nejsds32_ineq_093"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${\mathbf{I}_{1}}$]]></tex-math></alternatives></inline-formula> and <inline-formula id="j_nejsds32_ineq_094"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${\mathbf{I}_{2}}$]]></tex-math></alternatives></inline-formula> results in the modularity gain proportional to 
<disp-formula id="j_nejsds32_eq_009">
<label>(4.1)</label><alternatives><mml:math display="block">
<mml:mtable displaystyle="true" columnalign="right left" columnspacing="0pt">
<mml:mtr>
<mml:mtd class="align-odd">
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="normal">Δ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">c</mml:mi>
<mml:mi mathvariant="italic">o</mml:mi>
<mml:mi mathvariant="italic">m</mml:mi>
<mml:mi mathvariant="italic">m</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mi mathvariant="italic">Q</mml:mi>
</mml:mtd>
<mml:mtd class="align-even">
<mml:mo stretchy="false">∝</mml:mo>
<mml:munder>
<mml:mrow>
<mml:mstyle displaystyle="true">
<mml:mo largeop="true" movablelimits="false">∑</mml:mo></mml:mstyle>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:munder>
<mml:munder>
<mml:mrow>
<mml:mstyle displaystyle="true">
<mml:mo largeop="true" movablelimits="false">∑</mml:mo></mml:mstyle>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:munder>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">W</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:msub>
<mml:mo>−</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
<mml:mi mathvariant="italic">m</mml:mi>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:mfenced separators="" open="(" close=")">
<mml:mrow>
<mml:munder>
<mml:mrow>
<mml:mstyle displaystyle="true">
<mml:mo largeop="true" movablelimits="false">∑</mml:mo></mml:mstyle>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:munder>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:mfenced>
<mml:mfenced separators="" open="(" close=")">
<mml:mrow>
<mml:munder>
<mml:mrow>
<mml:mstyle displaystyle="true">
<mml:mo largeop="true" movablelimits="false">∑</mml:mo></mml:mstyle>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:munder>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:mfenced>
<mml:mo>.</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[\begin{aligned}{}{\Delta _{comm}}Q& \propto \sum \limits_{{i_{1}}\in {\mathbf{I}_{1}}}\sum \limits_{{i_{2}}\in {\mathbf{I}_{2}}}{W_{{i_{1}}{i_{2}}}}-\frac{1}{2m}\left(\sum \limits_{{i_{1}}\in {\mathbf{I}_{1}}}{d_{{i_{1}}}}\right)\left(\sum \limits_{{i_{2}}\in {\mathbf{I}_{2}}}{d_{{i_{2}}}}\right).\end{aligned}\]]]></tex-math></alternatives>
</disp-formula> 
More specifically, if vertex <inline-formula id="j_nejsds32_ineq_095"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${v_{j}}$]]></tex-math></alternatives></inline-formula> currently belongs to the same community as vertexes with indices in <inline-formula id="j_nejsds32_ineq_096"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${\mathbf{I}_{0}}$]]></tex-math></alternatives></inline-formula> and vertex <inline-formula id="j_nejsds32_ineq_097"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${v_{j}}$]]></tex-math></alternatives></inline-formula> is to be relabeled to belong to the same community as vertexes with indices in <inline-formula id="j_nejsds32_ineq_098"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${\mathbf{I}_{1}}$]]></tex-math></alternatives></inline-formula> then the change in modularity is proportional to 
<disp-formula id="j_nejsds32_eq_010">
<label>(4.2)</label><alternatives><mml:math display="block">
<mml:mtable displaystyle="true" columnalign="right left" columnspacing="0pt">
<mml:mtr>
<mml:mtd class="align-odd">
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="normal">Δ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
<mml:mi mathvariant="italic">e</mml:mi>
<mml:mi mathvariant="italic">r</mml:mi>
<mml:mi mathvariant="italic">t</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mi mathvariant="italic">Q</mml:mi>
</mml:mtd>
<mml:mtd class="align-even">
<mml:mo stretchy="false">∝</mml:mo>
<mml:mfenced separators="" open="(" close=")">
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">W</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>−</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msubsup>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
<mml:mi mathvariant="italic">m</mml:mi>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
</mml:mrow>
</mml:mfenced>
<mml:mo>+</mml:mo>
<mml:mfenced separators="" open="(" close=")">
<mml:mrow>
<mml:munder>
<mml:mrow>
<mml:mstyle displaystyle="true">
<mml:mo largeop="true" movablelimits="false">∑</mml:mo></mml:mstyle>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:munder>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">W</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:msub>
<mml:mo>−</mml:mo>
<mml:munder>
<mml:mrow>
<mml:mstyle displaystyle="true">
<mml:mo largeop="true" movablelimits="false">∑</mml:mo></mml:mstyle>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:munder>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">W</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:mfenced>
</mml:mtd>
</mml:mtr>
<mml:mtr>
<mml:mtd class="align-odd"/>
<mml:mtd class="align-even">
<mml:mo>−</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
<mml:mi mathvariant="italic">m</mml:mi>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:mfenced separators="" open="(" close=")">
<mml:mrow>
<mml:munder>
<mml:mrow>
<mml:mstyle displaystyle="true">
<mml:mo largeop="true" movablelimits="false">∑</mml:mo></mml:mstyle>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:munder>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:msub>
<mml:mo>−</mml:mo>
<mml:munder>
<mml:mrow>
<mml:mstyle displaystyle="true">
<mml:mo largeop="true" movablelimits="false">∑</mml:mo></mml:mstyle>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:munder>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:mfenced>
<mml:mo>.</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[\begin{aligned}{}{\Delta _{vert}}Q& \propto \left({W_{jj}}-\frac{{d_{j}^{2}}}{2m}\right)+\left(\sum \limits_{{i_{1}}\in {\mathbf{I}_{1}}}{W_{j{i_{1}}}}-\sum \limits_{{i_{0}}\in {\mathbf{I}_{0}}}{W_{j{i_{0}}}}\right)\\ {} & -\frac{{d_{j}}}{2m}\left(\sum \limits_{{i_{1}}\in {\mathbf{I}_{1}}}{d_{{i_{1}}}}-\sum \limits_{{i_{0}}\in {\mathbf{I}_{0}}}{d_{{i_{0}}}}\right).\end{aligned}\]]]></tex-math></alternatives>
</disp-formula> 
These two formulas provide, in general, substantial computational savings over direct <inline-formula id="j_nejsds32_ineq_099"><alternatives><mml:math>
<mml:mi mathvariant="italic">O</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$O({p^{2}})$]]></tex-math></alternatives></inline-formula> computation of the network modularity quality function in Equation (<xref rid="j_nejsds32_eq_001">2.1</xref>), see Appendix <xref rid="j_nejsds32_app_001">A</xref> for derivations.</p>
<fig id="j_nejsds32_fig_002">
<label>Procedure 2:</label>
<caption>
<p>Local Optimization.</p>
</caption>
<graphic xlink:href="nejsds32_g002.jpg"/>
</fig>
</sec>
<sec id="j_nejsds32_s_008">
<label>4.4</label>
<title>Modified Core Procedures</title>
<p>Many discrete optimization problems, including the present one, are computationally difficult and frequently intractable. That is, the size of the solution space is, in general, prohibitively large for a complete search and the objective function is, in general, not monotonic in a mathematically-useful manner. For these reasons, an exact solution to the modularity optimization problem is not often sought but, instead, a satisfactory solution that is encountered by an algorithmic procedure is frequently reported as is the case with, for example, the Louvain method described above.</p>
<p>Prior to proposing our approach to the constrained optimization problem described in Section <xref rid="j_nejsds32_s_003">3</xref>, we present our modified versions of the greedy, local optimization (Procedure <xref rid="j_nejsds32_fig_002">2</xref>) and community folding (Procedure <xref rid="j_nejsds32_fig_003">3</xref>) procedures. In particular, we provide for the flexibility to exclude a subset of vertexes from the local optimization process in Procedure <xref rid="j_nejsds32_fig_002">2</xref> so that, in the present context, the community labels corresponding to special vertexes <inline-formula id="j_nejsds32_ineq_100"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msubsup></mml:math><tex-math><![CDATA[${v^{\prime }}\in {\mathbf{V}^{\prime }_{\tau }}$]]></tex-math></alternatives></inline-formula> may be held fixed while the community labels corresponding to <italic>regular</italic>, i.e. non-special, vertexes <inline-formula id="j_nejsds32_ineq_101"><alternatives><mml:math>
<mml:mi mathvariant="italic">v</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:mi mathvariant="bold">V</mml:mi>
<mml:mo>∖</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msubsup></mml:math><tex-math><![CDATA[$v\in \mathbf{V}\setminus {\mathbf{V}^{\prime }_{\tau }}$]]></tex-math></alternatives></inline-formula> are locally and greedily optimized. Moreover, in the process of folding, we provide the adapted Procedure <xref rid="j_nejsds32_fig_003">3</xref> which traces a set of vertexes through the folding process and reports which super-vertexes, i.e. the vertexes resulting from folded communities, are representative of any vertexes from that original set. In the present context, this permits the tracing of special vertexes through the folding process and reporting on the status of the super-vertexes that result from the folding process. Pseudocode for Procedures <xref rid="j_nejsds32_fig_002">2</xref> and <xref rid="j_nejsds32_fig_003">3</xref> are provided in the following.</p>
<fig id="j_nejsds32_fig_003">
<label>Procedure 3:</label>
<caption>
<p>Community Folding.</p>
</caption>
<graphic xlink:href="nejsds32_g003.jpg"/>
</fig>
<fig id="j_nejsds32_fig_004">
<label>Procedure 4:</label>
<caption>
<p>Initialization.</p>
</caption>
<graphic xlink:href="nejsds32_g004.jpg"/>
</fig>
</sec>
<sec id="j_nejsds32_s_009">
<label>4.5</label>
<title>Initialization Generalizations</title>
<p>The default community assignment vector <inline-formula id="j_nejsds32_ineq_102"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="bold">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mn>0</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo>=</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>2</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mo>…</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[${\mathbf{s}^{(0)}}=(1,2,\dots ,p)$]]></tex-math></alternatives></inline-formula> in Procedure <xref rid="j_nejsds32_fig_002">2</xref> is consistent with the initialization of the Louvain method and represents a bottom-up approach in the greedy optimization process. Experimentally, we have found that a top-down approach is often more effective in the context of the constraint that each community must consist of at least one special vertex.. We provide a summary of this procedure in the following pseudocode for Procedure <xref rid="j_nejsds32_fig_004">4</xref>.</p>
</sec>
<sec id="j_nejsds32_s_010">
<label>4.6</label>
<title>CMOP</title>
<p>We finally present the pseudocode for the main Constrained Modularity Optimization Procedure (<monospace>CMOP</monospace>) in Procedure <xref rid="j_nejsds32_fig_005">5</xref>.</p>
<fig id="j_nejsds32_fig_005">
<label>Procedure 5:</label>
<caption>
<p>CMOP: Constrained Modularity Optimization Procedure.</p>
</caption>
<graphic xlink:href="nejsds32_g005.jpg"/>
</fig>
<p>Among the three constrained, high-modularity community assignment vector <inline-formula id="j_nejsds32_ineq_103"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">t</mml:mi>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${\mathbf{s}_{td}}$]]></tex-math></alternatives></inline-formula>, <inline-formula id="j_nejsds32_ineq_104"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">m</mml:mi>
<mml:mi mathvariant="italic">r</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${\mathbf{s}_{mr}}$]]></tex-math></alternatives></inline-formula>, and <inline-formula id="j_nejsds32_ineq_105"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">n</mml:mi>
<mml:mi mathvariant="italic">u</mml:mi>
<mml:mi mathvariant="italic">l</mml:mi>
<mml:mi mathvariant="italic">l</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${\mathbf{s}_{null}}$]]></tex-math></alternatives></inline-formula>, as computed in Algorithm <xref rid="j_nejsds32_fig_005">5</xref>, the vector corresponding to the greatest modularity value is ultimately returned.</p>
</sec>
</sec>
<sec id="j_nejsds32_s_011">
<label>5</label>
<title>Application: Definition of Health Care Communities</title>
<p>The nationwide hospital network we consider consists of <inline-formula id="j_nejsds32_ineq_106"><alternatives><mml:math>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>4734</mml:mn></mml:math><tex-math><![CDATA[$p=4734$]]></tex-math></alternatives></inline-formula> hospitals, as depicted in Figure <xref rid="j_nejsds32_fig_006">1</xref>a, among which 1388 (29.3%) are CCFs hosting at least <inline-formula id="j_nejsds32_ineq_107"><alternatives><mml:math>
<mml:mi mathvariant="italic">τ</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>1</mml:mn></mml:math><tex-math><![CDATA[$\tau =1$]]></tex-math></alternatives></inline-formula> ICD surgeries and correspond to special vertexes in <inline-formula id="j_nejsds32_ineq_108"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup></mml:math><tex-math><![CDATA[${v^{\prime }}\in {\mathbf{V}^{\prime }}$]]></tex-math></alternatives></inline-formula>. We begin this analysis by processing the data.</p>
<fig id="j_nejsds32_fig_006">
<label>Figure 1</label>
<caption>
<p><bold>Hospital Network-graph</bold>: <bold>(a)</bold> plot of log histogram density vs log degree for all hospitals (black points) and only CCF hospitals (green points). Lines of best fits for the head (red line) and tail (blue line) of the log degree distribution of all hospitals. <bold>(b, c)</bold> The edges retained after pruning, see Appendix <xref rid="j_nejsds32_app_002">B</xref>. All hospitals are marked as small yellow points whereas, in (b) the vertexes with degrees in the tail of the degree distribution are marked with red points with radii proportional to their degree and in (c) the vertexes representing cardiac care facilities (CCFs) are marked in green points with radii proportional to the total number of ICD implantations that took place during the study period at that facility. <bold>(d)</bold> Using a database of all United States zip codes, along with their respective latitude and longitude coordinate, we indicated on the map the community of the nearest hospital to that zip code, with the understanding that a patient in that zip code is likely to travel to the nearest hospital in case of cardiac emergency.</p>
</caption>
<graphic xlink:href="nejsds32_g006.jpg"/>
</fig>
<sec id="j_nejsds32_s_012">
<label>5.1</label>
<title>Data Processing</title>
<p>The weighted degree distributions of all hospitals and the CCFs in Figure <xref rid="j_nejsds32_fig_006">1</xref>a illustrate the different orders of magnitude in their respective quantities. We compute the Pearson chi-square test statistic for independence 
<disp-formula id="j_nejsds32_eq_011">
<alternatives><mml:math display="block">
<mml:mtable displaystyle="true" columnalign="right left" columnspacing="0pt">
<mml:mtr>
<mml:mtd class="align-odd">
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="italic">χ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msubsup>
</mml:mtd>
<mml:mtd class="align-even">
<mml:mo>=</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:msup>
<mml:mrow>
<mml:mfenced separators="" open="(" close=")">
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">W</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>−</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">E</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:mfenced>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">E</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:mo mathvariant="normal">,</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[\begin{aligned}{}{\chi _{ij}^{2}}& =\frac{{\left({W_{ij}}-{E_{ij}}\right)^{2}}}{{E_{ij}}},\end{aligned}\]]]></tex-math></alternatives>
</disp-formula> 
where <inline-formula id="j_nejsds32_ineq_109"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">E</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>=</mml:mo><mml:mstyle displaystyle="false">
<mml:mfrac>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
<mml:mi mathvariant="italic">m</mml:mi>
</mml:mrow>
</mml:mfrac>
</mml:mstyle></mml:math><tex-math><![CDATA[${E_{ij}}=\frac{{d_{i}}{d_{j}}}{2m}$]]></tex-math></alternatives></inline-formula>, for <inline-formula id="j_nejsds32_ineq_110"><alternatives><mml:math>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">j</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>2</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mo>…</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo fence="true" stretchy="false">}</mml:mo></mml:math><tex-math><![CDATA[$i,j\in \{1,2,\dots ,p\}$]]></tex-math></alternatives></inline-formula>, and note that in Figure <xref rid="j_nejsds32_fig_006">1</xref>c, a rather clear trend reflecting the exponential decay of the <inline-formula id="j_nejsds32_ineq_111"><alternatives><mml:math>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="italic">χ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msubsup></mml:math><tex-math><![CDATA[${\chi _{ij}^{2}}$]]></tex-math></alternatives></inline-formula> quantities in the nationwide hospital network-graph. We set <inline-formula id="j_nejsds32_ineq_112"><alternatives><mml:math>
<mml:mi mathvariant="italic">ζ</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>266.4843</mml:mn></mml:math><tex-math><![CDATA[$\zeta =266.4843$]]></tex-math></alternatives></inline-formula> as the 0.995 quantile threshold of the collection of <inline-formula id="j_nejsds32_ineq_113"><alternatives><mml:math>
<mml:mfenced separators="" open="(" close=")">
<mml:mfrac linethickness="0.0pt">
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:mfrac>
</mml:mfenced>
</mml:math><tex-math><![CDATA[$\left(\genfrac{}{}{0.0pt}{}{p}{2}\right)$]]></tex-math></alternatives></inline-formula> chi-square quantities above and define the unweighted adjacency matrix <bold>A</bold> of the pruned nationwide hospital network as <inline-formula id="j_nejsds32_ineq_114"><alternatives><mml:math>
<mml:mi mathvariant="bold">A</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="bold-italic">χ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo mathvariant="normal">&gt;</mml:mo>
<mml:mi mathvariant="italic">ζ</mml:mi>
<mml:mo fence="true" stretchy="false">}</mml:mo></mml:math><tex-math><![CDATA[$\mathbf{A}=1\{{\boldsymbol{\chi }^{2}}\gt \zeta \}$]]></tex-math></alternatives></inline-formula>, where <inline-formula id="j_nejsds32_ineq_115"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="bold-italic">χ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="double-struck">R</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo>×</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
</mml:msup></mml:math><tex-math><![CDATA[${\boldsymbol{\chi }^{2}}\in {\mathbb{R}^{p\times p}}$]]></tex-math></alternatives></inline-formula> with elements <inline-formula id="j_nejsds32_ineq_116"><alternatives><mml:math>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="italic">χ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msubsup></mml:math><tex-math><![CDATA[${\chi _{ij}^{2}}$]]></tex-math></alternatives></inline-formula> for <inline-formula id="j_nejsds32_ineq_117"><alternatives><mml:math>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">j</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>2</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mo>…</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo fence="true" stretchy="false">}</mml:mo></mml:math><tex-math><![CDATA[$i,j\in \{1,2,\dots ,p\}$]]></tex-math></alternatives></inline-formula> and the indicator function <inline-formula id="j_nejsds32_ineq_118"><alternatives><mml:math>
<mml:mn>1</mml:mn>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:mo>·</mml:mo>
<mml:mo fence="true" stretchy="false">}</mml:mo></mml:math><tex-math><![CDATA[$1\{\cdot \}$]]></tex-math></alternatives></inline-formula> is applied element-wise.</p>
<p>The argument <bold>s</bold> of the objective function <inline-formula id="j_nejsds32_ineq_119"><alternatives><mml:math>
<mml:mi mathvariant="italic">Q</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">s</mml:mi>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="bold">W</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$Q(\mathbf{s}|\mathbf{W})$]]></tex-math></alternatives></inline-formula> in Equation (<xref rid="j_nejsds32_eq_001">2.1</xref>) is of principal concern, as opposed to the weighted network itself. Accordingly, we reduce the network dataset by pruning the weighted network edges that are relatively inconsequential in the evaluation of the modularity quality function in Equation (<xref rid="j_nejsds32_eq_001">2.1</xref>). If, for instance, <inline-formula id="j_nejsds32_ineq_120"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">W</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>−</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">E</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">≈</mml:mo>
<mml:mn>0</mml:mn></mml:math><tex-math><![CDATA[${W_{ij}}-{E_{ij}}\approx 0$]]></tex-math></alternatives></inline-formula>, i.e., the observed weight of the edge connecting vertexes <inline-formula id="j_nejsds32_ineq_121"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${v_{i}}$]]></tex-math></alternatives></inline-formula> and <inline-formula id="j_nejsds32_ineq_122"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${v_{j}}$]]></tex-math></alternatives></inline-formula> is approximately as expected under the configuration model, then whether vertexes <inline-formula id="j_nejsds32_ineq_123"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${v_{i}}$]]></tex-math></alternatives></inline-formula> and <inline-formula id="j_nejsds32_ineq_124"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${v_{j}}$]]></tex-math></alternatives></inline-formula> have the same or different community assignments results in a small marginal change in <inline-formula id="j_nejsds32_ineq_125"><alternatives><mml:math>
<mml:mi mathvariant="italic">Q</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">s</mml:mi>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="bold">W</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$Q(\mathbf{s}|\mathbf{W})$]]></tex-math></alternatives></inline-formula>. Conversely, if the observed weight <inline-formula id="j_nejsds32_ineq_126"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">W</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">≪</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">E</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${W_{ij}}\ll {E_{ij}}$]]></tex-math></alternatives></inline-formula> or <inline-formula id="j_nejsds32_ineq_127"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">W</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">≫</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">E</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${W_{ij}}\gg {E_{ij}}$]]></tex-math></alternatives></inline-formula> then the community assignments of vertexes <inline-formula id="j_nejsds32_ineq_128"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${v_{i}}$]]></tex-math></alternatives></inline-formula> and <inline-formula id="j_nejsds32_ineq_129"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${v_{j}}$]]></tex-math></alternatives></inline-formula> has a relatively greater marginal impact on <inline-formula id="j_nejsds32_ineq_130"><alternatives><mml:math>
<mml:mi mathvariant="italic">Q</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">s</mml:mi>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="bold">W</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$Q(\mathbf{s}|\mathbf{W})$]]></tex-math></alternatives></inline-formula>. Accordingly, a large value of <inline-formula id="j_nejsds32_ineq_131"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">W</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>−</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">E</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup></mml:math><tex-math><![CDATA[${({W_{ij}}-{E_{ij}})^{2}}$]]></tex-math></alternatives></inline-formula> implies that the correspondence of the community assignments of vertexes <inline-formula id="j_nejsds32_ineq_132"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${v_{i}}$]]></tex-math></alternatives></inline-formula> and <inline-formula id="j_nejsds32_ineq_133"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${v_{j}}$]]></tex-math></alternatives></inline-formula> are important. The <inline-formula id="j_nejsds32_ineq_134"><alternatives><mml:math>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="italic">χ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msubsup></mml:math><tex-math><![CDATA[${\chi _{ij}^{2}}$]]></tex-math></alternatives></inline-formula> value standardizes this value so that comparisons among the magnitudes of <inline-formula id="j_nejsds32_ineq_135"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">W</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>−</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">E</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup></mml:math><tex-math><![CDATA[${({W_{ij}}-{E_{ij}})^{2}}$]]></tex-math></alternatives></inline-formula> across all vertex pairs <inline-formula id="j_nejsds32_ineq_136"><alternatives><mml:math>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo>:</mml:mo>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">j</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>2</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mo>…</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo fence="true" stretchy="false">}</mml:mo>
<mml:mo fence="true" stretchy="false">}</mml:mo></mml:math><tex-math><![CDATA[$\{({v_{i}},{v_{j}}):i,j\in \{1,2,\dots ,p\}\}$]]></tex-math></alternatives></inline-formula> are meaningful.</p>
<p>The United States map in Figure <xref rid="j_nejsds32_fig_006">1</xref>b indicates that the bulk of ICD surgeries occur in hospitals located in the Eastern States and have a higher frequency of shared patients with physicians associated with other hospitals compared to the entire population of hospitals in the network. Note that in Figure <xref rid="j_nejsds32_fig_006">1</xref>a the degree distributions of all hospitals and, separately, that of cardiac care facilities only are similar and, moreover, Figure <xref rid="j_nejsds32_fig_010">5</xref>c of the quantiles of respective degree distribution of regular (non-special) vertexes against special vertexes indicates that there is no significant difference between the two distributions, see Appendix <xref rid="j_nejsds32_app_001">A</xref>. The consequence of this fact is that the distribution of cardiac care facilities within communities is not expected to be an artifact of the network modularity quality function.</p>
</sec>
<sec id="j_nejsds32_s_013">
<label>5.2</label>
<title>Unconstrained Hospital Network Communities</title>
<p>To estimate unconstrained communities in the hospital network we used the <monospace>cluster_louvain</monospace> function that belongs to the igraph R package. [<xref ref-type="bibr" rid="j_nejsds32_ref_025">25</xref>, <xref ref-type="bibr" rid="j_nejsds32_ref_006">6</xref>] The resulting communities are mapped to local zip codes, and displayed in Figure <xref rid="j_nejsds32_fig_007">2</xref>, to reflect the hospital community into which a resident of each zip code would likely be entered upon a cardiac emergency.</p>
<fig id="j_nejsds32_fig_007">
<label>Figure 2</label>
<caption>
<p><bold>Unconstrained Hospital Communities</bold>: <bold>(a)</bold> Histogram of base ten logarithm of the pruned network degree distribution using 0.995 quantile threshold on original patient-sharing edge weights in the hospital network. <bold>(b)</bold> Selection of threshold <inline-formula id="j_nejsds32_ineq_137"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">α</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>=</mml:mo>
<mml:mn>36</mml:mn></mml:math><tex-math><![CDATA[${\tau _{\alpha }}=36$]]></tex-math></alternatives></inline-formula>, where the subscript reflects the <inline-formula id="j_nejsds32_ineq_138"><alternatives><mml:math>
<mml:mi mathvariant="italic">α</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>0.265</mml:mn></mml:math><tex-math><![CDATA[$\alpha =0.265$]]></tex-math></alternatives></inline-formula> quantile of the distribution of ICD procedures performed at CCF hospitals, see Figure <xref rid="j_nejsds32_fig_010">5</xref>a, as the change point in the trend of number of communities in violation of the constraint, i.e., communities that do not possess a hospital where at least <inline-formula id="j_nejsds32_ineq_139"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">α</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${\tau _{\alpha }}$]]></tex-math></alternatives></inline-formula> ICD implantations were performed, appears to change. Note that this trend and the corresponding location of interest depends on the graph topology. <bold>(c)</bold> The result of first employing the Louvain method on the nationwide network of hospital referrals for cardiac care and subsequently extending the communities to local zip codes via the <inline-formula id="j_nejsds32_ineq_140"><alternatives><mml:math>
<mml:mi mathvariant="italic">K</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>1</mml:mn></mml:math><tex-math><![CDATA[$K=1$]]></tex-math></alternatives></inline-formula> nearest neighbor criterion. The unconstrained communities exhibit some contiguity. However, because the communities are not constrained to be geographically contiguous, some of the communities have highly elongated shapes as they include at least one hospital far apart from the others. <bold>(d)</bold> Zip codes labeled as belonging to a community in violation of the constraint (red) or as belonging to a feasible community (blue).</p>
</caption>
<graphic xlink:href="nejsds32_g007.jpg"/>
</fig>
<p>The geographical proximity of unconstrained hospital communities, as quantified by the network modularity quality function and estimated via the Louvain method, is relatively expected. In fact, if we consider the five most geographically-proximal hospitals to each zip code in the United States then we find that <inline-formula id="j_nejsds32_ineq_141"><alternatives><mml:math>
<mml:mn>72.1</mml:mn>
<mml:mi mathvariant="normal">%</mml:mi></mml:math><tex-math><![CDATA[$72.1\% $]]></tex-math></alternatives></inline-formula> of zip codes are closest to five hospitals all of the same unconstrained community and <inline-formula id="j_nejsds32_ineq_142"><alternatives><mml:math>
<mml:mn>24.5</mml:mn>
<mml:mi mathvariant="normal">%</mml:mi></mml:math><tex-math><![CDATA[$24.5\% $]]></tex-math></alternatives></inline-formula> are closest to five hospitals from two different unconstrained communities.</p>
</sec>
<sec id="j_nejsds32_s_014">
<label>5.3</label>
<title>Defining Heath Care Communities</title>
<p>We now apply Procedure <xref rid="j_nejsds32_fig_001">1</xref> to the nationwide unweighted hospital network-graph to identify the health care communities. As it turns out, the unconstrained community assignment vector <inline-formula id="j_nejsds32_ineq_143"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">o</mml:mi>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mi mathvariant="italic">t</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${\mathbf{s}_{opt}}$]]></tex-math></alternatives></inline-formula> results in a single network community that is in violation of the constraint that each community have at least one cardiac care facility (CCF) where <italic>at least one</italic> implantable cardioverter defibrillator (ICD) procedure was performed during the study period.</p>
<p>In order to more completely and accurately illustrate the utility of our methodology, we restrict the special vertex set to consist of vertexes corresponding to hospitals at which at least <inline-formula id="j_nejsds32_ineq_144"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0.265</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo>=</mml:mo>
<mml:mn>36</mml:mn></mml:math><tex-math><![CDATA[${\tau _{0.265}}=36$]]></tex-math></alternatives></inline-formula> ICD procedures were performed, where <inline-formula id="j_nejsds32_ineq_145"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">α</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${\tau _{\alpha }}$]]></tex-math></alternatives></inline-formula> is the <italic>α</italic> quantile of the distribution of ICD procedure counts across all CCFs in the nationwide network, see Figure <xref rid="j_nejsds32_fig_007">2</xref>. This restriction tightens the constraint of the optimization problem and, practically, corresponds to the requirement that each health care community discovered by Procedure <xref rid="j_nejsds32_fig_001">1</xref> has a greater lower-bound on the quantity of ICD procedures performed therein.</p>
<p>Our procedure considers each of the initial conditions of the recursive-backtracking Procedure <xref rid="j_nejsds32_fig_001">1</xref> and ultimately selects <inline-formula id="j_nejsds32_ineq_146"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">o</mml:mi>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mi mathvariant="italic">t</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${\mathbf{s}_{opt}}$]]></tex-math></alternatives></inline-formula>. Subsequently, two options are considered: (i) should a special vertex be relabeled according to the community in violation and then subsequently update the elements of the community assignment vector by applying an alternating sequence of Procedures <xref rid="j_nejsds32_fig_002">2</xref> and <xref rid="j_nejsds32_fig_003">3</xref> until the local optimum <inline-formula id="j_nejsds32_ineq_147"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">h</mml:mi>
<mml:mi mathvariant="italic">c</mml:mi>
<mml:mi mathvariant="italic">c</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>=</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">R</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${\mathbf{s}_{hcc}}={\mathbf{s}_{R}}$]]></tex-math></alternatives></inline-formula> is identified via many computations of the forms in Equations (<xref rid="j_nejsds32_eq_009">4.1</xref>) and (<xref rid="j_nejsds32_eq_010">4.2</xref>). We consider the length <inline-formula id="j_nejsds32_ineq_148"><alternatives><mml:math>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>4734</mml:mn></mml:math><tex-math><![CDATA[$p=4734$]]></tex-math></alternatives></inline-formula> vector <inline-formula id="j_nejsds32_ineq_149"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">y</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${\mathbf{y}_{0}}$]]></tex-math></alternatives></inline-formula> containing the number of ICD procedures taking place at each corresponding hospital, e.g. <inline-formula id="j_nejsds32_ineq_150"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">y</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">k</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>=</mml:mo>
<mml:mn>0</mml:mn></mml:math><tex-math><![CDATA[${y_{k}}=0$]]></tex-math></alternatives></inline-formula> if <inline-formula id="j_nejsds32_ineq_151"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">k</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${v_{k}}$]]></tex-math></alternatives></inline-formula> does not represent a hospital where any ICD procedures were performed and otherwise <inline-formula id="j_nejsds32_ineq_152"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">y</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">k</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal">&gt;</mml:mo>
<mml:mn>0</mml:mn></mml:math><tex-math><![CDATA[${y_{k}}\gt 0$]]></tex-math></alternatives></inline-formula>. Define the vector <inline-formula id="j_nejsds32_ineq_153"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="bold">y</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">α</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
</mml:msup></mml:math><tex-math><![CDATA[${\mathbf{y}^{(\alpha )}}$]]></tex-math></alternatives></inline-formula> with elements 
<disp-formula id="j_nejsds32_eq_012">
<alternatives><mml:math display="block">
<mml:mtable displaystyle="true" columnalign="right left" columnspacing="0pt">
<mml:mtr>
<mml:mtd class="align-odd">
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="italic">y</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">k</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">α</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
</mml:msubsup>
</mml:mtd>
<mml:mtd class="align-even">
<mml:mo>=</mml:mo>
<mml:mfenced separators="" open="{" close="">
<mml:mrow>
<mml:mtable columnspacing="10.0pt" equalrows="false" columnlines="none" equalcolumns="false" columnalign="left left">
<mml:mtr>
<mml:mtd class="array">
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">y</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">k</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mspace width="1em"/>
</mml:mtd>
<mml:mtd class="array">
<mml:mspace width="2.5pt"/>
<mml:mtext>if</mml:mtext>
<mml:mspace width="2.5pt"/>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">y</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">k</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal">&gt;</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">α</mml:mi>
</mml:mrow>
</mml:msub>
</mml:mtd>
</mml:mtr>
<mml:mtr>
<mml:mtd class="array">
<mml:mn>0</mml:mn>
<mml:mspace width="1em"/>
</mml:mtd>
<mml:mtd class="array">
<mml:mspace width="2.5pt"/>
<mml:mtext>otherwise,</mml:mtext>
</mml:mtd>
</mml:mtr>
</mml:mtable>
</mml:mrow>
</mml:mfenced>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[\begin{aligned}{}{y_{k}^{(\alpha )}}& =\left\{\begin{array}{l@{\hskip10.0pt}l}{y_{k}}\hspace{1em}& \hspace{2.5pt}\text{if}\hspace{2.5pt}{y_{k}}\gt {\tau _{\alpha }}\\ {} 0\hspace{1em}& \hspace{2.5pt}\text{otherwise,}\end{array}\right.\end{aligned}\]]]></tex-math></alternatives>
</disp-formula> 
for some <inline-formula id="j_nejsds32_ineq_154"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">α</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">≥</mml:mo>
<mml:mn>0</mml:mn></mml:math><tex-math><![CDATA[${\tau _{\alpha }}\ge 0$]]></tex-math></alternatives></inline-formula>. Note that, as displayed in Figure <xref rid="j_nejsds32_fig_007">2</xref>b, with <inline-formula id="j_nejsds32_ineq_155"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0.96</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo>=</mml:mo>
<mml:mi mathvariant="monospace">quantile</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">y</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>0.96</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[${\tau _{0.96}}=\mathtt{quantile}({\mathbf{y}_{0}},0.96)$]]></tex-math></alternatives></inline-formula> and <inline-formula id="j_nejsds32_ineq_156"><alternatives><mml:math>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">α</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msubsup>
<mml:mo>=</mml:mo>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">k</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>:</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">y</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">k</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal">&gt;</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">α</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mspace width="2.5pt"/>
<mml:mtext>for</mml:mtext>
<mml:mspace width="2.5pt"/>
<mml:mi mathvariant="italic">k</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>2</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mo>…</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo fence="true" stretchy="false">}</mml:mo>
<mml:mo fence="true" stretchy="false">}</mml:mo></mml:math><tex-math><![CDATA[${\mathbf{V}^{\prime }_{\alpha }}=\{{v_{k}}:{y_{k}}\gt {\tau _{\alpha }},\hspace{2.5pt}\text{for}\hspace{2.5pt}k\in \{1,2,\dots ,p\}\}$]]></tex-math></alternatives></inline-formula> then, with this subset <inline-formula id="j_nejsds32_ineq_157"><alternatives><mml:math>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">α</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msubsup>
<mml:mo stretchy="false">⊂</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup></mml:math><tex-math><![CDATA[${\mathbf{V}^{\prime }_{\alpha }}\subset {\mathbf{V}^{\prime }}$]]></tex-math></alternatives></inline-formula> of special vertexes, the number of communities in violation of the constraint has risen to seven. We subsequently executed Procedure <xref rid="j_nejsds32_fig_001">1</xref> with <inline-formula id="j_nejsds32_ineq_158"><alternatives><mml:math>
<mml:mi mathvariant="bold">W</mml:mi>
<mml:mo>=</mml:mo>
<mml:mi mathvariant="bold">A</mml:mi></mml:math><tex-math><![CDATA[$\mathbf{W}=\mathbf{A}$]]></tex-math></alternatives></inline-formula> and <inline-formula id="j_nejsds32_ineq_159"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo>=</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">α</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msubsup></mml:math><tex-math><![CDATA[${\mathbf{V}^{\prime }}={\mathbf{V}^{\prime }_{\alpha }}$]]></tex-math></alternatives></inline-formula>. Please see Appendix <xref rid="j_nejsds32_app_002">B</xref> for more details.</p>
<p>The role of <inline-formula id="j_nejsds32_ineq_160"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">α</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${\tau _{\alpha }}$]]></tex-math></alternatives></inline-formula> in this application is that of <italic>τ</italic> in the preceding description of the general procedure. Note that this is the only parameter that modifies the contents of the auxiliary information contained in <inline-formula id="j_nejsds32_ineq_161"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo stretchy="false">⊆</mml:mo>
<mml:mi mathvariant="bold">V</mml:mi></mml:math><tex-math><![CDATA[${\mathbf{V}^{\prime }}\subseteq \mathbf{V}$]]></tex-math></alternatives></inline-formula>. Other parameters, including <italic>ζ</italic>, which control the topology of the unweighted network-graph <bold>A</bold>, are pertinent to the general problem of modularity quality function optimization and are related to the base Louvain method.</p>
<fig id="j_nejsds32_fig_008">
<label>Figure 3</label>
<caption>
<p><bold>Depiction of Health Care Communities (a)</bold> The nationwide-network of hospitals is partitioned into a constraint-satisfying communities of hospitals such that each community contains at least one of the CCFs exceeding the defined ICD procedure threshold. Because the communities are not constrained to be geographically contiguous, some of the communities have highly elongated shapes as they include at least one hospital far apart from the others. <bold>(b)</bold> A bipartite graph reflecting the overlap between unconstrained communities (bottom row) and constrained communities (top row). The width of the line segment between vertexes, each of which is representing a community consisting of a number of vertexes that is proportional to its dot radius on the plot, reflects the relative overlap of the communities in each class. The number below or above each vertex equals the number of CCFs contained within each community.</p>
</caption>
<graphic xlink:href="nejsds32_g008.jpg"/>
</fig>
</sec>
<sec id="j_nejsds32_s_015">
<label>5.4</label>
<title>Results Using a Subset of Special Vertices</title>
<p>By applying Procedure <xref rid="j_nejsds32_fig_006">1</xref> to the unweighted adjacency matrix <bold>A</bold> and the reduced special vertex set <inline-formula id="j_nejsds32_ineq_162"><alternatives><mml:math>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">α</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msubsup></mml:math><tex-math><![CDATA[${\mathbf{V}^{\prime }_{\alpha }}$]]></tex-math></alternatives></inline-formula>, we approximate the maximizer community assignment vector <inline-formula id="j_nejsds32_ineq_163"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">h</mml:mi>
<mml:mi mathvariant="italic">c</mml:mi>
<mml:mi mathvariant="italic">c</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>=</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">R</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${\mathbf{s}_{hcc}}={\mathbf{s}_{R}}$]]></tex-math></alternatives></inline-formula> of the network modularity quality function subject to the constraint that each community include at least one vertex <inline-formula id="j_nejsds32_ineq_164"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">α</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msubsup></mml:math><tex-math><![CDATA[${v^{\prime }}\in {\mathbf{V}^{\prime }_{\alpha }}$]]></tex-math></alternatives></inline-formula> and note that it corresponds to a network modularity quality function value of <inline-formula id="j_nejsds32_ineq_165"><alternatives><mml:math>
<mml:mi mathvariant="italic">Q</mml:mi>
<mml:mo stretchy="false">≈</mml:mo>
<mml:mn>0.6814</mml:mn></mml:math><tex-math><![CDATA[$Q\approx 0.6814$]]></tex-math></alternatives></inline-formula>, whereas the unconstrained modularity value of <inline-formula id="j_nejsds32_ineq_166"><alternatives><mml:math>
<mml:mi mathvariant="italic">Q</mml:mi>
<mml:mo stretchy="false">≈</mml:mo>
<mml:mn>0.6805</mml:mn></mml:math><tex-math><![CDATA[$Q\approx 0.6805$]]></tex-math></alternatives></inline-formula>. It turns out that the marginal adjustments subsequent to the constraint-satisfaction elements of Procedure <xref rid="j_nejsds32_fig_006">1</xref> may indeed identify a yet greater local maximum than the community assignment vector identified by the Louvain procedure. We do not consider this marginal improvement as worthwhile, however, due to the computational time requirements of such adjustments. We nevertheless note that, importantly, our strategy for identifying high-quality constrained communities is able to do so effectively. A plot of the health care communities identified by Procedure <xref rid="j_nejsds32_fig_006">1</xref> is provided in Figure <xref rid="j_nejsds32_fig_008">3</xref>. We note that <inline-formula id="j_nejsds32_ineq_167"><alternatives><mml:math>
<mml:mtext>nmi</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">o</mml:mi>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mi mathvariant="italic">t</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">R</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo stretchy="false">≈</mml:mo>
<mml:mn>0.9432</mml:mn></mml:math><tex-math><![CDATA[$\text{nmi}({\mathbf{s}_{opt}},{\mathbf{s}_{R}})\approx 0.9432$]]></tex-math></alternatives></inline-formula>, implying that the relative mutual correspondence between the two vertex community assignments. Note that this procedure requires approximately 14.35 minutes to halt compared with the near instantaneous computation of unconstrained communities on the same network with the Louvain method.</p>
<p>It is imperative for the reader to recognize the Louvain method as agnostic to vertex attributes and, in particular, to the accumulation of vertexes with particular attributes in communities discovered by the method. The modularity quality function, which the Louvain method optimizes in a greedy manner, is exclusively a function of the edge set of a graph. Accordingly, modifying the designation of special vertexes, as in the present context, does not modify the composition of the resulting communities discovered by the method. Our proposed method, by contrast, is specifically devised to address the composition of discovered network communities, that is, the assignment of special vertexes to each community. It follows that, if the number of special vertices is diminished, as was demonstrated in the present application, then the constraint that each community contain at least one special vertex becomes more stringent and the community structure discovered by our procedure is modified. We have depicted, in the context described in this section, precisely how the community structure of the network is modified by including a strict constraint. Although the computational time required to compute the constraint-satisfying community structure exceeds that of the time required to compute an unconstrained community structure, the leveraging of additional information related to vertex attributes is worthwhile, in this context and in many other contexts as discussed in the Introduction section of the present article, to facilitate meaningful comparisons across communities that are standardized by the constraint.</p>
</sec>
</sec>
<sec id="j_nejsds32_s_016">
<label>6</label>
<title>Simulation on Zachary Karate Club</title>
<p>In the following, we consider each <italic>k</italic>-tuple, for <inline-formula id="j_nejsds32_ineq_168"><alternatives><mml:math>
<mml:mi mathvariant="italic">k</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:mn>2</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>3</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>4</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>5</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>6</mml:mn>
<mml:mo fence="true" stretchy="false">}</mml:mo></mml:math><tex-math><![CDATA[$k\in \{2,3,4,5,6\}$]]></tex-math></alternatives></inline-formula> as the set of special vertexes <inline-formula id="j_nejsds32_ineq_169"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup></mml:math><tex-math><![CDATA[${\mathbf{V}^{\prime }}$]]></tex-math></alternatives></inline-formula>, among the set of <inline-formula id="j_nejsds32_ineq_170"><alternatives><mml:math>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>34</mml:mn></mml:math><tex-math><![CDATA[$p=34$]]></tex-math></alternatives></inline-formula> vertexes in the unweighted Zachary Karate Club social network-graph. [<xref ref-type="bibr" rid="j_nejsds32_ref_032">32</xref>] We apply Procedure <xref rid="j_nejsds32_fig_006">1</xref> to determine, for each of these tuples of special vertexes, to record the modularity of each constraint-satisfying community assignment vector returned by Procedure <xref rid="j_nejsds32_fig_001">1</xref>, the initial position selected by the procedure, and the relative length of the computational time for the procedure to halt. The results of the simulation study are presented in Figure <xref rid="j_nejsds32_fig_009">4</xref>.</p>
<p>The quantity <inline-formula id="j_nejsds32_ineq_171"><alternatives><mml:math>
<mml:mi mathvariant="italic">C</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">n</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$C(p,{p^{\prime }},n)$]]></tex-math></alternatives></inline-formula> in Equation (<xref rid="j_nejsds32_eq_003">2.2</xref>) counts the number of feasible community assignments for a given <inline-formula id="j_nejsds32_ineq_172"><alternatives><mml:math>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo>=</mml:mo>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="bold">V</mml:mi>
<mml:mo stretchy="false">|</mml:mo></mml:math><tex-math><![CDATA[$p=|\mathbf{V}|$]]></tex-math></alternatives></inline-formula>, <inline-formula id="j_nejsds32_ineq_173"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo>=</mml:mo>
<mml:mo stretchy="false">|</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="bold">V</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo stretchy="false">|</mml:mo></mml:math><tex-math><![CDATA[${p^{\prime }}=|{\mathbf{V}^{\prime }}|$]]></tex-math></alternatives></inline-formula>, and number of communities <italic>n</italic>. While this number reflects the number of community assignments necessary to brute-force check and, therefore, guarantee that the optimum defined in Equation (<xref rid="j_nejsds32_eq_005">2.4</xref>) has been obtained, our greedy procedure is guided by the network topology and halts in many fewer iterations. Since the number of communities <italic>n</italic> is automatically chosen by the procedure, the computational time required for our procedure to halt is a function of (i) the number <inline-formula id="j_nejsds32_ineq_174"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup></mml:math><tex-math><![CDATA[${p^{\prime }}$]]></tex-math></alternatives></inline-formula> of special vertexes and (ii) the distribution of the special vertexes within the network-graph. For example, if <inline-formula id="j_nejsds32_ineq_175"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">n</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">o</mml:mi>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mi mathvariant="italic">t</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${n_{opt}}$]]></tex-math></alternatives></inline-formula> is the number of unique labels, i.e. communities, represented in <inline-formula id="j_nejsds32_ineq_176"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">o</mml:mi>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mi mathvariant="italic">t</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${\mathbf{s}_{opt}}$]]></tex-math></alternatives></inline-formula> in Equation (<xref rid="j_nejsds32_eq_004">2.3</xref>) and <inline-formula id="j_nejsds32_ineq_177"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo mathvariant="normal">&lt;</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">n</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">o</mml:mi>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mi mathvariant="italic">t</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${p^{\prime }}\lt {n_{opt}}$]]></tex-math></alternatives></inline-formula> or if <inline-formula id="j_nejsds32_ineq_178"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo stretchy="false">≥</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">n</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">o</mml:mi>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mi mathvariant="italic">t</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${p^{\prime }}\ge {n_{opt}}$]]></tex-math></alternatives></inline-formula> but the special vertexes are frequently labeled similarly in <inline-formula id="j_nejsds32_ineq_179"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">o</mml:mi>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mi mathvariant="italic">t</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${\mathbf{s}_{opt}}$]]></tex-math></alternatives></inline-formula> then some work is necessary to compute <inline-formula id="j_nejsds32_ineq_180"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">s</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">R</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${\mathbf{s}_{R}}$]]></tex-math></alternatives></inline-formula> of in Equation (<xref rid="j_nejsds32_eq_005">2.4</xref>).</p>
<fig id="j_nejsds32_fig_009">
<label>Figure 4</label>
<caption>
<p><bold>Simulation: Zachary Karate Club (a)</bold> The optimal community assignments in this social network of <inline-formula id="j_nejsds32_ineq_181"><alternatives><mml:math>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>34</mml:mn></mml:math><tex-math><![CDATA[$p=34$]]></tex-math></alternatives></inline-formula> vertexes. <bold>(b)</bold> The marginal relative frequency that each initial condition was selected by Procedure <xref rid="j_nejsds32_fig_005">5</xref> over all <inline-formula id="j_nejsds32_ineq_182"><alternatives><mml:math>
<mml:mfenced separators="" open="(" close=")">
<mml:mfrac linethickness="0.0pt">
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
</mml:mfrac>
</mml:mfenced>
</mml:math><tex-math><![CDATA[$\left(\genfrac{}{}{0.0pt}{}{p}{d}\right)$]]></tex-math></alternatives></inline-formula> choices of special vertexes, for <inline-formula id="j_nejsds32_ineq_183"><alternatives><mml:math>
<mml:mi mathvariant="italic">d</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>2</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>3</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>4</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>5</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>6</mml:mn></mml:math><tex-math><![CDATA[$d=2,3,4,5,6$]]></tex-math></alternatives></inline-formula>. <bold>(c)</bold> The relative gain in modularity (modularity of constrained community assignment)/(modularity of unconstrained community assignment) - 1 by number of special vertexes in the network <inline-formula id="j_nejsds32_ineq_184"><alternatives><mml:math>
<mml:mi mathvariant="italic">d</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>2</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>3</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>4</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>5</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>6</mml:mn></mml:math><tex-math><![CDATA[$d=2,3,4,5,6$]]></tex-math></alternatives></inline-formula>. <bold>(d)</bold> Logarithm base 10 of the relative (to the median computational time with two special vertexes in the network) amount of computational time for Procedure <xref rid="j_nejsds32_fig_005">5</xref> to halt. We did not include instances when the unconstrained community assignment vector satisfied the constraint.</p>
</caption>
<graphic xlink:href="nejsds32_g009.jpg"/>
</fig>
</sec>
<sec id="j_nejsds32_s_017">
<label>7</label>
<title>Conclusion</title>
<p>Our method for identifying network communities optimizes a quality function while adhering to constraints. The results in this paper establish the utility of penalized optimization in community detection. Our method is versatile and amenable to many types of constraints on the composition of communities. We note that our procedure is valid for any constraint which is an increasing function of the variable of interest, e.g., number of CCF hospitals belonging to a community, number of cardiac surgeons, quantity of cases involving improper medical procedures, etc. The key requirement of our constrained optimization procedure is that the merging of two communities must not be the basis for the resulting community to be in violation of the constraint. A constraint that imposes a maximum ICD volume is, for example, not of this type.</p>
<p>There exists a disconnect between network science and health services research due in part to the incongruence between mathematical elegance and real-world constraints. We have provided an illustration of the application of both a pure (unconstrained) method and one with constraints. We solved the practical problem of partitioning a network of hospitals with the constraint that the number of ICD surgical procedures that have taken place at at least one hospital belonging to each community exceeds some threshold. Though our method advances both the community detection and heath services literature, it is not complete from the perspective of a health care policy maker since many real-world constraints remain to be incorporated. Another type of constraint is, for example, given the geographic locations of hospitals, a requirement that communities not exceed a defined geographic maximum diameter or that they satisfy a geographic congruity constraint. On the other hand, one shouldn’t necessarily seek to impose geographic contiguity constraints, for example, if one is interested in analyzing the effect of telemedicine or remote monitoring, for which the organization of health care does not need to conform as much to geography. This article is an initial exploration of a line of thinking that we anticipate will substantially advance the practical utility of community detection.</p>
<p>In terms of health policy, our future research involving an outcomes-based analysis of the communities discovered by our method, as constrained here by minimum ICD surgery volume and subsequently by other factors, will lead to enhanced acuity and potentially greater statistical power for studying variations in health care markets (based on patient referral patterns). Through standardizing the composition of the HCCs, our method provides the tools for such comparisons to be made meaningfully.</p>
</sec>
</body>
<back>
<app-group>
<app id="j_nejsds32_app_001"><label>Appendix A</label>
<title>Change in Modularity</title>
<p>Let <inline-formula id="j_nejsds32_ineq_185"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">⊆</mml:mo>
<mml:mi mathvariant="bold">V</mml:mi></mml:math><tex-math><![CDATA[${\mathbf{I}_{i}},{\mathbf{I}_{2}}\subseteq \mathbf{V}$]]></tex-math></alternatives></inline-formula> be two disjoint vertex subsets that are to be merged into <inline-formula id="j_nejsds32_ineq_186"><alternatives><mml:math>
<mml:mi mathvariant="bold">I</mml:mi>
<mml:mo>=</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo>∪</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">⊆</mml:mo>
<mml:mi mathvariant="bold">V</mml:mi></mml:math><tex-math><![CDATA[$\mathbf{I}={\mathbf{I}_{1}}\cup {\mathbf{I}_{2}}\subseteq \mathbf{V}$]]></tex-math></alternatives></inline-formula> and define <inline-formula id="j_nejsds32_ineq_187"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">Q</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${Q_{{\mathbf{I}_{1}},{\mathbf{I}_{2}}}}$]]></tex-math></alternatives></inline-formula> and <inline-formula id="j_nejsds32_ineq_188"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">Q</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${Q_{\mathbf{I}}}$]]></tex-math></alternatives></inline-formula> respectively as the modularity of a vertex partition prior to and subsequent to the merger. The change in modularity 
<disp-formula id="j_nejsds32_eq_013">
<alternatives><mml:math display="block">
<mml:mtable displaystyle="true" columnalign="right left" columnspacing="0pt">
<mml:mtr>
<mml:mtd class="align-odd">
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="normal">Δ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">c</mml:mi>
<mml:mi mathvariant="italic">o</mml:mi>
<mml:mi mathvariant="italic">m</mml:mi>
<mml:mi mathvariant="italic">m</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mi mathvariant="italic">Q</mml:mi>
</mml:mtd>
<mml:mtd class="align-even">
<mml:mo>=</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">Q</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>−</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">Q</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:msub>
</mml:mtd>
</mml:mtr>
<mml:mtr>
<mml:mtd class="align-odd"/>
<mml:mtd class="align-even">
<mml:mo>=</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
<mml:mi mathvariant="italic">m</mml:mi>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:munder>
<mml:mrow>
<mml:mstyle displaystyle="true">
<mml:mo largeop="true" movablelimits="false">∑</mml:mo></mml:mstyle>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:munder>
<mml:mfenced separators="" open="(" close=")">
<mml:mrow>
<mml:munder>
<mml:mrow>
<mml:mstyle displaystyle="true">
<mml:mo largeop="true" movablelimits="false">∑</mml:mo></mml:mstyle>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:munder>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">W</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:msub>
<mml:mo>−</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
<mml:mi mathvariant="italic">m</mml:mi>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:msub>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:mfenced>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[\begin{aligned}{}{\Delta _{comm}}Q& ={Q_{\mathbf{I}}}-{Q_{{\mathbf{I}_{1}},{\mathbf{I}_{2}}}}\\ {} & =\frac{1}{2m}\sum \limits_{{i_{1}}\in {\mathbf{I}_{1}}}\left(\sum \limits_{{i_{2}}\in {\mathbf{I}_{2}}}{W_{{i_{1}}{i_{2}}}}-\frac{1}{2m}{d_{{i_{1}}}}{d_{{i_{2}}}}\right)\end{aligned}\]]]></tex-math></alternatives>
</disp-formula> 
gives rise to Equation (<xref rid="j_nejsds32_eq_009">4.1</xref>). On the other hand, suppose that <inline-formula id="j_nejsds32_ineq_189"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">⊆</mml:mo>
<mml:mi mathvariant="bold">V</mml:mi></mml:math><tex-math><![CDATA[${\mathbf{I}_{0}},{\mathbf{I}_{1}}\subseteq \mathbf{V}$]]></tex-math></alternatives></inline-formula> and that the vertex <inline-formula id="j_nejsds32_ineq_190"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${v_{j}}\in {\mathbf{I}_{0}}$]]></tex-math></alternatives></inline-formula> is to be reassigned to <inline-formula id="j_nejsds32_ineq_191"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${\mathbf{I}_{1}}$]]></tex-math></alternatives></inline-formula> and define <inline-formula id="j_nejsds32_ineq_192"><alternatives><mml:math>
<mml:mi mathvariant="normal">Δ</mml:mi>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="italic">Q</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
<mml:mrow>
<mml:mo>−</mml:mo>
</mml:mrow>
</mml:msubsup></mml:math><tex-math><![CDATA[$\Delta {Q_{{\mathbf{I}_{0}}}^{-}}$]]></tex-math></alternatives></inline-formula> as the change in modularity resulting from removing vertex <inline-formula id="j_nejsds32_ineq_193"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${v_{j}}$]]></tex-math></alternatives></inline-formula> from <inline-formula id="j_nejsds32_ineq_194"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${\mathbf{I}_{0}}$]]></tex-math></alternatives></inline-formula> and define <inline-formula id="j_nejsds32_ineq_195"><alternatives><mml:math>
<mml:mi mathvariant="normal">Δ</mml:mi>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="italic">Q</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
<mml:mrow>
<mml:mo>+</mml:mo>
</mml:mrow>
</mml:msubsup></mml:math><tex-math><![CDATA[$\Delta {Q_{{\mathbf{I}_{1}}}^{+}}$]]></tex-math></alternatives></inline-formula> as the change in modularity resulting from adding vertex <inline-formula id="j_nejsds32_ineq_196"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${v_{j}}$]]></tex-math></alternatives></inline-formula> to <inline-formula id="j_nejsds32_ineq_197"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${\mathbf{I}_{1}}$]]></tex-math></alternatives></inline-formula>. The change in modularity 
<disp-formula id="j_nejsds32_eq_014">
<alternatives><mml:math display="block">
<mml:mtable displaystyle="true" columnalign="right left" columnspacing="0pt">
<mml:mtr>
<mml:mtd class="align-odd">
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="normal">Δ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
<mml:mi mathvariant="italic">e</mml:mi>
<mml:mi mathvariant="italic">r</mml:mi>
<mml:mi mathvariant="italic">t</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mi mathvariant="italic">Q</mml:mi>
</mml:mtd>
<mml:mtd class="align-even">
<mml:mo>=</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="normal">Δ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
<mml:mrow>
<mml:mo>+</mml:mo>
</mml:mrow>
</mml:msubsup>
<mml:mo>−</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="normal">Δ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
<mml:mrow>
<mml:mo>−</mml:mo>
</mml:mrow>
</mml:msubsup>
</mml:mtd>
</mml:mtr>
<mml:mtr>
<mml:mtd class="align-odd"/>
<mml:mtd class="align-even">
<mml:mo stretchy="false">∝</mml:mo>
<mml:munder>
<mml:mrow>
<mml:mstyle displaystyle="true">
<mml:mo largeop="true" movablelimits="false">∑</mml:mo></mml:mstyle>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:munder>
<mml:mfenced separators="" open="(" close=")">
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">W</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>−</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:msub>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
<mml:mi mathvariant="italic">m</mml:mi>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
</mml:mrow>
</mml:mfenced>
<mml:mo>−</mml:mo>
<mml:munder>
<mml:mrow>
<mml:mstyle displaystyle="true">
<mml:mo largeop="true" movablelimits="false">∑</mml:mo></mml:mstyle>
</mml:mrow>
<mml:mrow>
<mml:mtable rowspacing="0" columnalign="center">
<mml:mtr>
<mml:mtd>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mtd>
</mml:mtr>
<mml:mtr>
<mml:mtd>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">≠</mml:mo>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mtd>
</mml:mtr>
</mml:mtable>
</mml:mrow>
</mml:munder>
<mml:mfenced separators="" open="(" close=")">
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">W</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>−</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:msub>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
<mml:mi mathvariant="italic">m</mml:mi>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
</mml:mrow>
</mml:mfenced>
</mml:mtd>
</mml:mtr>
<mml:mtr>
<mml:mtd class="align-odd"/>
<mml:mtd class="align-even">
<mml:mo stretchy="false">∝</mml:mo>
<mml:munder>
<mml:mrow>
<mml:mstyle displaystyle="true">
<mml:mo largeop="true" movablelimits="false">∑</mml:mo></mml:mstyle>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:munder>
<mml:mfenced separators="" open="(" close=")">
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">W</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>−</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:msub>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
<mml:mi mathvariant="italic">m</mml:mi>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
</mml:mrow>
</mml:mfenced>
<mml:mo>−</mml:mo>
<mml:munder>
<mml:mrow>
<mml:mstyle displaystyle="true">
<mml:mo largeop="true" movablelimits="false">∑</mml:mo></mml:mstyle>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:munder>
<mml:mfenced separators="" open="(" close=")">
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">W</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>−</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:msub>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
<mml:mi mathvariant="italic">m</mml:mi>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
</mml:mrow>
</mml:mfenced>
</mml:mtd>
</mml:mtr>
<mml:mtr>
<mml:mtd class="align-odd"/>
<mml:mtd class="align-even">
<mml:mo>+</mml:mo>
<mml:mfenced separators="" open="(" close=")">
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">W</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>−</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msubsup>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
<mml:mi mathvariant="italic">m</mml:mi>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
</mml:mrow>
</mml:mfenced>
<mml:mo mathvariant="normal">,</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[\begin{aligned}{}{\Delta _{vert}}Q& ={\Delta _{{\mathbf{I}_{1}}}^{+}}-{\Delta _{{\mathbf{I}_{0}}}^{-}}\\ {} & \propto \sum \limits_{{i_{1}}\in {\mathbf{I}_{1}}}\left({W_{{i_{1}}j}}-\frac{{d_{{i_{1}}}}{d_{j}}}{2m}\right)-\sum \limits_{\substack{{i_{0}}\in {\mathbf{I}_{0}}\\ {} {i_{0}}\ne j}}\left({W_{{i_{0}}j}}-\frac{{d_{{i_{0}}}}{d_{j}}}{2m}\right)\\ {} & \propto \sum \limits_{{i_{1}}\in {\mathbf{I}_{1}}}\left({W_{{i_{1}}j}}-\frac{{d_{{i_{1}}}}{d_{j}}}{2m}\right)-\sum \limits_{{i_{0}}\in {\mathbf{I}_{0}}}\left({W_{{i_{0}}j}}-\frac{{d_{{i_{0}}}}{d_{j}}}{2m}\right)\\ {} & +\left({W_{jj}}-\frac{{d_{j}^{2}}}{2m}\right),\end{aligned}\]]]></tex-math></alternatives>
</disp-formula> 
where the individual term <inline-formula id="j_nejsds32_ineq_198"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">W</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>−</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msubsup>
<mml:mo mathvariant="normal" stretchy="false">/</mml:mo>
<mml:mn>2</mml:mn>
<mml:mi mathvariant="italic">m</mml:mi></mml:math><tex-math><![CDATA[${W_{jj}}-{d_{j}^{2}}/2m$]]></tex-math></alternatives></inline-formula> must be added since <inline-formula id="j_nejsds32_ineq_199"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">j</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="bold">I</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${v_{j}}\in {\mathbf{I}_{0}}$]]></tex-math></alternatives></inline-formula> at the outset, gives rise to Equation (<xref rid="j_nejsds32_eq_010">4.2</xref>).</p></app>
<app id="j_nejsds32_app_002"><label>Appendix B</label>
<title>Pruning</title>
<p>There are several hospitals where few ICD implantations occurred and, in order to isolate those where relatively many were performed, we first estimated the unconstrained network communities using the Louvain method. We subsequently counted the number of communities in violation of the constraint over a range of <inline-formula id="j_nejsds32_ineq_200"><alternatives><mml:math>
<mml:mi mathvariant="italic">α</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:mo fence="true" stretchy="false">[</mml:mo>
<mml:mn>0</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo fence="true" stretchy="false">]</mml:mo></mml:math><tex-math><![CDATA[$\alpha \in [0,1]$]]></tex-math></alternatives></inline-formula> and with the corresponding 
<disp-formula id="j_nejsds32_eq_015">
<alternatives><mml:math display="block">
<mml:mtable displaystyle="true" columnalign="right left" columnspacing="0pt">
<mml:mtr>
<mml:mtd class="align-odd">
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">α</mml:mi>
</mml:mrow>
</mml:msub>
</mml:mtd>
<mml:mtd class="align-even">
<mml:mo>=</mml:mo>
<mml:mo movablelimits="false">inf</mml:mo>
<mml:mo fence="true" stretchy="false">{</mml:mo>
<mml:mi mathvariant="italic">x</mml:mi>
<mml:mo stretchy="false">∈</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="double-struck">Z</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>+</mml:mo>
</mml:mrow>
</mml:msub>
<mml:mo>:</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mover accent="true">
<mml:mrow>
<mml:mi mathvariant="italic">F</mml:mi>
</mml:mrow>
<mml:mo stretchy="false">ˆ</mml:mo></mml:mover>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mi mathvariant="italic">c</mml:mi>
<mml:mi mathvariant="italic">d</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">x</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo stretchy="false">≥</mml:mo>
<mml:mi mathvariant="italic">α</mml:mi>
<mml:mo fence="true" stretchy="false">}</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[\begin{aligned}{}{\tau _{\alpha }}& =\inf \{x\in {\mathbb{Z}_{+}}:{\hat{F}_{icd}}(x)\ge \alpha \},\end{aligned}\]]]></tex-math></alternatives>
</disp-formula> 
that is, the <inline-formula id="j_nejsds32_ineq_201"><alternatives><mml:math>
<mml:mi mathvariant="italic">α</mml:mi>
<mml:mo>·</mml:mo>
<mml:mn>100</mml:mn>
<mml:mi mathvariant="normal">%</mml:mi></mml:math><tex-math><![CDATA[$\alpha \cdot 100\% $]]></tex-math></alternatives></inline-formula> quantile of the distribution of ICD procedures across all hospitals where at least one such procedure was performed (Figure <xref rid="j_nejsds32_fig_010">5</xref>a.). We find that <inline-formula id="j_nejsds32_ineq_202"><alternatives><mml:math>
<mml:mi mathvariant="italic">α</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>0.96</mml:mn></mml:math><tex-math><![CDATA[$\alpha =0.96$]]></tex-math></alternatives></inline-formula>, which corresponds to <inline-formula id="j_nejsds32_ineq_203"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0.265</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo>=</mml:mo>
<mml:mn>36</mml:mn></mml:math><tex-math><![CDATA[${\tau _{0.265}}=36$]]></tex-math></alternatives></inline-formula> (Figure <xref rid="j_nejsds32_fig_010">5</xref>b.)</p>
<fig id="j_nejsds32_fig_010">
<label>Figure 5</label>
<caption>
<p><bold>Pruning the Special Vertex Set: (a.)</bold> Histogram of number of ICD implantation procedures performed at CCF hospitals. <bold>(b)</bold> Quantiles of the degree distribution conditional on CCF status vs quantiles of the full vertex set degree distribution.</p>
</caption>
<graphic xlink:href="nejsds32_g010.jpg"/>
</fig>
</app></app-group>
<ref-list id="j_nejsds32_reflist_001">
<title>References</title>
<ref id="j_nejsds32_ref_001">
<label>[1]</label><mixed-citation publication-type="book"><string-name><surname>Abramowitz</surname>, <given-names>M.</given-names></string-name> and <string-name><surname>Stegun</surname>, <given-names>I. A.</given-names></string-name> (<year>1964</year>) <source>Handbook of Mathematical Functions with Formulas, Graphs, and Mathematical Tables</source>. <publisher-name>Dover</publisher-name>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=0415956">MR0415956</ext-link></mixed-citation>
</ref>
<ref id="j_nejsds32_ref_002">
<label>[2]</label><mixed-citation publication-type="journal"><string-name><surname>Andrade</surname>, <given-names>R. F. S.</given-names></string-name>, <string-name><surname>Rocha-Neto</surname>, <given-names>I. C.</given-names></string-name>, <string-name><surname>Santos</surname>, <given-names>L. B. L.</given-names></string-name>, <string-name><surname>de Santana</surname>, <given-names>C. N.</given-names></string-name>, <string-name><surname>Diniz</surname>, <given-names>M. V. C.</given-names></string-name>, <string-name><surname>Lobão</surname>, <given-names>T. P.</given-names></string-name>, <string-name><surname>Góes-Neto</surname>, <given-names>A.</given-names></string-name>, <string-name><surname>Pinho</surname>, <given-names>S. T. R.</given-names></string-name> and <string-name><surname>El-Hani</surname>, <given-names>C. N.</given-names></string-name> (<year>2011</year>). <article-title>Detecting Network Communities: An Application to Phylogenetic Analysis</article-title>. <source>PLoS Computational Biology</source> <volume>7</volume>. <ext-link ext-link-type="doi" xlink:href="https://doi.org/10.1371/journal.pcbi.1001131" xlink:type="simple">https://doi.org/10.1371/journal.pcbi.1001131</ext-link>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=2821650">MR2821650</ext-link></mixed-citation>
</ref>
<ref id="j_nejsds32_ref_003">
<label>[3]</label><mixed-citation publication-type="book"><string-name><surname>Barabási</surname>, <given-names>A. L.</given-names></string-name> and <string-name><surname>Pósfai</surname>, <given-names>M.</given-names></string-name> (<year>2016</year>) <source>Network science</source>. <publisher-name>Cambridge University Press</publisher-name>, <publisher-loc>Cambridge</publisher-loc>.</mixed-citation>
</ref>
<ref id="j_nejsds32_ref_004">
<label>[4]</label><mixed-citation publication-type="journal"><string-name><surname>Blondel</surname>, <given-names>V. D.</given-names></string-name>, <string-name><surname>Guillaume</surname>, <given-names>J.-L.</given-names></string-name>, <string-name><surname>Lambiotte</surname>, <given-names>R.</given-names></string-name> and <string-name><surname>Lefebvre</surname>, <given-names>E.</given-names></string-name> (<year>2008</year>). <article-title>Fast unfolding of communities in large networks</article-title>. <source>Journal of Statistical Mechanics: Theory and Experiment</source> <volume>2008</volume>(<issue>10</issue>) <fpage>10008</fpage>.</mixed-citation>
</ref>
<ref id="j_nejsds32_ref_005">
<label>[5]</label><mixed-citation publication-type="book"><string-name><surname>Chung</surname>, <given-names>F. R. K.</given-names></string-name> (<year>1997</year>) <source>Spectral Graph Theory</source>. <publisher-name>American Mathematical Society</publisher-name>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=1421568">MR1421568</ext-link></mixed-citation>
</ref>
<ref id="j_nejsds32_ref_006">
<label>[6]</label><mixed-citation publication-type="journal"><string-name><surname>Csardi</surname>, <given-names>G.</given-names></string-name> and <string-name><surname>Nepusz</surname>, <given-names>T.</given-names></string-name> (<year>2006</year>). <article-title>The igraph software package for complex network research</article-title>. <source>InterJournal</source> <volume>Complex Systems</volume> <fpage>1695</fpage>.</mixed-citation>
</ref>
<ref id="j_nejsds32_ref_007">
<label>[7]</label><mixed-citation publication-type="journal"><string-name><surname>Eaton</surname>, <given-names>E.</given-names></string-name> and <string-name><surname>Mansbach</surname>, <given-names>R.</given-names></string-name> (<year>2021</year>). <article-title>A Spin-Glass Model for Semi-Supervised Community Detection</article-title>. <source>Proceedings of the AAAI Conference on Artificial Intelligence</source> <volume>26</volume> <fpage>900</fpage>–<lpage>906</lpage>.</mixed-citation>
</ref>
<ref id="j_nejsds32_ref_008">
<label>[8]</label><mixed-citation publication-type="book"><string-name><surname>Estrada</surname>, <given-names>E.</given-names></string-name> (<year>2011</year>) <source>The Structure of Complex Networks: Theory and Applications</source>. <publisher-name>Oxford University Press, Inc.</publisher-name>, <publisher-loc>USA</publisher-loc>.</mixed-citation>
</ref>
<ref id="j_nejsds32_ref_009">
<label>[9]</label><mixed-citation publication-type="book"><string-name><surname>Estrada</surname>, <given-names>E.</given-names></string-name> and <string-name><surname>Knight</surname>, <given-names>P. A.</given-names></string-name> (<year>2015</year>) <source>A First Course in Network Theory</source>. <publisher-name>Oxford University Press</publisher-name>, <publisher-loc>United Kingdom</publisher-loc>.</mixed-citation>
</ref>
<ref id="j_nejsds32_ref_010">
<label>[10]</label><mixed-citation publication-type="journal"><string-name><surname>Fortunato</surname>, <given-names>S.</given-names></string-name> (<year>2010</year>). <article-title>Community detection in graphs</article-title>. <source>Physics Reports</source> <volume>486</volume>(<issue>3-5</issue>) <fpage>75</fpage>–<lpage>174</lpage>. <ext-link ext-link-type="doi" xlink:href="https://doi.org/10.1016/j.physrep.2009.11.002" xlink:type="simple">https://doi.org/10.1016/j.physrep.2009.11.002</ext-link>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=2580414">MR2580414</ext-link></mixed-citation>
</ref>
<ref id="j_nejsds32_ref_011">
<label>[11]</label><mixed-citation publication-type="journal"><string-name><surname>Gauzens</surname>, <given-names>B.</given-names></string-name>, <string-name><surname>Thébault</surname>, <given-names>E.</given-names></string-name>, <string-name><surname>Lacroix</surname>, <given-names>G.</given-names></string-name> and <string-name><surname>Legendre</surname>, <given-names>S.</given-names></string-name> (<year>2015</year>). <article-title>Trophic groups and modules: two levels of group detection in food webs</article-title>. <source>Journal of the Royal Society Interface</source> <volume>12</volume>(<issue>106</issue>) <fpage>20141176</fpage>.</mixed-citation>
</ref>
<ref id="j_nejsds32_ref_012">
<label>[12]</label><mixed-citation publication-type="journal"><string-name><surname>Girvan</surname>, <given-names>M.</given-names></string-name> and <string-name><surname>Newman</surname>, <given-names>M. E. J.</given-names></string-name> (<year>2002</year>). <article-title>Community structure in social and biological networks</article-title>. <source>Proceedings of the National Academy of Sciences</source> <volume>99</volume>(<issue>12</issue>) <fpage>7821</fpage>–<lpage>7826</lpage>. <ext-link ext-link-type="doi" xlink:href="https://doi.org/10.1073/pnas.122653799" xlink:type="simple">https://doi.org/10.1073/pnas.122653799</ext-link>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=1908073">MR1908073</ext-link></mixed-citation>
</ref>
<ref id="j_nejsds32_ref_013">
<label>[13]</label><mixed-citation publication-type="journal"><string-name><surname>Hendrickson</surname>, <given-names>B.</given-names></string-name> and <string-name><surname>Kolda</surname>, <given-names>T. G.</given-names></string-name> (<year>2000</year>). <article-title>Graph Partitioning Models for Parallel Computing</article-title>. <source>Parallel Computing</source> <volume>26</volume>(<issue>12</issue>) <fpage>1519</fpage>–<lpage>1534</lpage>. <ext-link ext-link-type="doi" xlink:href="https://doi.org/10.1016/S0167-8191(00)00048-X" xlink:type="simple">https://doi.org/10.1016/S0167-8191(00)00048-X</ext-link>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=1786938">MR1786938</ext-link></mixed-citation>
</ref>
<ref id="j_nejsds32_ref_014">
<label>[14]</label><mixed-citation publication-type="journal"><string-name><surname>Hu</surname>, <given-names>Y.</given-names></string-name>, <string-name><surname>Wang</surname>, <given-names>F.</given-names></string-name> and <string-name><surname>Xierali</surname>, <given-names>I. M.</given-names></string-name> (<year>2018</year>). <article-title>Automated Delineation of Hospital Service Areas and Hospital Referral Regions by Modularity Optimization</article-title>. <source>Health Services Research</source> <volume>53</volume>(<issue>1</issue>) <fpage>236</fpage>–<lpage>255</lpage>.</mixed-citation>
</ref>
<ref id="j_nejsds32_ref_015">
<label>[15]</label><mixed-citation publication-type="journal"><string-name><surname>Hu</surname>, <given-names>Y.</given-names></string-name>, <string-name><surname>Wang</surname>, <given-names>F.</given-names></string-name> and <string-name><surname>Xierali</surname>, <given-names>I. M.</given-names></string-name> (<year>2018</year>). <article-title>Automated Delineation of Hospital Service Areas and Hospital Referral Regions by Modularity Optimization</article-title>. <source>Health services research</source> <volume>53</volume> <fpage>236</fpage>–<lpage>255</lpage>.</mixed-citation>
</ref>
<ref id="j_nejsds32_ref_016">
<label>[16]</label><mixed-citation publication-type="journal"><string-name><surname>Javed</surname>, <given-names>M. A.</given-names></string-name>, <string-name><surname>Younis</surname>, <given-names>M. S.</given-names></string-name>, <string-name><surname>Latif</surname>, <given-names>S.</given-names></string-name>, <string-name><surname>Qadir</surname>, <given-names>J.</given-names></string-name> and <string-name><surname>Baig</surname>, <given-names>A.</given-names></string-name> (<year>2018</year>). <article-title>Community detection in networks: A multidisciplinary review</article-title>. <source>Journal of Network and Computer Applications</source> <volume>108</volume> <fpage>87</fpage>–<lpage>111</lpage>.</mixed-citation>
</ref>
<ref id="j_nejsds32_ref_017">
<label>[17]</label><mixed-citation publication-type="journal"><string-name><surname>Jia</surname>, <given-names>P.</given-names></string-name>, <string-name><surname>Wang</surname>, <given-names>F.</given-names></string-name> and <string-name><surname>Xierali</surname>, <given-names>I. M.</given-names></string-name> (<year>2020</year>). <article-title>Evaluating the effectiveness of the Hospital Referral Region (HRR) boundaries: a pilot study in Florida</article-title>. <source>Annals of GIS</source> <volume>26</volume>(<issue>3</issue>) <fpage>251</fpage>–<lpage>260</lpage>.</mixed-citation>
</ref>
<ref id="j_nejsds32_ref_018">
<label>[18]</label><mixed-citation publication-type="journal"><string-name><surname>Karrer</surname>, <given-names>B.</given-names></string-name> and <string-name><surname>Newman</surname>, <given-names>M. E. J.</given-names></string-name> (<year>2011</year>). <article-title>Stochastic blockmodels and community structure in networks</article-title>. <source>Physical Review E</source> <volume>83</volume> <fpage>016107</fpage>. <ext-link ext-link-type="doi" xlink:href="https://doi.org/10.1103/PhysRevE.83.016107" xlink:type="simple">https://doi.org/10.1103/PhysRevE.83.016107</ext-link>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=2788206">MR2788206</ext-link></mixed-citation>
</ref>
<ref id="j_nejsds32_ref_019">
<label>[19]</label><mixed-citation publication-type="journal"><string-name><surname>Leskovec</surname>, <given-names>J.</given-names></string-name>, <string-name><surname>Lang</surname>, <given-names>K. J.</given-names></string-name>, <string-name><surname>Dasgupta</surname>, <given-names>A.</given-names></string-name> and <string-name><surname>Mahoney</surname>, <given-names>M. W.</given-names></string-name> (<year>2009</year>). <article-title>Community Structure in Large Networks: Natural Cluster Sizes and the Absence of Large Well-Defined Clusters</article-title>. <source>Internet Mathematics</source> <volume>6</volume>(<issue>1</issue>) <fpage>29</fpage>–<lpage>123</lpage>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=2736090">MR2736090</ext-link></mixed-citation>
</ref>
<ref id="j_nejsds32_ref_020">
<label>[20]</label><mixed-citation publication-type="journal"><string-name><surname>Mucha</surname>, <given-names>P. J.</given-names></string-name>, <string-name><surname>Richardson</surname>, <given-names>T.</given-names></string-name>, <string-name><surname>Macon</surname>, <given-names>K.</given-names></string-name>, <string-name><surname>Porter</surname>, <given-names>M. A.</given-names></string-name> and <string-name><surname>Onnela</surname>, <given-names>J.-P.</given-names></string-name> (<year>2010</year>). <article-title>Community structure in time-dependent, multiscale, and multiplex networks</article-title>. <source>Science</source> <volume>328</volume>(<issue>5980</issue>) <fpage>876</fpage>–<lpage>878</lpage>. <ext-link ext-link-type="doi" xlink:href="https://doi.org/10.1126/science.1184819" xlink:type="simple">https://doi.org/10.1126/science.1184819</ext-link>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=2662590">MR2662590</ext-link></mixed-citation>
</ref>
<ref id="j_nejsds32_ref_021">
<label>[21]</label><mixed-citation publication-type="journal"><string-name><surname>Newman</surname>, <given-names>M. E.</given-names></string-name> (<year>2006</year>). <article-title>Modularity and community structure in networks</article-title>. <source>Proceedings of the National Academy of Sciences of the USA</source> <volume>103</volume>(<issue>23</issue>) <fpage>8577</fpage>–<lpage>8582</lpage>.</mixed-citation>
</ref>
<ref id="j_nejsds32_ref_022">
<label>[22]</label><mixed-citation publication-type="book"><string-name><surname>Newman</surname>, <given-names>M.</given-names></string-name> (<year>2010</year>) <source>Networks: An Introduction</source>. <publisher-name>Oxford University Press, Inc.</publisher-name>, <publisher-loc>USA</publisher-loc>. <ext-link ext-link-type="doi" xlink:href="https://doi.org/10.1093/acprof:oso/9780199206650.001.0001" xlink:type="simple">https://doi.org/10.1093/acprof:oso/9780199206650.001.0001</ext-link>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=2676073">MR2676073</ext-link></mixed-citation>
</ref>
<ref id="j_nejsds32_ref_023">
<label>[23]</label><mixed-citation publication-type="journal"><string-name><surname>Onnela</surname>, <given-names>J.-P.</given-names></string-name>, <string-name><surname>Saramäki</surname>, <given-names>J.</given-names></string-name>, <string-name><surname>Hyvönen</surname>, <given-names>J.</given-names></string-name>, <string-name><surname>Szabó</surname>, <given-names>G.</given-names></string-name>, <string-name><surname>Lazer</surname>, <given-names>D.</given-names></string-name>, <string-name><surname>Kaski</surname>, <given-names>K.</given-names></string-name>, <string-name><surname>Kertész</surname>, <given-names>J.</given-names></string-name> and <string-name><surname>Barabási</surname>, <given-names>A.-L.</given-names></string-name> (<year>2007</year>). <article-title>Structure and tie strengths in mobile communication networks</article-title>. <source>Proceedings of the National Academy of Sciences</source> <volume>104</volume>(<issue>18</issue>) <fpage>7332</fpage>–<lpage>7336</lpage>.</mixed-citation>
</ref>
<ref id="j_nejsds32_ref_024">
<label>[24]</label><mixed-citation publication-type="journal"><string-name><surname>Palla</surname>, <given-names>G.</given-names></string-name>, <string-name><surname>Derényi</surname>, <given-names>I.</given-names></string-name>, <string-name><surname>Farkas</surname>, <given-names>I.</given-names></string-name> and <string-name><surname>Vicsek</surname>, <given-names>T.</given-names></string-name> (<year>2005</year>). <article-title>Uncovering the overlapping community structure of complex networks in nature and society</article-title>. <source>Nature</source> <volume>435</volume> <fpage>814</fpage>–<lpage>818</lpage>.</mixed-citation>
</ref>
<ref id="j_nejsds32_ref_025">
<label>[25]</label><mixed-citation publication-type="book"><string-name><surname>R Core Team</surname></string-name> (<year>2013</year>). <source>R: A Language and Environment for Statistical Computing</source>. <publisher-name>R Foundation for Statistical Computing</publisher-name>, <publisher-loc>Vienna, Austria</publisher-loc>. <uri>http://www.R-project.org/</uri>.</mixed-citation>
</ref>
<ref id="j_nejsds32_ref_026">
<label>[26]</label><mixed-citation publication-type="journal"><string-name><surname>Schmid</surname>, <given-names>J. S.</given-names></string-name>, <string-name><surname>Taubert</surname>, <given-names>F.</given-names></string-name>, <string-name><surname>Wiegand</surname>, <given-names>T.</given-names></string-name>, <string-name><surname>Sun</surname>, <given-names>I.-F.</given-names></string-name> and <string-name><surname>Huth</surname>, <given-names>A.</given-names></string-name> (<year>2020</year>). <article-title>Network science applied to forest megaplots: tropical tree species coexist in small-world networks</article-title>. <source>Scientific Reports</source> <volume>10</volume> <fpage>13198</fpage>.</mixed-citation>
</ref>
<ref id="j_nejsds32_ref_027">
<label>[27]</label><mixed-citation publication-type="journal"><string-name><surname>Tandon</surname>, <given-names>A.</given-names></string-name>, <string-name><surname>Albeshri</surname>, <given-names>A.</given-names></string-name>, <string-name><surname>Thayananthan</surname>, <given-names>V.</given-names></string-name>, <string-name><surname>Alhalabi</surname>, <given-names>W.</given-names></string-name>, <string-name><surname>Radicchi</surname>, <given-names>F.</given-names></string-name> and <string-name><surname>Fortunato</surname>, <given-names>S.</given-names></string-name> (<year>2021</year>). <article-title>Community detection in networks using graph embeddings</article-title>. <source>Phys. Rev. E</source> <volume>103</volume> <fpage>022316</fpage>.</mixed-citation>
</ref>
<ref id="j_nejsds32_ref_028">
<label>[28]</label><mixed-citation publication-type="book"><string-name><surname>The Center for the Evaluative Clinical Sciences, Dartmouth Medical School</surname></string-name> (<year>1996</year>) <source>The Dartmouth atlas of health care</source>. <publisher-name>American Hospital Publishing</publisher-name>, <publisher-loc>Chicago</publisher-loc>.</mixed-citation>
</ref>
<ref id="j_nejsds32_ref_029">
<label>[29]</label><mixed-citation publication-type="journal"><string-name><surname>Wang</surname>, <given-names>C.</given-names></string-name> and <string-name><surname>Wang</surname>, <given-names>F.</given-names></string-name> (<year>2022</year>). <article-title>GIS-automated delineation of hospital service areas in Florida: from Dartmouth method to network community detection methods</article-title>. <source>Annals of GIS</source> <volume>0</volume>(<issue>0</issue>) <fpage>1</fpage>–<lpage>17</lpage>.</mixed-citation>
</ref>
<ref id="j_nejsds32_ref_030">
<label>[30]</label><mixed-citation publication-type="chapter"><string-name><surname>Wang</surname>, <given-names>C.</given-names></string-name>, <string-name><surname>Tang</surname>, <given-names>W.</given-names></string-name>, <string-name><surname>Sun</surname>, <given-names>B.</given-names></string-name>, <string-name><surname>Fang</surname>, <given-names>J.</given-names></string-name> and <string-name><surname>Wang</surname>, <given-names>Y.</given-names></string-name> (<year>2015</year>). <chapter-title>Review on community detection algorithms in social networks</chapter-title>. In <source>2015 IEEE International Conference on Progress in Informatics and Computing (PIC)</source> <fpage>551</fpage>–<lpage>555</lpage>.</mixed-citation>
</ref>
<ref id="j_nejsds32_ref_031">
<label>[31]</label><mixed-citation publication-type="book"><string-name><surname>Wasserman</surname>, <given-names>S.</given-names></string-name> and <string-name><surname>Faust</surname>, <given-names>K.</given-names></string-name> (<year>1994</year>) <source>Social network analysis: Methods and applications</source> <volume>8</volume>. <publisher-name>Cambridge university press</publisher-name>.</mixed-citation>
</ref>
<ref id="j_nejsds32_ref_032">
<label>[32]</label><mixed-citation publication-type="journal"><string-name><surname>Zachary</surname>, <given-names>W. W.</given-names></string-name> (<year>1977</year>). <article-title>An information flow model for conflict and fission in small groups</article-title>. <source>Journal of anthropological research</source> <fpage>452</fpage>–<lpage>473</lpage>.</mixed-citation>
</ref>
<ref id="j_nejsds32_ref_033">
<label>[33]</label><mixed-citation publication-type="journal"><string-name><surname>Zhang</surname>, <given-names>Y.</given-names></string-name>, <string-name><surname>Friend</surname>, <given-names>A. J.</given-names></string-name>, <string-name><surname>Traud</surname>, <given-names>A. L.</given-names></string-name>, <string-name><surname>Porter</surname>, <given-names>M. A.</given-names></string-name>, <string-name><surname>Fowler</surname>, <given-names>J. H.</given-names></string-name> and <string-name><surname>Mucha</surname>, <given-names>P. J.</given-names></string-name> (<year>2008</year>). <article-title>Community Structure in Congressional Cosponsorship Networks</article-title>. <source>Physica A-statistical Mechanics and Its Applications</source> <volume>387</volume> <fpage>1705</fpage>–<lpage>1712</lpage>.</mixed-citation>
</ref>
<ref id="j_nejsds32_ref_034">
<label>[34]</label><mixed-citation publication-type="journal">(<year>2020</year>). <article-title>A Guide for Choosing Community Detection Algorithms in Social Network Studies: The Question Alignment Approach</article-title>. <source>American Journal Preventative Medicine</source> <volume>59</volume>(<issue>4</issue>) <fpage>597</fpage>–<lpage>605</lpage>.</mixed-citation>
</ref>
</ref-list>
</back>
</article>
