Description
T 国有 NN 个城市,用若干双向道路连接。一对城市之间至多存在一条道路。
在一次洪水之后,一些道路受损无法通行。虽然已经有人开始调查道路的损毁情况,但直到现在几乎没有消息传回。
幸运的是,此前 T 国政府调查过每条道路的强度,现在他们希望只利用这些信息估计灾情。具体地,给定每条道路在洪水后仍能通行的概率,请计算仍能通行的道路恰有 条,且能联通所有城市的概率。
Input
输入的第一行包含整数 NN 。
接下来 行,每行 NN 个实数,第 行,列的数 G[i][j]G[i][j] 表示城市 ii 与 之间仍有道路联通的概率。
输入保证 G[i][j]=G[j][i]G[i][j]=G[j][i] ,且 G[i][j]=0G[i][j]=0 ; G[i][j]G[i][j] 至多包含两位小数。
Output
输出一个任意位数的实数表示答案。
你的答案与标准答案相对误差不超过 10−410−4 即视为正确。
Sample Input
3
0 0.5 0.5
0.5 0 0.5
0.5 0.5 0
Sample Output
0.375
HINT
1<N≤501<N≤50
数据保证答案非零时,答案不小于 10−410−4
Solution
题意就是求( ee 表示一条边, 表示原图的一棵生成树, P(e)P(e) 表示 边 ee 出现的概率):
发现既要考虑生成树上的边,又要考虑生成树外的边,不好做,因此先假设所有的边都不存在:
now=∏e(1−P(e))now=∏e(1−P(e))
然后求生成树:
delta=∑T∏e∈TP(e)1−P(e)delta=∑T∏e∈TP(e)1−P(e)
将上面两者相乘:
now×delta=∑T∏e(1−P(e))∏e∈TP(e)1−P(e)now×delta=∑T∏e(1−P(e))∏e∈TP(e)1−P(e)
=∑T∏e∉T(1−P(e))∏e∈T(1−P(e))∏e∈TP(e)1−P(e)=∑T∏e∉T(1−P(e))∏e∈T(1−P(e))∏e∈TP(e)1−P(e)
=∑T∏e∈T(1−P(e))P(e)1−P(e)∏e∉T(1−P(e))=∑T∏e∈T(1−P(e))P(e)1−P(e)∏e∉T(1−P(e))
=∑T∏e∈TP(e)∏e∉T(1−P(e))=ans=∑T∏e∈TP(e)∏e∉T(1−P(e))=ans
而现在就是要求出 deltadelta 。
将 Matrix-Tree 矩阵树定理进行扩展,可以得到:
如果定义矩阵 DD , 为从 ii 发出的边权之和,
矩阵 AA 为邻接矩阵, 为边 (i,j)(i,j) 的边权,
矩阵 C=D−AC=D−A ,
那么 CC 的任意主子式就等于图的所有生成树的边权积之和。
也就是
所以,就可以建一个新图,边 ee 的权值为 。
求出 CC 矩阵后用高斯消元求解行列式就可以得到 。
此外, P(e)P(e) 有可能是 00 或 ,这样会出现除以 00 的计算。
因此要用一个极小值 (一般取 10−810−8 或 10−910−9 ),
当 P(e)=0P(e)=0 时,用 epseps 代替 00 ,
当 时,用 1−eps1−eps 代替 11 。
复杂度:
Code
#include <cmath>
#include <cstdio>
#include <cstring>
#include <iostream>
#include <algorithm>
#define For(i, a, b) for (i = a; i <= b; i++)
using namespace std; const int N = 55; const double eps = 1e-8;
int n; double p[N][N], mat[N][N], ans0 = 1.0;
double solve(int n) {
int i, j, k; For (i, 1, n) {
int p = i; For (j, i + 1, n)
if (fabs(mat[j][i]) > fabs(mat[p][i])) p = j;
if (p != i) For (j, i, n) swap(mat[i][j], mat[p][j]);
if (fabs(mat[i][i]) < eps) return 0; For (j, i + 1, n) {
double tmp = mat[j][i] / mat[i][i];
For (k, i, n) mat[j][k] -= mat[i][k] * tmp;
}
}
double ans = 1; For (i, 1, n) ans *= mat[i][i]; return fabs(ans);
}
int main() {
int i, j; cin >> n; For (i, 1, n) For (j, 1, n) scanf("%lf", &p[i][j]),
i != j && p[i][j] < eps ? p[i][j] = eps : 0,
i != j && 1.0 - p[i][j] < eps ? p[i][j] = 1.0 - eps : 0;
For (i, 1, n) For (j, i + 1, n) ans0 = ans0 * (1.0 - p[i][j]);
For (i, 1, n) For (j, 1, n) if (i != j) mat[i][j] = -p[i][j] / (1.0 - p[i][j]);
For (i, 1, n) For (j, 1, n) if (i != j) mat[i][i] -= mat[i][j];
printf("%.10lf\n", solve(n - 1) * ans0); return 0;
}