计算分数的功能

Question

根据得分矩阵计算序列得分。

sum(j[k])


j <- matrix(1:25, ncol = 5, nrow = 5)
diag(j) <- 0
j

n <- 1:5
k <- sample(n, 5, replace = FALSE)
k <- replicate(5, sample(n, 5, replace = FALSE))

j是得分矩阵。 k是序列类型矩阵。

lets say k[1,] = 4 1 5 3 2 
         k[2,] = 2 5 4 2 4

解决方案：请帮助回答两个问题；

问题1：

在矩阵k中再增加一列（我们称其为“得分”）。基于J矩阵，此序列的分数应为48。

4 1 5 3 2 48 

问题2：

k[2,] = 2 5 4 2 4示例函数产生错误的排列。我不要序列中的任何重复。这里重复4。其次，缺少1。还有其他最佳方法来生成随机排列。

Answer 1

您最好再次检查结果。如果没有最终的可复制示例，则很难确认这些值。

id