[R] Can I use tabu search for minimization problem ?

Mars Xu xujiao.mycafe at gmail.com
Tue Jun 20 10:01:45 CEST 2017


Hi all,
	I want to use tabu search to solve my minimization problem. but tabu search in R is for maximization, so I turn my function from f to -f, but the eUtilityKeep always be 0 from the second position. I have go through a part of source code found that it always give the default value to compare,

move <- ifelse(maxTaboo > maxNontaboo & maxTaboo > aspiration, 
                         ifelse(length(which(neighboursEUtility == maxTaboo)) == 1, 
                                which(neighboursEUtility == maxTaboo), sample(which(neighboursEUtility == maxTaboo), 1)),  
                         ifelse(length(which(neighboursEUtility == maxNontaboo & tabuList == 0)) == 1, 
                                which(neighboursEUtility == maxNontaboo & tabuList == 0), sample(which(neighboursEUtility == maxNontaboo & tabuList == 0), 1)))

this cause the 0 value. 

How can I use it to get my minimization value using tabu search in R ?

Thanks .


More information about the R-help mailing list