R help - Jun 2017 - Can I use tabu search for minimization problem ?

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 .

Zitat von Mars Xu <xujiao.mycafe at gmail.com>:
> 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 .
If you want people to help you, provide a minimal (or, at least, small)
reproducible code example. In particular, tell people what package(s)
you are using.


-- 
Enrico Schumann
Lucerne, Switzerland
http://enricoschumann.net