从数据框中选择最佳值的组合R

Question

我有一个20行10列的数据框。数据中的每个值都是介于0和10之间的数字。

我想选择总和最高的值的组合，并且必须从每列中选取一个且唯一一个值。

有没有现成的r函数来做到这一点，或者是一个已知算法的含义。

是否有一个r函数可以生成所有可能的组合，我将从中选择总和最高的组合？

Answer 1

这是你想要做的吗？ （我假设你的数据帧被命名为df。）

maxList <- c(which(df$col1 == max(df[, 1]))) #Initialize list of row numbers with max value 
total <- max(df[, 1]) #Initialize sum of allowable maximum values 
combination <- c(total) #Initialize list of those maximum values 

for(i in 2:ncol(df)) { #For the remaining columns in df 
    subCol <- df[, i] 
    for(j in 1:length(maxList)) { #For the number of items in maxList 
    subCol[maxList[j]] <- 0 #Set row values of previous maxima to zero 
    maxList <- c(maxList, which(subCol == max(subCol))) #Update maxList 
    } 
    combination <- c(combination, max(subCol)) 
    total <- total + max(subCol) #Update total 
}