Method: Statsample::Factor::PrincipalAxis.separate_matrices

Defined in:
lib/statsample/factor/principalaxis.rb

.separate_matrices(matrix, y) ⇒ Object

Returns two matrixes from a correlation matrix with regressors correlation matrix and criteria xy matrix.


178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
 
# File 'lib/statsample/factor/principalaxis.rb', line 178

def self.separate_matrices(matrix, y)
  ac=[]
  matrix.column_size.times do |i|
    ac.push(matrix[y,i]) if i!=y
  end
  rxy=Matrix.columns([ac])
  rows=[]
  matrix.row_size.times do |i|
    if i!=y
      row=[]
      matrix.row_size.times do |j|
        row.push(matrix[i,j]) if j!=y
      end
      rows.push(row)
    end
  end
  rxx=Matrix.rows(rows)
  [rxx,rxy]
end