Message-ID: <20170620154229.Horde._TrLtiljR4uUhM3E0VpoBgV@webmail.your-server.de>
Date: 2017-06-20T13:42:29Z
From: Enrico Schumann
Subject: Can I use tabu search for minimization problem ?
In-Reply-To: <E7AC6431-5A81-42EA-B83C-EEDB6312EC1B@gmail.com>
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