Laboratoire ICAR » Plateforme TXM

import java.util.ArrayList;

import org.eclipse.core.runtime.IProgressMonitor;

import org.txm.chartsengine.core.ChartsEngine;

import org.txm.chartsengine.core.results.ChartResult;

import org.txm.chartsengine.r.core.preferences.RChartsEnginePreferences;

	@Override

	public File exportChart(ChartResult result, File file, int imageWidth, int imageHeight, String outputFormat) {

			}

			}

		}

	}

	/**

	 * Plots the specified expression using R workspace instance and current charts engine output format.

	 * 

	@Override

	public boolean isRunning() {

		// TODO Auto-generated method stub

		return false;

/**

 * R base chart creator.

 * 

 * @author sjacquot

 *

 */

public abstract class RChartCreator<R extends ChartResult> extends ChartCreator<RChartsEngine, R> {

	@Override

	public Object createChart(R result) {

		}

		else {

		}

	}

	@Override

	public ArrayList<Color> getSeriesShapesColors(Object chart) {

		Log.severe(this.getClass() + ".getSeriesShapesColors(): Not yet implemented."); //$NON-NLS-1$

	public Class<RChartsEngine> getChartsEngineClass() {

		return RChartsEngine.class;

	}

}

package org.txm.stat.engine.r;

// Copyright © 2010-2013 ENS de Lyon.

// Copyright © 2007-2010 ENS de Lyon, CNRS, INRP, University of

// Lyon 2, University of Franche-Comté, University of Nice

// Sophia Antipolis, University of Paris 3.

// 

// TODO: Auto-generated Javadoc

/**

 * 

 * @author mdecorde

 */

public final class RWorkspaceRenderer {

	/** The workspace. */

	private static RWorkspace workspace = null;

	private static RWorkspaceRenderer instance;

	/** The default device. */

	private RDevice defaultDevice = RDevice.SVG;

	/**

	 * protected on purpose. See {@link #getInstance()}.

	 *

			throws RWorkspaceException {

		this.workspace = workspace;

	}

	/**

	 * Plot.

	 *

	 * @throws StatException the stat exception

	 */

	public File plot(File file, String expr) {

	}

	/**

	 * Plot.

	 *

			Log.severe(TXMCoreMessages.bind("** Error: can not write in file {0}.", file));

		}

		String devicename = device.getName();

		String name;

		Log.info(RCoreMessages.bind(RCoreMessages.info_savingChartToFile, file.getAbsolutePath()));

		if (OSDetector.isFamilyWindows()) {

		else {

			name = file.getAbsolutePath();

		}

		try {

				workspace.voidEval("library(RSvgDevice);");

			}

			// FIXME : test for window dimensions so the large plots can be entirely displayed. Need to pass width and height to RWorkspace.plot() so

			// RChartsEngine will be able to dynamically compute the width from the number of bars in a barplot for example.

			// FIXME: tests: Unicode and charts engine font preference

			Font font = ChartsEngine.createFont();

			if (xp.isString() && xp.asString() != null) { // if there's a string

				// then we have a

				// problem, R sent an

				// if (w.asString()!=null) System.out.println(w.asString());

				Log.severe(w.asString());

			}

			// ok, so the device should be fine - let's plot

			boolean state = workspace.voidEval(expr);

			workspace.voidEval("dev.off()"); //$NON-NLS-1$

				file.delete();

				return null;

			}

				return file;

			}

		}

			return null;

		}

	}

	/**

	 * Sets the default graphic device.

	 *

	public void setDefaultGraphicDevice(RDevice device) {

		this.defaultDevice = device;

	}

	/**

	 * Sets the default graphic device.

	 *

		if (device != null)

			this.defaultDevice = device;

	}

	public static RWorkspaceRenderer getInstance() throws RWorkspaceException {

			instance = new RWorkspaceRenderer(RWorkspace.getRWorkspaceInstance());

		return instance;

	}

import org.eclipse.ui.contexts.IContextService;

import org.eclipse.ui.part.MultiPageEditorPart;

import org.txm.chartsengine.core.ChartsEngine;

import org.txm.chartsengine.core.results.ChartResult;

import org.txm.chartsengine.rcp.SWTChartsComponentsProvider;

import org.txm.chartsengine.rcp.messages.ChartsUIMessages;

	public final void updateEditorFromResult(boolean update) {

		// check that the charts engine used for the result matches the SWT components provider otherwise find a suitable components provider

		if (this.getResult().getChartsEngine() != this.swtChartsComponentsProvider.getChartsEngine()) {

			Log.finest("ChartEditor.updateEditorFromResult(): result charts engine  = " + this.getResult().getChartsEngine().getName() + " / Editor charts engine = " + this.swtChartsComponentsProvider //$NON-NLS-1$ //$NON-NLS-2$

					.getChartsEngine().getName() + ".");  //$NON-NLS-1$

					String[] data = StringUtils.split(chartTypeCombo.getItem(chartTypeCombo.getSelectionIndex()), '/');

					data[0] = StringUtils.trim(data[0]);

					data[1] = StringUtils.trim(data[1]);

					getEditorPart().getResult().setChartType(data[1]);

					getEditorPart().getResult().setChartsEngine((ChartsEngine) Toolbox.getEngineManager(EngineType.CHARTS).getEngine(data[0]));

					update = false;

	/**

	 * Loads or reloads the chart from the chart object stored in the linked editor input.

	 */

