Comment trouver tous les sous-graphiques connectés d'un graphique non dirigé

Problème:

Étant donné un tableau avec deux colonnes contenant des identifiants, trouvent tous les groupes d'identifiants qui sont connectés à chaque autre.

Exemple Table:

4 5 d e 9 identifiant

id	identifier1	identifier2
&] 1	a	c
2	b	f
3	&] g
c	h
b	j	] 6
f		7
k
l	h
désiré Output:

gr_id

Gr.Members

d &&k 2 (b, d, f, j) g 1 (a, c, g, h, l) h 1 (a, c, g, h, l) j 2 (b, d, f, j) &&] k 3 (e, k) l 1 (a, c, g, h, l) (a, c, g, h, l) (a, c, g, h, l) (a, c, g, h, l) (a, c, g, h, l) i 4 (i) Solution: La requête suivante utilise une seule requête récursive pour trouver tous les sous-graphiques connectés: avec Cte_idents COMME ( Sélectionnez identité comme identi De @t UNION Sélectionnez Identit2 en tant qu'identité De @t ) , Cte_pairs COMME ( Sélectionnez Identit1, Identi2 De @t Où identi1 & lt; & gt; Identité UNION Sélectionnez Identit2 en tant qu'identi1, identité comme identité De @t Où identi1 & lt; & gt; Identité ) , Cte_recursive COMME ( SÉLECTIONNER Cast (cte_idents.ident en tant que varchar (8000)) comme anchorident , Identité , Identité , Cast (',' identi1 ',' identi2 ',' comme varchar (8000)) comme identité , 1 comme lvl DEPUIS CTE_PAIRES INTER JOIN CTE_IDENTS sur CTE_IDENTS.IDT = CTE_PAIS.IDENT1 Union All SÉLECTIONNER Cte_recursive.anchorident , CTE_PAIS.IDENT1 , CTE_PAIS.IDENT2 . , Cte_recursive.lvl 1 comme lvl DEPUIS CTE_PAIRES INTER JOIN CTE_RECURSIV OÙ Cte_recursive.identPath Not Like Cast ('%,, cte_pairs.ident2',% 'as Varchar (8000)) ) , Cte_recursionresult COMME ( Sélectionnez Anchorident, Identi1, Identi2 De CTE_Recursive ) , Cte_cleanresult COMME ( Sélectionnez Anchorident, identité comme identi De CTE_Recursionresult UNION Sélectionnez Anchorident, identique comme identi De CTE_Recursionresult ) SÉLECTIONNER Cte_idents.ide , Cas où Ca_data.xml_value est nul Puis cte_idents.ident else ca_data.xml_value end en tant que groupes de groupe , Dense_rank () over (ordonnance par Cas lorsque Ca_data.xml_value est nul Puis cte_idents.ident else ca_data.xml_value fin ) En tant que groupid DEPUIS Cte_idents Croix s'appliquer ( Sélectionnez CTE_CLEANRESULT.IDED ',' De CTE_CLEANRESULT Où cte_cleanresult.anchorident = cte_idents.ide Ordre par CTE_CLEANRESULT.IDED POUR XML PATH (''), Type ) Comme CA_XML (xml_value) Croix s'appliquer ( Sélectionnez CA_XML.XML_VALUE.VALUE ('.', 'Nvarchar (max)') ) Comme CA_DATA (XML_VALUE) OÙ Cte_idents.IDIDE n'est pas nul Ordre par identité; Gr.Members

c	1	(a, c, g, h, l)
2
		(a, c, g, h, l)
	(a, c, g, h, l)
		Exemple Output:
	identifiant	gr_id

a

1

WITH
CTE_Idents
AS
(
    SELECT Ident1 AS Ident
    FROM @T

    UNION

    SELECT Ident2 AS Ident
    FROM @T
)
,CTE_Pairs
AS
(
    SELECT Ident1, Ident2
    FROM @T
    WHERE Ident1 <> Ident2

    UNION

    SELECT Ident2 AS Ident1, Ident1 AS Ident2
    FROM @T
    WHERE Ident1 <> Ident2
)
,CTE_Recursive
AS
(
    SELECT
        CAST(CTE_Idents.Ident AS varchar(8000)) AS AnchorIdent 
        , Ident1
        , Ident2
        , CAST(','   Ident1   ','   Ident2   ',' AS varchar(8000)) AS IdentPath
        , 1 AS Lvl
    FROM 
        CTE_Pairs
        INNER JOIN CTE_Idents ON CTE_Idents.Ident = CTE_Pairs.Ident1

    UNION ALL

    SELECT 
        CTE_Recursive.AnchorIdent 
        , CTE_Pairs.Ident1
        , CTE_Pairs.Ident2
        , CAST(CTE_Recursive.IdentPath   CTE_Pairs.Ident2   ',' AS varchar(8000)) AS IdentPath
        , CTE_Recursive.Lvl   1 AS Lvl
    FROM
        CTE_Pairs
        INNER JOIN CTE_Recursive ON CTE_Recursive.Ident2 = CTE_Pairs.Ident1
    WHERE
        CTE_Recursive.IdentPath NOT LIKE CAST('%,'   CTE_Pairs.Ident2   ',%' AS varchar(8000))
)
,CTE_RecursionResult
AS
(
    SELECT AnchorIdent, Ident1, Ident2
    FROM CTE_Recursive
)
,CTE_CleanResult
AS
(
    SELECT AnchorIdent, Ident1 AS Ident
    FROM CTE_RecursionResult

    UNION

    SELECT AnchorIdent, Ident2 AS Ident
    FROM CTE_RecursionResult
)
SELECT
    CTE_Idents.Ident
    ,CASE WHEN CA_Data.XML_Value IS NULL 
    THEN CTE_Idents.Ident ELSE CA_Data.XML_Value END AS GroupMembers
    ,DENSE_RANK() OVER(ORDER BY 
        CASE WHEN CA_Data.XML_Value IS NULL 
        THEN CTE_Idents.Ident ELSE CA_Data.XML_Value END
    ) AS GroupID
FROM
    CTE_Idents
    CROSS APPLY
    (
        SELECT CTE_CleanResult.Ident ','
        FROM CTE_CleanResult
        WHERE CTE_CleanResult.AnchorIdent = CTE_Idents.Ident
        ORDER BY CTE_CleanResult.Ident FOR XML PATH(''), TYPE
    ) AS CA_XML(XML_Value)
    CROSS APPLY
    (
        SELECT CA_XML.XML_Value.value('.', 'NVARCHAR(MAX)')
    ) AS CA_Data(XML_Value)
WHERE
    CTE_Idents.Ident IS NOT NULL
ORDER BY Ident;

b

2 (b, f, j) c 1 (a, c, g, h, l) d 2 (b, d, f, j) e 3 (e, k) f 2 (b, f, j) &&] g 1 (a, c, g, h, l) h 1 (a, c, g, h, l) (a, c, g, h, l) (a, c, g, h, l) (a, c, g, h, l) &&] i j k l z Le tableau CTE_IDENTS contient tous les identifiants uniques du graphique.

[»
4	(i)
2	(b, f, j)	&&]
3	(e, k)
1	(a, c, h, l)
5	(z)
explication:		Query utilise un CTE récursif pour trouver tous les chemins du graphique qui suivent les bords définis dans le tableau CTE_PAIRES.
Le tableau CTE_CLEANRESULT extrait les identifiants connectés pour chaque combinaison d'identificateur. Pour le chemin XML et Cross, s'appliquez pour concaténer les identificateurs connectés pour chaque groupe.	dense_rank () est utilisé pour attribuer des ID de groupe uniques à chaque groupe.