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.core.io; 025 026 import java.io.File; 027 import java.io.IOException; 028 import java.io.OutputStream; 029 import java.io.OutputStreamWriter; 030 import java.io.Writer; 031 032 import org.ujmp.core.Matrix; 033 import org.ujmp.core.exceptions.MatrixException; 034 import org.ujmp.core.util.io.IntelligentFileWriter; 035 036 public class ExportMatrixR { 037 038 public static void toFile(File file, Matrix matrix, Object... parameters) throws IOException, 039 MatrixException { 040 IntelligentFileWriter writer = new IntelligentFileWriter(file); 041 toWriter(writer, matrix, parameters); 042 writer.close(); 043 } 044 045 public static void toStream(OutputStream outputStream, Matrix matrix, Object... parameters) 046 throws IOException, MatrixException { 047 OutputStreamWriter writer = new OutputStreamWriter(outputStream); 048 toWriter(writer, matrix, parameters); 049 writer.close(); 050 } 051 052 public static void toWriter(Writer writer, Matrix matrix, Object... parameters) 053 throws IOException, MatrixException { 054 String EOL = System.getProperty("line.separator"); 055 long nrow = matrix.getRowCount(); 056 long ncol = matrix.getColumnCount(); 057 writer.append("matrix(c("); 058 for (int c = 0; c < ncol; c++) { 059 writer.append("c("); 060 for (int r = 0; r < nrow; r++) { 061 writer.append(String.valueOf(matrix.getAsDouble(r, c))); 062 if ((r + 1) < nrow) { 063 writer.append(","); 064 } 065 } 066 writer.append(")"); 067 if ((c + 1) < ncol) { 068 writer.append(","); 069 } 070 } 071 writer.append("),ncol=" + ncol + ",nrow=" + nrow + ")" + EOL); 072 } 073 074 }