创建距离矩阵保持符号R.

Question

创建欧几里德距离的距离矩阵：

x <- c(5,1,3,5,3,2)
dist(x, diag=T, upper=T)

  1 2 3 4 5 6
1 0 4 2 0 2 3
2 4 0 2 4 2 1
3 2 2 0 2 0 1
4 0 4 2 0 2 3
5 2 2 0 2 0 1
6 3 1 1 3 1 0

我错过了一个超级简单的快速功能来维持距离的标志。例如以下输出：

   1  2  3  4  5  6
1  0  4  2  0  2  3
2 -4  0 -2 -4 -2 -1
3 -2  2  0 -2  0  1
4  0  4  2  0  2  3
5 -2  2  0 -2  0  1
6 -3  1 -1 -3 -1  0

Answer 1

我想你只想要2^16=32 GB：

=index(Steps,match(TRUE, index(isblank(Deadline),0,0),0))