1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
|
/*=========================================================================
Program: Insight Segmentation & Registration Toolkit
Module: itkBatchSupervisedTrainingFunction.txx
Language: C++
Date: $Date$
Version: $Revision$
Copyright (c) Insight Software Consortium. All rights reserved.
See ITKCopyright.txt or http://www.itk.org/HTML/Copyright.htm for details.
This software is distributed WITHOUT ANY WARRANTY; without even
the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
PURPOSE. See the above copyright notices for more information.
=========================================================================*/
#ifndef __itkBatchSupervisedTrainingFunction_txx
#define __itkBatchSupervisedTrainingFunction_txx
#include "itkBatchSupervisedTrainingFunction.h"
#include <fstream>
#include <algorithm>
namespace itk
{
namespace Statistics
{
template<class TSample, class TTargetVector, class ScalarType>
BatchSupervisedTrainingFunction<TSample,TTargetVector,ScalarType>//,f>
::BatchSupervisedTrainingFunction()
{
this->m_LearningRate = 0.1; //0.5 multilayer test 0.1 perceptron
m_Threshold = 0;
m_Stop = false; //stop condition
}
template<class TSample, class TTargetVector, class ScalarType>
void BatchSupervisedTrainingFunction<TSample,TTargetVector,ScalarType>
::SetNumOfIterations(long i)
{
this->SetIterations(i);
}
template<class TSample, class TTargetVector, class ScalarType>
void BatchSupervisedTrainingFunction<TSample,TTargetVector,ScalarType>
::Train(typename BatchSupervisedTrainingFunction<TSample, TTargetVector, ScalarType>::NetworkType* net,
TSample* samples, TTargetVector* targets)
{
this->SetTrainingSamples(samples);
this->SetTargetValues(targets);
InternalVectorType outputvector;
InternalVectorType errorvector;
outputvector.SetSize(targets->GetMeasurementVectorSize());
errorvector.SetSize(targets->GetMeasurementVectorSize());
//std::cout<<"Target dim ="<<targets->GetMeasurementVectorSize()<<std::endl;
//typename Superclass::OutputVectorType outputvector;
typename Superclass::VectorType inputvector;
typename Superclass::OutputVectorType targetvector;
//typename Superclass::OutputVectorType errorvector;
long num_iterations = this->GetIterations();
m_Stop = false;
long count = 0;
while (!m_Stop)
{
for (unsigned long i = 0; i < this->m_InputSamples.size(); i++)
{
inputvector = this->m_InputSamples[i];
targetvector = this->m_Targets[i];
outputvector=net->GenerateOutput(inputvector);
for(unsigned int k=0; k<targetvector.Size(); k++)
{
errorvector[k] = targetvector[k] - outputvector[k];
}
net->BackwardPropagate(this->m_PerformanceFunction
->EvaluateDerivative(errorvector));
}
net->UpdateWeights(this->m_LearningRate);
count++;
if (count > num_iterations)
{
m_Stop = true;
}
}
#ifdef __OLD_CODE__
if (this->m_PerformanceFunction->Evaluate(errorvector) < m_Threshold
&& count < num_iterations)
{
std::cout << "Goal Met " << std::endl;
}
else
{
std::cout << "Goal Not Met Max Iterations Reached " << std::endl;
}
std::cout << net << std::endl;
#endif
}
/** Print the object */
template<class TSample, class TTargetVector, class ScalarType>
void
BatchSupervisedTrainingFunction<TSample,TTargetVector,ScalarType>
::PrintSelf( std::ostream& os, Indent indent ) const
{
os << indent << "BatchSupervisedTrainingFunction(" << this << ")" << std::endl;
os << indent << "m_Threshold = " << m_Threshold << std::endl;
os << indent << "m_Stop = " << m_Stop << std::endl;
Superclass::PrintSelf( os, indent );
}
} // end namespace Statistics
} // end namespace itk
#endif
|
