poj3155 最大密度子图

给定一个无向图,要求它的一个子图,使得子图中边数|E|与点数|V|的比值最大。
解法一:
假设答案为k ,则要求解的问题是:选出一个合适的点集V和边集E,令(|E| - k * |V|) 取得最大值。所谓“合适”是指满足如下限制:若选择某条边,则必选择其两端点。
建图:以原图的边作为左侧顶点,权值为1;原图的点作为右侧顶点,权值为-k(相当于 支出k)。
若原图中存在边(u,v),则新图中添加两条边([uv]–>u), ([uv]–>v),转换为最大权闭合子图。
解法二:
把原图中的无向边转换成两条有向边,容量为1。
设一源点,连接所有点,容量为U(取m)。
设一汇点,所有点连接汇点,容量为 U+2g-dv 。
二分枚举最大密度g,其中dv为v的度。
判断(U*n-MaxFlow)/2.>=0。
最后跳出的L就是最大密度。
拿这个L再重新建图,求最大流。
然后从s出发bfs或者dfs,走残留容量大于0的边,所有能到达的点就是答案。

方法1code:

#include <map>
#include <set>
#include <queue>
#include <stack>
#include <math.h>
#include <vector>
#include <cstdio>
#include <string>
#include<string.h>
#include <fstream>
#include <iostream>
#include <algorithm>
using namespace std;
#define exp 1e-8
#define INF 0x3f3f3f3f
#define ll long long
#define mm(a,b) memset(a,b,sizeof(a));
#define for1(a,b) for(int a=1;a<=b;a++)//1---(b)
#define rep(a,b,c) for(int a=b;a<=c;a++)//b---c
void bug(string st="bug")
{cout<<st<<endl;}
template<typename __ll>
inline void READ(__ll &m){
    __ll x=0,f=1;char ch=getchar();
    while(!(ch>='0'&&ch<='9')){if(ch=='-')f=-1;ch=getchar();}
    while(ch>='0'&&ch<='9'){x=x*10+ch-'0';ch=getchar();}
    m=x*f;
}
template<typename __ll>
inline void read(__ll &m){READ(m);}
template<typename __ll>
inline void read(__ll &m,__ll &a){READ(m);READ(a);}
template<typename __ll>
inline void read(__ll &m,__ll &a,__ll &b){READ(m);READ(a);READ(b);}
const int maxn=20000*5; //边的数量,应该比正常边的数量多两倍
const int MAXN=10000;//节点数

