File: itkSymmetricEigenSystem.hxx

package info (click to toggle)
insighttoolkit4 4.13.3withdata-dfsg2-4
  • links: PTS, VCS
  • area: main
  • in suites: bookworm
  • size: 491,256 kB
  • sloc: cpp: 557,600; ansic: 180,546; fortran: 34,788; python: 16,572; sh: 2,187; lisp: 2,070; tcl: 993; java: 362; perl: 200; makefile: 133; csh: 81; pascal: 69; xml: 19; ruby: 10
file content (120 lines) | stat: -rw-r--r-- 3,380 bytes parent folder | download | duplicates (5)
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
/*=========================================================================
 *
 *  Copyright Insight Software Consortium
 *
 *  Licensed under the Apache License, Version 2.0 (the "License");
 *  you may not use this file except in compliance with the License.
 *  You may obtain a copy of the License at
 *
 *         http://www.apache.org/licenses/LICENSE-2.0.txt
 *
 *  Unless required by applicable law or agreed to in writing, software
 *  distributed under the License is distributed on an "AS IS" BASIS,
 *  WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 *  See the License for the specific language governing permissions and
 *  limitations under the License.
 *
 *=========================================================================*/
#ifndef itkSymmetricEigenSystem_hxx
#define itkSymmetricEigenSystem_hxx

#include "itkSymmetricEigenSystem.h"

namespace itk
{
/**
 * Constructor
 */
template< typename TMatrixElement, int VNumberOfRows >
SymmetricEigenSystem< TMatrixElement, VNumberOfRows >
::SymmetricEigenSystem()
{
  m_Matrix = ITK_NULLPTR;
  m_UseAbsoluteOrder = true;
  m_EigenValues.Fill(NumericTraits< TMatrixElement >::ZeroValue());
  ArrayType temp;
  temp.Fill(NumericTraits< TMatrixElement >::ZeroValue());
  m_EigenVectors.Fill(temp);
}

/**
 * Destructor
 */
template< typename TMatrixElement, int VNumberOfRows >
SymmetricEigenSystem< TMatrixElement, VNumberOfRows >
::~SymmetricEigenSystem()
{}

template< typename TMatrixElement, int VNumberOfRows >
void
SymmetricEigenSystem< TMatrixElement, VNumberOfRows >
::PrintSelf(std::ostream & os, Indent indent) const
{
  Superclass::PrintSelf(os, indent);

  os << indent << "Matrix:";

  if ( m_Matrix != ITK_NULLPTR )
    {
    os << m_Matrix << std::endl;
    }
  else
    {
    os << "not set." << std::endl;
    }

  os << indent << "Eigen Vectors  " << m_EigenVectors << std::endl;
  os << indent << "Eigen Values   " << m_EigenValues << std::endl;
  os << indent << "Absolute order " << m_UseAbsoluteOrder << std::endl;
}

/**
 * Compute the eigen values and vectors
 */
template< typename TMatrixElement, int VNumberOfRows >
void
SymmetricEigenSystem< TMatrixElement, VNumberOfRows >
::GenerateData(void)
{
  int i, j, k;

  InternalEigenSystemType internalEigenSystem( m_Matrix->GetVnlMatrix() );

  typedef vnl_vector< TMatrixElement > EigenVectorType;
  EigenVectorType tempVector;

  for ( i = 0; i < VNumberOfRows; i++ )
    {
    tempVector = internalEigenSystem.get_eigenvector(i);
    m_EigenValues[i] = internalEigenSystem.get_eigenvalue(i);
    for ( j = 0; j < VNumberOfRows; j++ )
      {
      m_EigenVectors[i][j] = tempVector[j];
      }
    }

  double temp;
  for ( i = 0; i < ( VNumberOfRows - 1 ); i++ )
    {
    for ( j = i + 1; j < VNumberOfRows; j++ )
      {
      if ( ( m_EigenValues[j] > m_EigenValues[i] && !m_UseAbsoluteOrder )
           || ( ( itk::Math::abs(m_EigenValues[j]) > itk::Math::abs(m_EigenValues[i]) )
                && m_UseAbsoluteOrder ) )
        {
        temp = m_EigenValues[i];
        m_EigenValues[i] = m_EigenValues[j];
        m_EigenValues[j] = temp;
        for ( k = 0; k < VNumberOfRows; k++ )
          {
          temp = m_EigenVectors[i][k];
          m_EigenVectors[i][k] = m_EigenVectors[j][k];
          m_EigenVectors[j][k] = temp;
          }
        }
      }
    }
}
} // end namespace itk

#endif