	public abstract void loadChart();

			// creates components if they not exist

			if (this.chartComponent == null) {

				if (this.chartEditor.getResult().isChartDirty()) {

					try {

						// this.chartEditor.getResult().clearLastRenderingParameters(); // FIXME: SJ: seems to became useless

				List<Part> parts = partitionDimensions.getParts(sortPartsBySize);

				for (int i = 0; i < parts.size(); i++) {

				}

				if (sortPartsBySize) {

					series.add(i, parts.get(i).getSize());

					// Add X axis symbol

				}

			}

			catch (CqiClientException e) {

	@Override

		try {

			PartitionDimensions partitionDimensions = result;

			// parameters

			boolean sortPartsBySize = partitionDimensions.isSortingBySize();

			boolean displayPartsCountInTitle = partitionDimensions.isDisplayingPartCountInTitle();

			// Create parts names command string

			String snames = "c("; //$NON-NLS-1$

			for (int i = 0; i < parts.size(); i++) {

				if (name.trim().length() == 0)

					name = "N/A"; //$NON-NLS-1$

				snames += "\"" + name + "\""; //$NON-NLS-1$ //$NON-NLS-2$

			String cmd = String.format("pie(%s, col=colors, labels=%s, horiz=F, las=2, ylab=\"%s\");\n", ssizes, snames, ylab); //$NON-NLS-1$

			// plot the chart

					sortPartsBySize, displayPartsCountInTitle));

		}

		catch (Exception e) {

			Log.severe(PartitionCoreMessages.bind(PartitionCoreMessages.cantCreateDimensionsPartitionChartFileChartsEngineColonP0, RChartsEngine.DESCRIPTION) + e);

		}

	}

	@Override

		try {

			PartitionDimensions partitionDimensions = (PartitionDimensions) result;

			// parameters

			boolean sortPartsBySize = partitionDimensions.isSortingBySize();

			boolean displayPartsCountInTitle = partitionDimensions.isDisplayingPartCountInTitle();

			// Create parts names command string

			String snames = "c("; //$NON-NLS-1$

			for(int i = 0; i < parts.size(); i++) {

				if(name.trim().length() == 0)

					name = "N/A"; //$NON-NLS-1$

				snames += "\"" + name + "\""; //$NON-NLS-1$ //$NON-NLS-2$

			String cmd = String.format("barplot(%s, col=colors, names.arg=%s, horiz=F, las=2, ylab=\"%s\", xlab=\"%s\");\n", ssizes, snames, PartitionCoreMessages.numberOfWords, PartitionCoreMessages.part); //$NON-NLS-1$

			// plot the chart

		}

		catch(Exception e) {

			Log.printStackTrace(e);

		}

	}

import org.apache.batik.transcoder.svg2svg.SVGTranscoder;

import org.eclipse.swt.SWT;

import org.eclipse.swt.widgets.Composite;

import org.txm.chartsengine.core.ChartsEngine;

import org.txm.chartsengine.core.results.ChartResult;

import org.txm.chartsengine.rcp.IChartComponent;

	/**

	 */

	protected File file;

	@Override

	public void loadChart(Object chart) {

	}

				try {

					Log.fine(TXMCoreMessages.bind("Loading SVG document from file: {0}...", file.getAbsolutePath()));

					getSVGCanvas().loadSVGDocument(file.toURL().toExternalForm());

					Log.fine(TXMCoreMessages.bind("File {0} loaded.", file.getAbsolutePath()));

				}

public class RAHCChartCreator extends RChartCreator<AHC> {

	@Override

		AHC ahc = result;

		String cmd = null;

		// 2D

			cmd = "plot.HCPC(" + ahc.getRSymbol() + ", new.plot=FALSE)";

		}

	}