int s,t,tot;
int cur[MAXN];//当前弧优化
int pre[MAXN];//先祖
int level[MAXN];//高度
int gap[MAXN];//gap优化
int dat[maxn][3];
int d[MAXN];
int n,m;
struct EDGE
{
    int to,next;
    double cost;
}edge[maxn];
int head[maxn],cnt;
inline void addedge(int a,int b,double c)
{
    edge[cnt].to=b;
    edge[cnt].cost=c;
    edge[cnt].next=head[a];
    head[a]=cnt++;

    edge[cnt].to=a;
    edge[cnt].cost=0;
    edge[cnt].next=head[b];
    head[b]=cnt++;
}
void build_graph(int n,int m,double mid,double &sum) //节点数(1->n),边数
{
    sum=0;
    s=0,t=n+m+1,tot=t+1,cnt=0;//cnt=0为了更好的异或
    memset(head,-1,sizeof(head));
    for1(i,m)addedge(s,i,1),addedge(i,dat[i][1]+m,INF),addedge(i,dat[i][2]+m,INF),sum++;
    for1(i,n)addedge(i+m,t,mid);
}
double sap()  //无需改动
{
    memset(pre,-1,sizeof(pre));
    memset(gap,0,sizeof(gap));
    memset(level,0,sizeof(level));
        gap[0]=tot;
    int u=s;
    double ans=0.,inf=INF;
    for(int i=0; i<tot; i++)//初始化当前弧为第一条弧
        cur[i]=head[i];
    while(level[s]<tot)
    {
        bool flag=0;
        for(int &i=cur[u];i!=-1;i=edge[i].next) //读取边,并更新当前弧
        {
            int v=edge[i].to;
            if(edge[i].cost>0&&level[u]==level[v]+1)
            {
                flag=1;
                if(edge[i].cost<inf)
                    inf=edge[i].cost;
                pre[v]=u;
                u=v;
                if(u==t)
                {
                    while(u!=s) //结束后u==s
                    {
                        u=pre[u];
                        edge[cur[u]].cost-=inf;
                        edge[cur[u]^1].cost+=inf;//异或是找与其配对的边
                    }
                    ans+=inf;
                    inf=INF;
                }
                break;
            }
        }
        if(!flag)
        {
            if(--gap[level[u]]==0)//gap优化
                break;
            int minn=tot;
            for(int i=head[u];i!=-1;i=edge[i].next)
            {
                int v=edge[i].to;
                if(edge[i].cost>0&&level[v]<minn)
                {
                    minn=level[v];
                    cur[u]=i;//更新当前弧,让其从度最小的线段开始
                }
            }
            level[u]=minn+1;
            gap[minn+1]++;
            if(u!=s)
                u=pre[u];
        }
    }
    return ans;
}
bool ok(double mid)
{
    double sum=0;
    build_graph(n,m,mid,sum);
    return sum-sap()>=exp;
}
int vis[MAXN];
void dfs(int idx)
{
    vis[idx]=1;
    for(int i=head[idx];i!=-1;i=edge[i].next)
        if(!vis[edge[i].to]&&edge[i].cost)dfs(edge[i].to);
}
int main()
{
    while(scanf("%d %d",&n,&m)!=EOF)
    {
        mm(d,0);
        for1(i,m)read(dat[i][1],dat[i][2]);
        for1(i,m)d[dat[i][1]]++,d[dat[i][2]]++;
        if(m==0){puts("1\n1\n");continue;}
        double l=0,r=m;
        while(r-l>1./n/n)
        {
            double mid=(r+l)/2.;
            if(ok(mid))l=mid;
            else r=mid;
        }
        ok(l);
        mm(vis,0);
        dfs(s);
        int ans=0;
        rep(i,m+1,n+m)ans+=vis[i];
        cout<<ans<<endl;
        rep(i,m+1,n+m)if(vis[i])
            cout<<i-m<<endl;
    }
    return 0;
}

方法2code:

#include <map>
#include <set>
#include <queue>
#include <stack>
#include <math.h>
#include <vector>
#include <cstdio>
#include <string>
#include<string.h>
#include <fstream>
#include <iostream>
#include <algorithm>
using namespace std;
#define exp 1e-8
#define INF 0x3f3f3f3f
#define ll long long
#define mm(a,b) memset(a,b,sizeof(a));
#define for1(a,b) for(int a=1;a<=b;a++)//1---(b)
#define rep(a,b,c) for(int a=b;a<=c;a++)//b---c
void bug(string st="bug")
{cout<<st<<endl;}
template<typename __ll>
inline void READ(__ll &m){
    __ll x=0,f=1;char ch=getchar();
    while(!(ch>='0'&&ch<='9')){if(ch=='-')f=-1;ch=getchar();}
    while(ch>='0'&&ch<='9'){x=x*10+ch-'0';ch=getchar();}
    m=x*f;
}
template<typename __ll>
inline void read(__ll &m){READ(m);}
template<typename __ll>
inline void read(__ll &m,__ll &a){READ(m);READ(a);}
template<typename __ll>
inline void read(__ll &m,__ll &a,__ll &b){READ(m);READ(a);READ(b);}
#define INF 999999999
const int maxn=20000*5; //边的数量,应该比正常边的数量多两倍
const int MAXN=1000;//节点数

