Таблица
| Хромосома | Вероятность (smi = 0.135266) |
| 1 | (1/84)/smi = 8.80% |
| 2 | (1/24)/smi = 39.6% (30.8+8.8) |
| 3 | (1/26)/smi = 68% (28.4+39.6) |
| 4 | (1/133)/smi = 73.56% (5.56+68) |
| 5 | (1/28)/smi = 99.96% (26.4+73.56) |
Последнее значение всегда будет 100. Имея в нашем арсенале теорию, посмотрим на код. Он очень прост: преобразование к float необходимо для того, чтобы избежать целочисленного деления. Есть две функции: одна вычисляет smi, а другая генерирует вероятности оказаться родителем.
float CDiophantine::MultInv()
{
float sum = 0;
for(int i=0;i<MAXPOP;i++)
{
sum += 1/((float)population[i].fitness);
}
returnsum; //Сумма обратных коэффициентов приспособленности всех генов в популяции
}
voidCDiophantine::GenerateLikelihoods() //Генерирует вероятности воспроизведения
{
float multinv = MultInv();
float last = 0;
for(int i=0;i<MAXPOP;i++)
{
population[i].likelihood = last = last + ((1/((float)population[i].fitness) / multinv) * 100);
}
}
Итак, у нас есть и коэффициенты выживаемости (fitness) и необходимые вероятности (likelihood). Можно переходить к размножению (breeding).
5.4 Функции Breeding
Функции размножения состоят из трех: получить индекс гена, отвечающего случайному числу от 1 до 100, непосредственно вычислить кроссовер двух генов и главной функции генерации нового поколения. Рассмотрим все эти функции одновременно и то, как они друг друга вызывают. Вот главная функция размножения:
CDiophantine::CreateNewPopulation() {gene temppop[MAXPOP];for(int i=0;i<MAXPOP;i++){int parent1 = 0,parent2 = 0, iterations = 0;while(parent1 == parent2 || population[parent1] == population[parent2]){parent1 = GetIndex((float)(rand() % 101));parent2 = GetIndex((float)(rand() % 101));if (++iterations > MAXPOP) break; // В этом случае родителей выбираем случайно} temppop[i] = Breed(parent1, parent2); // Процессразмножения}for(i=0;i<MAXPOP;i++)population[i] = temppop[i];}Итак, первым делом мы создаем случайную популяцию генов. Затем делаем цикл по всем генам. Выбирая гены, мы не хотим, чтобы они оказались одинаковы (ни к чему скрещиваться с самим собой :), и вообще - нам не нужны одинаковые гены (operator = в gene). При выборе родителя, генерируем случайное число, а затем вызываем GetIndex. GetIndex использует идею куммулятивности вероятностей (likelihoods), она просто делает итерации по всем генам, пока не найден ген, содержащий число:
int CDiophantine::GetIndex(float val) // По данному числу от 0 до //100 возвращает{ // номер необходимого гена в популяцииfloat last = 0;for(int i=0;i<MAXPOP;i++){if (last <= val && val <= population[i].likelihood) return i;else last = population[i].likelihood;} return 4;}Возвращаясь к функции CreateNewPopulation(): если число итераций превосходит MAXPOP, она выберет любых родителей. После того, как родители выбраны, они скрещиваются: их индексы передаются вверх на функцию размножения (Breed). Breed function возвращает ген, который помещается во временную популяцию. Вот код:
gene CDiophantine::Breed(int p1, int p2){int crossover = rand() % 3+1; //Число от 1 до 3 - генерируем точку кроссовера.int first = rand() % 100; // Какой родитель будет первым ?gene child = population[p1]; // Инициализировать ребенка первым родителемint initial = 0, final = 4;if (first < 50) initial = crossover;// Если первый родитель р1(вероятность этого 50%) -// начинаем с точки кроссовераelse final = crossover; // Иначе - заканчиваем на точке кроссовераfor(int i=initial;i<final;i++){ // Кроссоверchild.alleles[i] = population[p2].alleles[i];if (rand() % 101 < 5) child.alleles[i] = rand() % (result + 1);// 5% - мутация}returnchild; // Возвращаем ребенка}void CDiophantine::CreateNewPopulation() {gene temppop[MAXPOP];for(int i=0;i<MAXPOP;i++){int parent1 = 0,parent2 = 0, iterations = 0;while(parent1 == parent2 || population[parent1] == population[parent2]){parent1 = GetIndex((float)(rand() % 101));parent2 = GetIndex((float)(rand() % 101));if (++iterations > MAXPOP) break; // В этом случае родителей выбираем случайно} temppop[i] = Breed(parent1, parent2); // Процессразмножения}for(i=0;i<MAXPOP;i++)population[i] = temppop[i];}В конце концов мы определим точку кросс-овера. Заметим, что мы нехотим, чтобы кросс-овер состоял из копирования только одного родителя. Сгенерируем случайное число, которое определит наш кроссовер. Остальное понятно и очевидно. Добавлена маленькая мутация, влияющая на скрещивание. 5% - вероятность появления нового числа.
5.5 Функция Solve
Теперь уже можно взглянуть на функцию Solve(). Она всего лишь итеративно вызывает вышеописанные функции. Заметим, что мы присутствует проверка: удалось ли функции получить результат, используя начальную популяцию. Это маловероятно, однако лучше проверить.
intCDiophantine::Solve()
{
intfitness= -1;
// Создаем начальную популяцию
srand((unsigned)time(NULL));
for(int i=0;i<MAXPOP;i++)
{ // Аллели хромосом заполняем произвольными числами от 0 до result
for (int j=0;j<4;j++)
{
population[i].alleles[j] = rand() % (result + 1);
}
}
if (fitness = CreateFitnesses())
{
return fitness;
}
int iterations = 0;
while (fitness != 0 || iterations < 50)
{ // Считаем до тех пор пока решение не будет найдено или к-во итераций более 50
GenerateLikelihoods();
CreateNewPopulation();
if (fitness = CreateFitnesses())
{
printf("iterations %d \n",iterations);
return fitness;
}
iterations++;
}
return -1;
}
5.6 ФункцияMain
Рассмотрим код главной функции:
#include<iostream.h>
#include <conio.h>
#include "diophantine.h"
void main() {
CDiophantine dp(1,2,3,4,30);
int ans;
ans = dp.Solve();
if (ans == -1) {
cout << "Solution not found." << endl;
} else {
gene gn = dp.GetGene(ans);
cout << "The solution set to a+2b+3c+4d=30 is:\n";
cout << "a = " << gn.alleles[0] << "." << endl;
cout << "b = " << gn.alleles[1] << "." << endl;
cout << "c = " << gn.alleles[2] << "." << endl;
cout << "d = " << gn.alleles[3] << "." << endl;
} getch();
}
Заключение
Изложенный подход является эвристическим, т. е. показывает хорошие результаты на практике, но плохо поддается теоретическому исследованию и обоснованию. Естественно задать вопрос — следует ли пользоваться такими алгоритмами, не имеющими строгого математического обоснования? Как и в вопросе о нейронных сетях, здесь нельзя ответить однозначно. С одной стороны, в математике существует достаточно большой класс абсолютно надежных (в смысле гарантии получения точного решения) методов решения различных задач. С другой стороны, речь идет о действительно сложных практических задачах, в которых эти надежные методы часто неприменимы. Нередко эти задачи выглядят настолько необозримыми, что не предпринимается даже попыток их осмысленного решения. Например, фирма, занимающаяся транспортными перевозками, в современных условиях российского бизнеса скорее предпочтет нанять лишних водителей и повысить цены на свои услуги, чем оптимизировать маршруты и расписания поездок. На западном рынке, где уже давно действуют законы более или менее честной конкуренции, оптимальность деятельности компании значительно влияет на ее доходы и даже может стать решающим фактором для ее выживания. Поэтому любые идеи, позволяющие компании стать «умнее» своих конкурентов, находят там широкое применение. Генетические алгоритмы — реализация одной из наиболее популярных идей такого рода. Эта популярность вызвана, по-видимому, исключительной красотой подхода и его близостью к природному механизму. Подобным образом популярность нейросетевой технологии подогревается во многом ее сходством с работой мозга. По-настоящему активное развитие эвристических подходов, как мы видим, непосредственно связано с развитием свободного рынка и экономики в целом.
Список использованной литературы
1. Кантор И.А.(перевод) Введение в ГА и Генетическое Программирование -http://www. algolist.manual.ru
2. Скурихин А.Н. Генетические алгоритмы . Новости искусственного интеллекта - 1995, №4, с. 6-46.
3. Хэзфилд Р. , Кирби Л. Искусство программирования на C– К .:DIAsoft,2001.
4. Поспелов Д.А. Информатика. Энциклопедический словарь для начинающих - М:Педагогика-Пресс, 1994, - 350 с.
5. Курс лекций по предмету "Основы проектирования систем с искусственным интеллектом" / Сост. Сотник С.Л. –URL:http://www.neuropower.de
6. Кузнецов О.П. О некомпьютерных подходах к моделированию интеллектуальных процессов мозга – Москва, Институт проблем управления РАН
7. Самоорганизующиеся нейронные сети и их применение – URL:http://www.chat.ru/~neurolab
8. Редько В.Г. Курс лекций "Эволюционная кибернетика" – URL:http://inet.keldysh.ru/BioCyber/Lectures.html
9. Головко В.А. Нейроинтеллект: Теория и применения Книга 1 Организация и обучение нейронных сетей с прямыми и обратными связями - Брест:БПИ, 1999, - 260 с.
10. Головко В.А. Нейроинтеллект: Теория и применения Книга 2 Самоорганизация, отказоустойчивость и применение нейронных сетей - Брест:БПИ, 1999, - 228 с.
11. А.Н. Генетические алгоритмы . Новости искусственного интеллекта - 1995, №4, с. 6-46.
12. С.А. Исаев Генетические алгоритмы - эволюционные методы поиска -URL: http://rv.ryazan.ru/~bug/library/ai/isaev/2/part1.html
13. Д.И. Батищев, С.А. Исаев Оптимизация многоэкстремальных функций с помощью генетических алгоритмов -URL:http://bspu.secna.ru/Docs/~saisa/ga/summer97.html
14. Group Method of Data Handling - URL: http://www.inf.kiev.ua/GMDH-home
15. Береснев В. Л., Гимади Э. Х., Дементьев В. Т. Экстремальные задачи стандартизации.- Новосибирск: Наука, 1978.
16. Гэри В., Джонсон Д. Вычислительные машины и труднорешаемые задачи.- М.: Мир, 1982.
17. Лима-ле-Фариа А. Эволюция без отбора: Автоэволюция формы и функции.- Москва, "Мир", 1991.
Приложение А
Текстmain.cpp
#include <iostream.h>
#include <conio.h>
#include "diophantine.h"
#define MAXPOP 25
void main() {
CDiophantine dp(1,2,3,4,30);
int ans;
ans = dp.Solve();
if (ans == -1) {
cout << "Solution not found." << endl;
} else {
gene gn = dp.GetGene(ans);
cout << "The solution set to a+2b+3c+4d=30 is:\n";
cout << "a = " << gn.alleles[0] << "." << endl;
cout << "b = " << gn.alleles[1] << "." << endl;
cout << "c = " << gn.alleles[2] << "." << endl;
cout << "d = " << gn.alleles[3] << "." << endl;
} getch();
}
ПриложениеБ
ТекстDiophantine.h
#include <stdlib.h>
#include <time.h>
#include<stdio.h>
//#define MAXPOP 25
struct gene
{
int alleles[4];
int fitness;
float likelihood;
// Тест на равенство
operator==(gene gn)
{
for (int i=0;i<4;i++)
{
if (gn.alleles[i] != alleles[i]) return false;
}
return true;
}
};
class CDiophantine
{
public: