题目链接：

https://codeforces.com/gym/101987

题意：

有长度为$n$的只包含$B，R$的字符串

有m种关系，每个关系说出三个位置的确切字符

这三个位置的字符最多有一个是错的

数据范围：

$1\leq n \leq 5000$

$1\leq m \leq 10000$

分析： 

比如给出1B 2R 3B

那么如果1是R，2必须是R，3必须是B

如果2是B，1必须是R，3必须是B

如果3是R，1必须是B，2必须是R 

对这些关系建立2—SAT模型

1B的编号为1，1R的编号为1+n

缩点，用tarjin算法把两两互达的点连接在一起，这个联通分量要么全被选择要么全部不选

拓扑排序，从小到大遍历，如果这个点没来过，就标记“选择”，相反点的代表则标记“不选择”，并且传递下去

如果还是没看懂：https://blog.csdn.net/jarjingx/article/details/8521690

 

AC代码：

#include<bits/stdc++.h>
#define ll long long
#define pic pair<int,char>
using namespace std;
const int maxn=1e4+7;
int low[maxn],tim[maxn],tot,vis[maxn],top,boss[maxn],sk[maxn],pick[maxn],n,dp[maxn];
vector<int>ve[maxn],ve2[maxn];
void tarjin(int x){
    tim[x]=low[x]=++tot;//加入递归的时间和最低递归时间
    sk[++top]=x;
    vis[x]=1;
    for(int i=0;i<ve[x].size();i++){
        int v=ve[x][i];
        if(tim[v]==0){
            tarjin(v);
            low[x]=min(low[x],low[v]);//对后面产生影响，那么自己也将属于这个联通图
        }else if(vis[v])
            low[x]=min(low[x],low[v]);//构成环了，当然和他联通呀
    }
    if(low[x]==tim[x]){
        int v;
        while(1){
            v=sk[top--];//出栈
            vis[v]=0;
            boss[v]=x;//找到老大了
            if(v==x)break;
        }
    }
}
void dfs(int x){//不选择的标记往后传递
    if(pick[x]!=0)return ;
   // cout<<x<<" "<<-1<<endl;
    pick[x]=-1;
    for(int i=0;i<ve2[x].size();i++)
        dfs(ve2[x][i]);
}
void tp(){//拓扑排序，这个简单
    queue<int>que;
    for(int i=1;i<=2*n;i++)
        if(boss[i]==i&&dp[i]==0)
            que.push(i);
    while(que.size()){
        int v=que.front();
        if(pick[v]==0){
           // cout<<v<<" "<<1<<endl;
            pick[v]=1;
            int w=v;
            if(w>n)w-=n;
            else w+=n;
            dfs(boss[w]);
        }
        que.pop();
        for(int i=0;i<ve2[v].size();i++){
            dp[ve2[v][i]]--;
            if(dp[ve2[v][i]]==0)que.push(ve2[v][i]);
        }
    }
}
int main(){
    int m;
    scanf("%d %d",&n,&m);
    for(int i=1;i<=m;i++){
        pic zz[3];
        for(int j=0;j<3;j++){
            scanf("%d %c",&zz[j].first,&zz[j].second);
            getchar();
        }
        for(int j=0;j<3;j++){
            int v1=zz[j].first,v2=zz[j].first+n;
            if(zz[j].second=='B')
                swap(v1,v2);
            for(int k=j+1;k<3;k++){
                int w1=zz[k].first,w2=zz[k].first+n;
                if(zz[k].second=='R')
                    swap(w1,w2);
                if(w1!=v1)ve[w1].push_back(v1);//选择了v1就选择w1，这里反向建边
                if(v2!=w2)ve[v2].push_back(w2);
            }
        }
    }
    for(int i=1;i<=2*n;i++)
        if(tim[i]==0)tarjin(i);

    for(int i=1;i<=n;i++)
        if(boss[i]==boss[i+n]){
            printf("-1\n");
            return 0;
        }
    for(int i=1;i<=2*n;i++){//缩点后重新建边
        for(int j=0;j<ve[i].size();j++){
            int a=boss[i],b=boss[ve[i][j]];
            if(a!=b){
                ve2[a].push_back(b);
                dp[b]++;
            }
        }
    }

    tp();
    for(int i=1;i<=n;i++){
        if(pick[boss[i]]==-1)
             printf("R");
        else printf("B");
    }
    printf("\n");
    return 0;
}