Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/64.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R中的点双列相关_R_Correlation - Fatal编程技术网

R中的点双列相关

R中的点双列相关,r,correlation,R,Correlation,我有这样的样本数据(230条记录): Salary Success - Failure 23,300 1 44,000 1 12,400 0 23,000 1 55,000 0 … Success =1 Fail = 0 我试图将连续变量(工资)与二元变量(成功-失败-相关)关联起来 我需要一个使用点双列相关的上述数据集的样本R–代码。我想您的数据。帧是df: X = df$Salary Y = df[,2] a = sqrt(sum(Y)*(1-sum(Y

我有这样的样本数据(230条记录):

Salary  Success - Failure
23,300  1
44,000  1
12,400  0
23,000  1
55,000  0
    …
Success =1  

Fail = 0    
我试图将连续变量(工资)与二元变量(成功-失败-相关)关联起来
我需要一个使用点双列相关的上述数据集的样本R–代码。

我想您的
数据。帧
df

X = df$Salary
Y = df[,2]

a = sqrt(sum(Y)*(1-sum(Y))/(length(Y)**2))

point.bis.corr = a*(mean(X[Y==1])-mean(X[Y==0]))/sd(X)

我想您的
数据.frame
df

X = df$Salary
Y = df[,2]

a = sqrt(sum(Y)*(1-sum(Y))/(length(Y)**2))

point.bis.corr = a*(mean(X[Y==1])-mean(X[Y==0]))/sd(X)

我想您的
数据.frame
df

X = df$Salary
Y = df[,2]

a = sqrt(sum(Y)*(1-sum(Y))/(length(Y)**2))

point.bis.corr = a*(mean(X[Y==1])-mean(X[Y==0]))/sd(X)

我想您的
数据.frame
df

X = df$Salary
Y = df[,2]

a = sqrt(sum(Y)*(1-sum(Y))/(length(Y)**2))

point.bis.corr = a*(mean(X[Y==1])-mean(X[Y==0]))/sd(X)

如果数据帧名称为df

biserial.cor(Salary,Success, level=2)


如果数据帧名称为df

biserial.cor(Salary,Success, level=2)


如果数据帧名称为df

biserial.cor(Salary,Success, level=2)


如果数据帧名称为df

biserial.cor(Salary,Success, level=2)


Beauvel上校-谢谢你的快速帮助如果这回答了你的问题,你可以打勾。Beauvel上校-谢谢你的快速帮助如果这回答了你的问题,你可以打勾。Beauvel上校-谢谢你的快速帮助如果这回答了你的问题,你可以打勾。Beauvel上校-谢谢你的快速帮助你可以打勾如果这回答了你的问题,请标记。当你在回答一篇4年前的帖子时,如果你能详细说明为什么你的解决方案改进了已经给出的答案,那就太好了。当你在回答一篇4年前的帖子时,如果你能详细说明为什么你的解决方案改进了已经给出的答案,那就好了。当你在回答一篇4年前的帖子时,如果你能详细说明为什么你的解决方案改进了已经给出的答案,那就好了。当你在回答一篇4年前的帖子时,如果你能详细说明为什么你的解决方案能改进已经给出的答案,那就太好了。