001    /*
002     * Copyright (C) 2008-2010 by Holger Arndt
003     *
004     * This file is part of the Universal Java Matrix Package (UJMP).
005     * See the NOTICE file distributed with this work for additional
006     * information regarding copyright ownership and licensing.
007     *
008     * UJMP is free software; you can redistribute it and/or modify
009     * it under the terms of the GNU Lesser General Public License as
010     * published by the Free Software Foundation; either version 2
011     * of the License, or (at your option) any later version.
012     *
013     * UJMP is distributed in the hope that it will be useful,
014     * but WITHOUT ANY WARRANTY; without even the implied warranty of
015     * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
016     * GNU Lesser General Public License for more details.
017     *
018     * You should have received a copy of the GNU Lesser General Public
019     * License along with UJMP; if not, write to the
020     * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
021     * Boston, MA  02110-1301  USA
022     */
023    
024    package org.ujmp.ojalgo.calculation;
025    
026    import org.ojalgo.matrix.decomposition.QRDecomposition;
027    import org.ojalgo.matrix.store.PrimitiveDenseStore;
028    import org.ujmp.core.Matrix;
029    import org.ujmp.ojalgo.OjalgoDenseDoubleMatrix2D;
030    
031    public class QR implements
032                    org.ujmp.core.doublematrix.calculation.general.decomposition.QR<Matrix> {
033    
034            public static QR INSTANCE = new QR();
035    
036            public Matrix[] calc(Matrix source) {
037                    final org.ojalgo.matrix.decomposition.QR<Double> qr = QRDecomposition
038                                    .makePrimitive();
039                    PrimitiveDenseStore matrix = null;
040                    if (source instanceof OjalgoDenseDoubleMatrix2D) {
041                            matrix = ((OjalgoDenseDoubleMatrix2D) source).getWrappedObject();
042                    } else {
043                            matrix = new OjalgoDenseDoubleMatrix2D(source).getWrappedObject();
044                    }
045                    qr.compute(matrix);
046                    final Matrix q = new OjalgoDenseDoubleMatrix2D(qr.getQ());
047                    final Matrix r = new OjalgoDenseDoubleMatrix2D(qr.getR());
048                    return new Matrix[] { q, r };
049            }
050    
051            public Matrix solve(Matrix a, Matrix b) {
052                    final org.ojalgo.matrix.decomposition.QR<Double> qr = QRDecomposition
053                                    .makePrimitive();
054                    PrimitiveDenseStore a2 = null;
055                    PrimitiveDenseStore b2 = null;
056                    if (a instanceof OjalgoDenseDoubleMatrix2D) {
057                            a2 = ((OjalgoDenseDoubleMatrix2D) a).getWrappedObject();
058                    } else {
059                            a2 = new OjalgoDenseDoubleMatrix2D(a).getWrappedObject();
060                    }
061                    if (b instanceof OjalgoDenseDoubleMatrix2D) {
062                            b2 = ((OjalgoDenseDoubleMatrix2D) b).getWrappedObject();
063                    } else {
064                            b2 = new OjalgoDenseDoubleMatrix2D(b).getWrappedObject();
065                    }
066                    qr.compute(a2);
067                    return new OjalgoDenseDoubleMatrix2D(qr.solve(b2));
068            }
069    
070    }