Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/73.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中形成尺寸为100x100的矩阵(a^ | i-j |)_R - Fatal编程技术网

在R中形成尺寸为100x100的矩阵(a^ | i-j |)

在R中形成尺寸为100x100的矩阵(a^ | i-j |),r,R,如何在R中形成尺寸为100x100的矩阵(a^ | i-j |)?类似于 矩阵(向量,nrow=100,ncol=100)我们可以使用外部 m1 <- outer(1:100, 1:100, FUN = function(i, j) 0.1^abs((i-j))) dim(m1) #[1] 100 100 M <- (a<-0.1)**abs(outer(1:100,1:100,"-")) 我们可以使用outer m1 <- outer(1:100, 1:100, F

如何在R中形成尺寸为100x100的矩阵(a^ | i-j |)?类似于
矩阵(向量,nrow=100,ncol=100)

我们可以使用
外部

m1 <- outer(1:100, 1:100, FUN = function(i, j) 0.1^abs((i-j)))
dim(m1)
#[1] 100 100
M <- (a<-0.1)**abs(outer(1:100,1:100,"-"))

我们可以使用
outer

m1 <- outer(1:100, 1:100, FUN = function(i, j) 0.1^abs((i-j)))
dim(m1)
#[1] 100 100
M <- (a<-0.1)**abs(outer(1:100,1:100,"-"))

下面是使用
outer()


M这里有一个使用
outer()创建这样一个矩阵的解决方案


M您可以使用
slice.index
如下:

x  <- matrix(NA_real_, 100, 100)
x <- 0.1^abs((slice.index(x, 1) - slice.index(x, 2)))

x您可以使用
slice.index
如:

x  <- matrix(NA_real_, 100, 100)
x <- 0.1^abs((slice.index(x, 1) - slice.index(x, 2)))

xa=0.1,但尺寸为100x100不清楚。你有2*4的初始矩阵吗?我没有任何初始矩阵。我希望形成一个100x100矩阵,其(I,j)条目为(0.1)^ | I-j |。我在下面发布了一个解决方案。我想这可能是你想要的A=0.1,但尺寸是100x100不清楚。你有2*4的初始矩阵吗?我没有任何初始矩阵。我希望形成一个100x100矩阵,其(I,j)条目为(0.1)^ | I-j |。我在下面发布了一个解决方案。我想这可能是你想要的。我不认为
abs(a^(I-j))
等于
a^abs(I-j)
,在一般情况下,数学上我认为
abs(a^(I-j))
等于
a^abs(I-j)
,在一般情况下,数学上我想它应该是
abs((slice.index(x,1)-slice.index(x,2))
,根据OPdescription@ThomasIsCoding哦,是的。谢谢我猜应该是
abs((slice.index(x,1)-slice.index(x,2))
,根据OPdescription@ThomasIsCoding哦,是的。谢谢