int s,t,tot;
int cur[MAXN];//当前弧优化
int pre[MAXN];//先祖
int level[MAXN];//高度
int gap[MAXN];//gap优化
int dat[maxn][3];
int d[MAXN];
int n,m;
struct EDGE
{
    int to,next;
    double cost;
}edge[maxn];
int head[maxn],cnt;
inline void addedge(int a,int b,double c)
{
    edge[cnt].to=b;
    edge[cnt].cost=c;
    edge[cnt].next=head[a];
    head[a]=cnt++;

    edge[cnt].to=a;
    edge[cnt].cost=0;
    edge[cnt].next=head[b];
    head[b]=cnt++;
}
void build_graph(int n,int m,double mid) //节点数(1->n),边数
{
    s=0,t=n+1,tot=n+2,cnt=0;//cnt=0为了更好的异或
    memset(head,-1,sizeof(head));
    for1(i,n) addedge(s,i,m);
    for1(i,n) addedge(i,t,m+2*mid-d[i]);
    for1(i,m) addedge(dat[i][1],dat[i][2],1),addedge(dat[i][2],dat[i][1],1);
}
double sap()  //无需改动
{
    memset(pre,-1,sizeof(pre));
    memset(gap,0,sizeof(gap));
    memset(level,0,sizeof(level));
        gap[0]=tot;
    int u=s;
    double ans=0.,inf=INF;
    for(int i=0; i<tot; i++)//初始化当前弧为第一条弧
        cur[i]=head[i];
    while(level[s]<tot)
    {
        bool flag=0;
        for(int &i=cur[u];i!=-1;i=edge[i].next) //读取边,并更新当前弧
        {
            int v=edge[i].to;
            if(edge[i].cost>0&&level[u]==level[v]+1)
            {
                flag=1;
                if(edge[i].cost<inf)
                    inf=edge[i].cost;
                pre[v]=u;
                u=v;
                if(u==t)
                {
                    while(u!=s) //结束后u==s
                    {
                        u=pre[u];
                        edge[cur[u]].cost-=inf;
                        edge[cur[u]^1].cost+=inf;//异或是找与其配对的边
                    }
                    ans+=inf;
                    inf=INF;
                }
                break;
            }
        }
        if(!flag)
        {
            if(--gap[level[u]]==0)//gap优化
                break;
            int minn=tot;
            for(int i=head[u];i!=-1;i=edge[i].next)
            {
                int v=edge[i].to;
                if(edge[i].cost>0&&level[v]<minn)
                {
                    minn=level[v];
                    cur[u]=i;//更新当前弧,让其从度最小的线段开始
                }
            }
            level[u]=minn+1;
            gap[minn+1]++;
            if(u!=s)
                u=pre[u];
        }
    }
    return ans;
}
bool ok(double mid)
{
    build_graph(n,m,mid);
    return (1.0*n*m-sap())/2.>=exp;
}
int vis[MAXN];
void dfs(int idx)
{
    vis[idx]=1;
    for(int i=head[idx];i!=-1;i=edge[i].next)
        if(!vis[edge[i].to]&&edge[i].cost)dfs(edge[i].to);
}
int main()
{
    while(scanf("%d %d",&n,&m)!=EOF)
    {
        mm(d,0);
        for1(i,m)read(dat[i][1],dat[i][2]);
        for1(i,m)d[dat[i][1]]++,d[dat[i][2]]++;
        if(m==0){puts("1\n1\n");continue;}
        double l=1./n,r=m;
        while(r-l>1./n/n)
        {
            double mid=(r+l)/2.;
            if(ok(mid))l=mid;
            else r=mid;
        }
        ok(l);  //根据真实的比例搜出真实的割
        mm(vis,0);
        dfs(s);
        int ans=0;
        for1(i,n)ans+=vis[i];
        cout<<ans<<endl;
        for1(i,n)if(vis[i])
            cout<<i<<endl;
    }
    return 0;
}
  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值