Implements heuristics for the Quadratic Assignment Problem (QAP). Currently only the simulated annealing heuristic described in Burkard and Rendl (1984) is available.
Stable CRAN version: install from within R with
install.packages("qap")Current development version: Download package from AppVeyor or install from GitHub (needs devtools).
install_git("mhahsler/qap")Load the had12 QAPLIB problem (shipped with the package) and run 100 repetitions.
library(qap)
p <- read_qaplib(system.file("qaplib", "had20.dat", package="qap"))
a <- qap(p$A, p$B, rep = 100)
a[1]  8 15 16 14 19  6  7 12  1 11 10  5  3 20  2 17  4  9 18 13
attr(,"obj")
[1] 6926
Compare with known optimum (% above optimum).
(attr(a, "obj") - p$opt)/p$opt * 100[1] 0.05778677