	@Override

		try {

			WordCloud wordCloud = result;

			// parameters

			// System.out.println("ploting...");

			// rw.plot(svgFile, cmd, device);

			// System.out.println("cleaning");

			// TODO Auto-generated catch block

			e.printStackTrace();

		}

	}

	@Override

				@Override

				public void widgetSelected(SelectionEvent e) {

					bandeField.setEnabled(densityButton.getSelection());

					getResult().setChartType(Progression.DENSITY_CHART_TYPE);

					super.widgetSelected(e);

				}

	@Override

		// FactoMineR R package

		if (ca.useFactoMineR()) {

					.createCAFactorialMapChartTitle(ca));

		}

		// CA R package

		else {

					.getSecondDimension());

		}

	}

public class REigenvaluesChartCreator extends RChartCreator<Eigenvalues> {

	@Override

		CA ca = result.getCA();

		// FactoMineR R package

		if (ca.useFactoMineR()) {

		}

		// CA R package

		else {

		}

	}

	@Override

		try {

			SpecificitiesSelection specificitiesSelection = result;

			// parameters

			boolean transpose = specificitiesSelection.isGroupingByLines();

			}

			// Plot all

		}

		catch (Exception e) {

			Log.severe(SpecificitiesCoreMessages.bind(SpecificitiesCoreMessages.cantCreateSpecificitiesChartFileChartsEngineColonP0, this.getChartsEngine().getName()) + e);

		}

	}

package org.txm.chartsengine.raster.rcp.swt;

import java.io.File;

import java.util.ArrayList;

import org.eclipse.swt.widgets.Display;

import org.eclipse.swt.widgets.Label;

import org.txm.chartsengine.core.ChartsEngine;

import org.txm.chartsengine.rcp.IChartComponent;

import org.txm.chartsengine.rcp.editors.ChartEditor;

