BlomqvistBeta[v1,v2]
对向量 v1 和 v2,给出 Blomqvist 的中间相关系数 β.
对于矩阵 m,给出 Blomqvist 的中间相关系数 β.
BlomqvistBeta[m1,m2]
对于矩阵 m1 和 m2,给出 Blomqvist 的中间相关系数 β.
BlomqvistBeta[dist,i,j]
对于多变量符号式分布 dist,给出第 (i,j) 中间相关系数.
BlomqvistBeta
BlomqvistBeta[v1,v2]
对向量 v1 和 v2,给出 Blomqvist 的中间相关系数 β.
对于矩阵 m,给出 Blomqvist 的中间相关系数 β.
BlomqvistBeta[m1,m2]
对于矩阵 m1 和 m2,给出 Blomqvist 的中间相关系数 β.
BlomqvistBeta[dist,i,j]
对于多变量符号式分布 dist,给出第 (i,j) 中间相关系数.
更多信息
- BlomqvistBeta[v1,v2] 给出位于 v1 和 v2 之间的 Blomqvist 的中间相关系数 β.
- 向量 x 和 y 之间的 Blomqvist 的 β 由 Correlation[Sign[x-μx],Sign[y-μy]] 给出,其中 μx 和 μy 分别是 x 和 y 的中位数.
- 参数 v1 和 v2 可以是相等长度的任意实值向量.
- 对于具有
个列的矩阵 m,BlomqvistBeta[m] 是 m 的 β 列间组成的
×
矩阵. - 对于
×
矩阵 m1 和
×
矩阵 m2,BlomqvistBeta[m1,m2] 是
×
矩阵,由 m1 和 m2 的 β 列间组成. - BlomqvistBeta[dist,i,j] 是 Probability[(x-μx)(y-μy)>0,{x,y}disti,j]-Probability[(x-μx)(y-μy)<0,{x,y}disti,j],其中 disti,j 是 dist 的第
边缘分布. - BlomqvistBeta 对于离散分布或者出现等值情况时定义不明确.
- BlomqvistBeta[dist] 给出矩阵 β,其中第
元素是由 BlomqvistBeta[dist,i,j] 给出.
范例
打开所有单元 关闭所有单元基本范例 (4)
v1 = {3, -4, 1, 4, 22, 17, -2, 2, 13, -11};
v2 = {-20, -24, 0, 4, 24, 36, -12, -12, 56, -14};BlomqvistBeta[v1, v2]m = RandomVariate[BinormalDistribution[.6], 10^3];BlomqvistBeta[m]//MatrixFormm1 = RandomReal[1, {10^3, 4}];m2 = RandomReal[1, {10^3, 3}];BlomqvistBeta[m1, m2]//MatrixForm𝒟 = BinormalDistribution[.5];BlomqvistBeta[𝒟]//MatrixFormBlomqvistBeta[RandomVariate[𝒟, 10^6]]//MatrixForm范围 (7)
数据 (4)
BlomqvistBeta[{-20, -21, 1, 7, 24, 36, -10, -12, 56, -14}, {3, -4, 1, 4, 22, 17, -2, 2, 13, -11}]BlomqvistBeta[{1.5, 3, 5, 10}, {2, 1.25, 15, 8}]BlomqvistBeta[N[{1, 3, 5, 6, 9}, 30], N[{2, -1, 3, 11, 4}, 30]]BlomqvistBeta[RandomReal[1, 10 ^ 5], RandomReal[1, 10 ^ 5]]可以使用 SparseArray:
BlomqvistBeta[SparseArray[{{2, 2} -> 1, {5, 3} -> 2, {10, 1} -> 3}]]//MatrixForm分布和过程 (3)
BlomqvistBeta[BinormalDistribution[ρ]]//Simplify//MatrixFormBlomqvistBeta[BinormalDistribution[ρ], 2, 1]//SimplifyBlomqvistBeta[ProductDistribution[ExponentialDistribution[1], NormalDistribution[3, 5]]]//MatrixForm𝒟 = CopulaDistribution[{"FGM", 2 / 3}, {UniformDistribution[{0, 1}], UniformDistribution[{0, 1}]}];BlomqvistBeta[𝒟]//MatrixForm𝒟 = HistogramDistribution[RandomVariate[BinormalDistribution[.75], 10 ^ 4]];BlomqvistBeta[𝒟]//MatrixFormBlomqvistBeta[BinormalDistribution[.75]]//MatrixFormBlomqvistBeta[WienerProcess[][{0.2, 0.3}]]//MatrixForm应用 (3)
Blomqvist β 通常用于检测两个向量之间的线性关系:
{v11, v21} = Transpose[RandomVariate[BinormalDistribution[.99], 1000]];
{v12, v22} = Transpose[RandomVariate[BinormalDistribution[0], 1000]];BlomqvistBeta[v11, v21]BlomqvistBeta[v12, v22]data = BlockRandom[SeedRandom[1];Table[RandomVariate[BinormalDistribution[i], 1000], {i, {-.99, -.75, -.25, -.5, 0., .25, .5, .75, .99}}]];Grid[Partition[Table[ListPlot[i, PlotStyle -> Directive[PointSize[Tiny]],
FrameTicks -> None, Frame -> True, Axes -> None, PlotLabel -> Row[{"β : ", BlomqvistBeta[i][[1, 2]]}]], {i, data}],
3]]uni = RandomReal[{-3, 3}, 1000];f[x_] := {{x, -Sqrt[Abs[x]] + RandomReal[.5]}, {x, .25x^2 + RandomReal[.5]}, {x, -Sinc[x] + RandomReal[.5]}, {Cos[x], Sin[x] + RandomReal[.5]}}data = f /@ uni;Table[ListPlot[data[[All, i]], Frame -> True, Axes -> None, PlotLabel -> Row[{"β : ", BlomqvistBeta[data[[All, i]]][[1, 2]]}], PlotStyle -> Directive[PointSize[Tiny]], FrameTicks -> None], {i, 4}]HoeffdingD 可用于各种其它的依赖结构:
Table[HoeffdingD[data[[All, i]]][[1, 2]], {i, 4}]属性和关系 (7)
Blomqvist β 对于高负相关和高正相关范围分别从
到
:
d = RandomVariate[NormalDistribution[], 100];BlomqvistBeta[d, d]BlomqvistBeta[d, -d]blb = BlomqvistBeta[RandomVariate[BinormalDistribution[1 / 3], 10 ^ 3]];SymmetricMatrixQ[blb]data = RandomInteger[{-3, 3}, {100, 15}];Diagonal[BlomqvistBeta[data]]d = RandomVariate[BinormalDistribution[.5], 100];med = Median[d]medCentered = Transpose[Transpose[d] - med];ListPlot[medCentered, Frame -> True, AspectRatio -> 1, PlotRange -> {{-3, 3}, {-3, 3}}]q1 = Count[medCentered, {x_, y_} /; x > 0 && y > 0];
q2 = Count[medCentered, {x_, y_} /; x <= 0 && y > 0];
q3 = Count[medCentered, {x_, y_} /; x <= 0 && y <= 0];
q4 = Count[medCentered, {x_, y_} /; x > 0 && y <= 0];n1 = q1 + q3n2 = q2 + q4(n1 - n2/n1 + n2)//NBlomqvistBeta[d[[All, 1]], d[[All, 2]]]//NBlomqvist β 将产生
或者
如果存在完美的单调的相关:
x = Sort@RandomReal[10, 50];
y = If[# > 5, 5#, #]& /@ x;ListPlot[{Transpose[{x, y}], Transpose[{x, -y}]}, Frame -> True]BlomqvistBeta[x, y]BlomqvistBeta[x, -y]这与 Correlation 相反,它测量线性相关度:
Correlation[x, y]Correlation[x, -y]BlomqvistBetaTest 可用于检验 β 的数值:
data = RandomVariate[BinormalDistribution[-.65], 100];BlomqvistBeta[data[[All, 1]], data[[All, 2]]]BlomqvistBetaTest[data[[All, 1]], data[[All, 2]], "TestDataTable"]IndependenceTest 可用于自动选择合适的检验:
IndependenceTest[data[[All, 1]], data[[All, 2]], "TestDataTable"]𝒟 = CopulaDistribution[{"AMH", 1}, {UniformDistribution[{0, 1}], UniformDistribution[{0, 1}]}];BlomqvistBeta[𝒟, 1, 2]{μx, μy} = Table[Mean[MarginalDistribution[𝒟, i]], {i, 2}]βExpected = Probability[(x - μx)(y - μy) > 0, {x, y}𝒟] - Probability[(x - μx)(y - μy) < 0, {x, y}𝒟]data = RandomVariate[𝒟, 10 ^ 6];BlomqvistBeta[data][[1, 2]] - βExpected//N文本
Wolfram Research (2012),BlomqvistBeta,Wolfram 语言函数,https://reference.wolfram.com/language/ref/BlomqvistBeta.html.
CMS
Wolfram 语言. 2012. "BlomqvistBeta." Wolfram 语言与系统参考资料中心. Wolfram Research. https://reference.wolfram.com/language/ref/BlomqvistBeta.html.
APA
Wolfram 语言. (2012). BlomqvistBeta. Wolfram 语言与系统参考资料中心. 追溯自 https://reference.wolfram.com/language/ref/BlomqvistBeta.html 年
BibTeX
@misc{reference.wolfram_2026_blomqvistbeta, author="Wolfram Research", title="{BlomqvistBeta}", year="2012", howpublished="\url{https://reference.wolfram.com/language/ref/BlomqvistBeta.html}", note=[Accessed: 16-August-2026]}
BibLaTeX
@online{reference.wolfram_2026_blomqvistbeta, organization={Wolfram Research}, title={BlomqvistBeta}, year={2012}, url={https://reference.wolfram.com/language/ref/BlomqvistBeta.html}, note=[Accessed: 16-August-2026]}