da<-as.data.frame(matrix(c(1:20),nrow=4,ncol=5))
rownames(da)<-c('A','G','C','T')
colnames(da)<-c('a','b','c','d','e')
da[1,4]<-1
result<-t(sapply(seq(nrow(da)),function(i){
  j<-which(da[i,]== min(da[i,]), arr.ind = TRUE)
  for (k in 1:dim(j)[1])
  {c(paste(rownames(da)[i],colnames(da)[j[k,2]],sep='\t'),da[i,j[k,2]])
  }
  }))
求助各位大佬，，，想寻找dataframe中每一列的最小值，并返回其坐标信息。在for 循环里面打印输出结果是正确的，但是result中是一个空的matrix。这是怎么回事？求各位大佬解答一下