last_col <- cbind(last_col, gse_exp[, -ncol(gse_exp)]) 错误于data.frame(..., check.names = FALSE): 参数值意味着不同的行数: 0, 50352

这个错误通常表示你在尝试合并两个数据集时，它们的行数（即观测次数）不匹配。在这个上下文中，`last_col <- cbind(last_col, gse_exp[, -ncol(gse_exp)])`这句话的意思是把`last_col`和`gse_exp`除了最后一列的部分结合在一起。如果`last_col`是一个空数据框（行数为0），而`gse_exp[, -ncol(gse_exp)]`包含50352行，那么`cbind`会因为这两个对象的行数不一致而抛出错误。

解决这个问题，你需要确认`last_col`是否已经有一个与`gse_exp`其余列长度相同的列，或者是为空的数据框。如果是后者，需要先创建一个与`gse_exp`相同行数的`NULL`列，或者填充一些默认值，然后再尝试进行组合。例如：

if (nrow(last_col) == 0) {
  last_col <- data.frame(matrix(NA, ncol = ncol(gse_exp) - 1, nrow = nrow(gse_exp)))
  # 或者
  # last_col <- replicate(nrow(gse_exp), list(), simplify = FALSE)
}

last_col <- cbind(last_col, gse_exp[, -ncol(gse_exp)])

这里假设`gse_exp`有50352行。