> data <- matrix(rnorm(250000, mean = 0, sd = 1), ncol = 25) > correlation <- apply(data, MARGIN = 1, FUN = function(x) cor(x[1:13], x[14:25])) Error in cor(x[1:13], x[14:25]) : 不兼容的量度是什么错误

这个错误通常是由于向量长度不一致导致的。在这里，您正在计算每一行前13列和后12列之间的相关性，但是如果某一行的列数小于25，则会出现此错误。您可以通过添加一个条件来确保只有在行中有25个元素时才计算相关性，如下所示：

data <- matrix(rnorm(250000, mean = 0, sd = 1), ncol = 25)
correlation <- apply(data, MARGIN = 1, FUN = function(x) {
  if(length(x) == 25) {
    cor(x[1:13], x[14:25])
  } else {
    NA
  }
})

这将在行中有25个元素时计算相关性，并在其它情况下返回NA。