Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/67.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_Linear Regression_Correlation_Lm - Fatal编程技术网
Fatal编程技术网
  • r/
  • 是否有可能在R中创建具有特定斜率和皮尔逊相关系数的数据？

是否有可能在R中创建具有特定斜率和皮尔逊相关系数的数据？

r

是否有可能在R中创建具有特定斜率和皮尔逊相关系数的数据？,r,linear-regression,correlation,lm,R,Linear Regression,Correlation,Lm,例如，我希望两个变量，x和y的相关系数为0.7，斜率为1.5，这两个变量都具有指定的平均值和样本量。我不在乎数据是否正常 我经常使用MASS，使用mvrnorm来获得特定的相关系数，但我无法操纵它来同时给出斜率 out <- mvrnorm(100, mu = c(0,0), Sigma = matrix(c(1,.5,.5,1),ncol = 2), empirical = TRUE) out量表的变化不会改变相关系数： > out2[,2] <- out[,2]*10

例如，我希望两个变量，
x
和
y
的相关系数为0.7，斜率为1.5，这两个变量都具有指定的平均值和样本量。我不在乎数据是否正常

我经常使用
MASS
，使用
mvrnorm
来获得特定的相关系数，但我无法操纵它来同时给出斜率

out <- mvrnorm(100, mu = c(0,0), Sigma = matrix(c(1,.5,.5,1),ncol = 2), empirical = TRUE)

out量表的变化不会改变相关系数：


> out2[,2] <- out[,2]*10

> cor(out2)
     [,1] [,2]
[1,]  1.0  0.5
[2,]  0.5  1.0

plot(out2)

> lm(out2[,2]~out2[,1])

Call:
lm(formula = out2[, 2] ~ out2[, 1])

Coefficients:
(Intercept)    out2[, 1]  
 -5.732e-16    5.000e+00  



>out2[，2]cor（out2）
[,1] [,2]
[1,]  1.0  0.5
[2,]  0.5  1.0
绘图（out2）
>lm（out2[，2]~out2[，1]）
电话：
lm（公式=out2[，2]~out2[，1]）
系数：
（截取）输出2[，1]
-5.732e-16 5.000e+00

@MaxwellChandler-要扩展此功能，您可以这样做：
out[，1]@bondedust，，谢谢！这正是我需要的

> out2[,2] <- out[,2]*10

> cor(out2)
     [,1] [,2]
[1,]  1.0  0.5
[2,]  0.5  1.0

plot(out2)

> lm(out2[,2]~out2[,1])

Call:
lm(formula = out2[, 2] ~ out2[, 1])

Coefficients:
(Intercept)    out2[, 1]  
 -5.732e-16    5.000e+00