import org.txm.chartsengine.rcp.editors.ChartEditorInput;

	public RasterComposite(ChartEditor chartEditor, Composite parent, int style) {

		super(chartEditor, parent, style);

		this.file = null;

		//

		this.imageLabel = new Label(this, SWT.NONE);

		// // imgLabel.setImage( image );

		// sc.setContent( this.imageLabel );

		// Label l = new Label( shell, SWT.NONE );

		// rootPanel.add(this.getPanel());

		// frame.add(rootPanel);

		// frame.pack();

	}

		Object chart = this.chartEditor.getChart();

			// FIXME: temporary solution

			try {

				this.chartEditor.getResult().compute();

				e.printStackTrace();

			}

			return (IChartComponent) chart;

		}

		return null;

	}

	/**

	 * Loads a raster image from the specified file.

	 * 

	 */

	public void loadRasterFile(File file) {

		this.file = file;

		if (this.image != null) {

		ImageData imgData = new ImageData(file.getAbsolutePath());

		this.image = new Image(Display.getCurrent(), imgData);

		this.imageLabel.setImage(this.image);

	}

	@Override

	public void copyChartViewToClipboard() {

		// TODO Auto-generated method stub

		System.err.println("RasterComposite.copyChartViewToClipboard(): not implemented.");

	}

}

	@Override

		// try {

		// rw.plot(file, cmd, ((RChartsEngine) this.chartsEngine).getRDevice());

		// System.out.println("cleaning");

		// rw.eval("rm(tmplabels)"); //$NON-NLS-1$

		// // TODO Auto-generated catch block

		// e.printStackTrace();

		// }

	}

	@Override

	 */

	public abstract Object createChart(R result);

	/**

	 * Updates an existing chart.

	 * By default this method does nothing.

	 * Subclasses should override this method to update a chart without recreating one.

	 * 

	 * @param result

	 * @param preferencesNode

	 */

	public void updateChart(R result) {

		Log.severe("ChartCreator.updateChart(): not implemented. This method is intended to be overridden in subclasses."); //$NON-NLS-1$

	public void setChartType(String chartType) {

		this.chartType = chartType;

	}

}

import java.util.ArrayList;

import java.util.HashMap;

import org.txm.chartsengine.core.ChartCreator;

import org.txm.chartsengine.core.ChartsEngine;

import org.txm.chartsengine.core.ChartsEnginesManager;

			// )

			) {

				this.chart = chartCreator.createChart(this);

			}

			this.chartDirty = false;

			// Debug

			return true;

	public void setCurrentEngine(ChartsEngine engine) {

		super.setCurrentEngine(engine);

		// ChartsEngine.chartsEngines.

		// String[] enginesNames = this.getEnginesOrder();

				if (chartsEngineClass.equals(chartCreator.getChartsEngineClass())) {

					chartCreator.setFileNamePrefix(contributions[i].getAttribute("fileNamePrefix")); //$NON-NLS-1$

					chartCreator.setChartType(contributions[i].getAttribute("chartType")); //$NON-NLS-1$

				}

			}

			catch (CoreException e) {

	}

	/**

	 * 

	 * @param encodedStr

	 * @return the decoded font

	 * @return

	 */

	public File exportChart(ChartResult result, int imageWidth, int imageHeight, String outputFormat) {

	}

	/**

package org.txm.progression.core.chartsengine.r;

import org.txm.progression.core.functions.Progression;

// FIXME: SJ: this chart creator has been disabled in extension definition to force JFC mode for Cumulative chart and R mode for Density chart since the Density chart is not yet implemented in JFC charts engine  

	@Override

	}

}

package org.txm.progression.core.chartsengine.r;

import org.txm.progression.core.functions.Progression;

/**

	@Override

	}

	 * @param cumulative

	 * @return

	 */

		try {

			Progression progression = result;

			// boolean cumulative = result.getBooleanParameterValue(ProgressionPreferences.CHART_CUMULATIVE);

			String cmd = "progression(positions, names, colors, styles, widths, \"" + name + "\"," + progression.getXminCorpus() + "," + progression.getXmaxCorpus() + ",\"" + cumulative //$NON-NLS-1$ //$NON-NLS-2$ //$NON-NLS-3$ //$NON-NLS-4$

					+ "\",structurepositions,structurenames, \"\", " + progression.getBande() + ");\n";  //$NON-NLS-1$ //$NON-NLS-2$

			RWorkspace.getRWorkspaceInstance().eval(Progression.prefixR + Progression.norep + " <- list(positions=positions, names=names, xmin=" + progression.getXminCorpus() + ",xmax=" + progression //$NON-NLS-1$ //$NON-NLS-2$

					.getXmaxCorpus() + ", structpositions=structurepositions, structnames=structurenames)");  //$NON-NLS-1$

			// TODO Auto-generated catch block

			org.txm.utils.logger.Log.printStackTrace(e);

		}

	}

 */

public abstract class JFCChartCreator<R extends ChartResult> extends ChartCreator<JFCChartsEngine, R> {

	@Override

	public abstract JFreeChart createChart(R result);