El algoritmo:: Par:: Mejor es un módulo Perl para seleccionar apareamientos (diseñado para Van torneos, pero puede estar usado para algo, realmente).

SINOPSIS

use el Algoritmo:: Par:: Mejor;

¿mi $pair = Algoritmo:: Par:: Mejor-> nuevo (¿? ¿opciones?);

¿el $pair-> añade (¿artículo? ¿artículo...?);

¿@pairList = $pair-> elección (¿? ¿$window?);

Después de crear un Algoritmo:: Par:: Mejor-> nuevo objeto, añada una lista de artículos (jugadores) para ser emparejado. añada conecta los nuevos artículos en una lista conectada. La lista conectada debe consistir en un número par de artículos o youll consiguen un error cuando usted trata de escoger a los pares.

Los apareamientos son determinados parcialmente por los artículos de orden originales fueron añadidos, pero lo que es más importante los artículos son emparejados basados en tanteos que son determinados por un picadillo de información usado para adjuntar cualesquiera datos arbitrarios al artículo, y el usuario suministró funciones para proporcionar un resultado a cada artículo con relación a otros artículos. Puede ser conveniente añadir métodos de acceso al Algoritmo:: Par:: el Mejor paquete de namespace principal (ver la opción scoreSubs a nuevo abajo para un ejemplo).
Algoritmo:: Par:: Mejor-> la elección explora todas las combinaciones de artículos y devuelve el apareamiento con el mejor resultado (más alto). Esto puede ser una proposición cara - el número de combinaciones sube muy rápido con respecto al número de artículos:

combinaciones de artículos
2 1 (1)
4 3 (1 * 3)
6 15 (1 * 3 * 5)
8105 (1 * 3 * 5 * 7)
10945 (1 * 3 * 5 * 7 * 9
12 10395 (1 * 3 * 5 * 7 * 9 * 11)
14 135135 (1 * 3 * 5 * 7 * 9 * 11 * 13)

Es claramente irrazonable tratar de emparejar un número significativo de artículos. En mi sistema se necesitan aproximadamente 2 segundos para emparejar 12 artículos (6 pares), y 20 segundos para emparejar 14 artículos (sin tanteos negativos sólo optimización). Intentando a completamente el par hasta 30 artículos tomarían demasiado mucho tiempo.

Por suerte, hay un modo de conseguir resultados bastante buenos para grandes números, aun si theyre no perfecto. En vez de tratar de emparejar la lista entera inmediatamente, el Algoritmo:: Par:: Mejor-> escoge a pares una serie de grupos más pequeños para conseguir resultados locales buenos. El nuevo método acepta que una opción de ventana limita el número de pares en cada ventana. La opción de ventana también puede ser anulada llamando la elección con un argumento de ventana explícito:

$pair-> elección ($window);

Ver la descripción de la opción de ventana abajo.