從數據框中選擇最佳值的組合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 
}