Laboratoire ICAR » Plateforme TXM

			if (getResult().getParent() instanceof PartitionIndex) {

			// FIXME: Apply button

							System.out.println(NLS.bind(LexicalTableUIMessages.mergeColsColonP0, colindices));

							refreshTable(true);

						} else// delete

						{

							System.out.println(NLS.bind(LexicalTableUIMessages.deleteColsColonP0, colindices));

								viewer.getTable().getColumns()[colindices

								                                        .get(i) + 3].dispose();

							refreshTable(true);

							refreshTable(true);

							viewer.getTable().deselectAll();

	// FIXME: not optimized, need to mix the update/not update code and do not remove column each computing, only when needed

	// FIXME: + usine à gaz... virer la variable "collist"

		 lexicalTable.getData().toTxt(file, "UTF-8", "\t", ""); //$NON-NLS-1$ //$NON-NLS-2$

	 // FIXME: try to use a ViewerSorter instead of this but also manage the result sorting for export

		if(this.lexicalTable.getData() != null)	{

		else	{

// TODO: Auto-generated Javadoc

 * Allow the user to merge Lexical Table lines columns values are added to the

 * first and the others lines are deleted @ author mdecorde.

	/* (non-Javadoc)

	 * @see org.eclipse.core.commands.AbstractHandler#execute(org.eclipse.core.commands.ExecutionEvent)

	 */

	 * Merge lines.

	static public void mergeLines(LexicalTableEditor LTeditor, String newname,

			int[] selection) {

			LTeditor.refreshTable();

			lineTableViewer.getTable().deselectAll();

			LTeditor.refresh(false);

		LTeditor.refreshTable();

		LTeditor.getlineTableViewer().getTable().deselectAll();

		try {

			LTeditor.refresh(false);

		} catch (Exception e) {

			// TODO Auto-generated catch block

			e.printStackTrace();

		}

		Shell shell = HandlerUtil.getActiveWorkbenchWindowChecked(event)

				.getShell();

			InputDialog d = new InputDialog(shell, TXMUIMessages.newName,

					TXMUIMessages.editTheNameOfTheNewColumnCreatedByTheMergedColumns, "", null); //$NON-NLS-1$ 

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

import java.io.File;

import org.txm.ca.core.functions.CA;

import org.txm.ca.core.functions.Eigenvalues;

import org.txm.ca.core.messages.CACoreMessages;

import org.txm.ca.core.statsengine.r.functions.FactoMineRCA;

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

import org.txm.chartsengine.r.core.RChartCreator;

/**

 * R CA Eigenvalues chart creator.

 * @author mdecorde

 * @author sjacquot

 *

 */

public class RSingularValuesChartCreator extends RChartCreator {

	@Override

	public File createChartFile(ChartResult result, File file) {

		CA ca = (CA) ((Eigenvalues) result).getCA();

		// FactoMineR R package

		if(ca.useFactoMineR())	{

			return this.createSingularValuesBarPlot((FactoMineRCA) ca.getCA(), file);

		}

		// CA R package

		else	{

			return this.createSingularValuesBarPlot((org.txm.ca.core.statsengine.r.functions.CA) ca.getCA(), file);

		}

	}

	/**

	 * Creates a bar plot with singular values of the specified CA result from "FactoMineR" R package.

	 * @param ca

	 * @param file

	 * @return the singular values bar plot object

	 */

	public File createSingularValuesBarPlot(FactoMineRCA ca, File file) {

		// Create the X axis labels with custom prefix

		StringBuilder xLabels = new StringBuilder(30);

		xLabels.append("c("); //$NON-NLS-1$

		for(int i = 0, c = ca.getColumnsCount() - 1; i < c; i++) {

			if(i > 0)	 {

				xLabels.append(", "); //$NON-NLS-1$

			}

			xLabels.append("\"" + (i + 1) + "\""); //$NON-NLS-1$ //$NON-NLS-2$

		}

		xLabels.append(")"); //$NON-NLS-1$

		String cmd = "tmpY <- " + ca.getSymbol() + "$eig$eigenvalue[1:length(" + ca.getSymbol() + "$eig$eigenvalue) - 1];\n"; //$NON-NLS-1$ //$NON-NLS-2$ //$NON-NLS-3$

		cmd += "barplot(tmpY, main=\"" //$NON-NLS-1$

				+ CACoreMessages.eigenvalues + "\", ylab=\"" + //$NON-NLS-1$

				CACoreMessages.eigenvalue + "\", xlab=\"" + //$NON-NLS-1$

				CACoreMessages.axis + "\", names.arg=" + xLabels + ");\n"; //$NON-NLS-1$ //$NON-NLS-2$

		this.getChartsEngine().plot(file, cmd);

		return file;

	}

	/**

	 * Creates a bar plot with singular values of the specified CA result from "CA" R package.

	 * @param ca

	 * @param file

	 * @return the singular values bar plot object

	 */

	public File createSingularValuesBarPlot(org.txm.ca.core.statsengine.r.functions.CA ca, File file) {

		this.getChartsEngine().plot(file, "barplot(" +  ca.getSymbol() + "$sv)"); //$NON-NLS-1$ //$NON-NLS-2$

		return file;

	}

	@Override

	public Class getResultDataClass() {

		return Eigenvalues.class;

	}

}

package org.txm.ca.core.chartsengine.jfreechart.themes.highcharts.chartcreators;

import org.eclipse.osgi.util.NLS;

import org.jfree.chart.JFreeChart;

import org.jfree.chart.axis.NumberAxis;

import org.jfree.data.category.DefaultCategoryDataset;

import org.jfree.data.general.DatasetUtilities;

import org.jfree.data.xy.XYSeriesCollection;

import org.txm.ca.core.chartsengine.jfreechart.themes.highcharts.renderers.CASingularValuesItemSelectionRenderer;

import org.txm.ca.core.functions.CA;

import org.txm.ca.core.functions.Eigenvalues;

import org.txm.ca.core.messages.CACoreMessages;

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

import org.txm.chartsengine.jfreechart.core.JFCChartCreator;

import org.txm.chartsengine.jfreechart.core.themes.base.ExtendedNumberAxis;

import org.txm.statsengine.core.StatException;

import org.txm.utils.logger.Log;

/**

 * JFC Eigenvalues chart creator.

 * 

 * @author sjacquot

 *

 */

public class JFCSingularValueChartCreator extends JFCChartCreator {

	@Override

	public Object createChart(ChartResult result) {

		CA ca = (CA) ((Eigenvalues) result).getCA();

		JFreeChart chart = null;

			// Creates the empty dataset

			DefaultCategoryDataset dataset = new DefaultCategoryDataset();

			// Create the chart

			chart = this.getChartsEngine().createCategoryBarChart(dataset, CACoreMessages.eigenvalues, CACoreMessages.axis, CACoreMessages.eigenvalue, false, false, false);

			// Custom renderer

			chart.getCategoryPlot().setRenderer(new CASingularValuesItemSelectionRenderer(ca));

		return chart;

	}

	@Override

	public void updateChart(ChartResult result) {

		CA ca = (CA) ((Eigenvalues) result).getCA();

		JFreeChart chart = (JFreeChart) result.getChart();

		// freeze rendering while computing

		chart.setNotify(false);

		// update the dataset

		try {

			DefaultCategoryDataset dataset = (DefaultCategoryDataset) chart.getCategoryPlot().getDataset();

			dataset.clear();

			double[] singularValues = ca.getValeursPropres();

			for(int i = 0; i < singularValues.length; i++) {

				dataset.setValue(singularValues[i], CACoreMessages.eigenvalue, String.valueOf(i + 1));

			}

		}

		catch(StatException e) {

			Log.severe(NLS.bind(CACoreMessages.cantCreateBarChartOfTheCASingularValuesP0, e));

			Log.printStackTrace(e);

		}

        // Custom range axis for ticks drawing options

        chart.getCategoryPlot().setRangeAxis(new ExtendedNumberAxis((NumberAxis) chart.getCategoryPlot().getRangeAxis(), false, true, 0, DatasetUtilities.findMaximumRangeValue(chart.getCategoryPlot().getDataset()).doubleValue()));

		super.updateChart(result);

	}

	@Override

	public Class getResultDataClass() {

		return Eigenvalues.class;

	}

}

			CAXYDataset dataset = new CAXYDataset(ca);

					"", "", dataset, PlotOrientation.VERTICAL, 

package org.txm.ca.core.chartsengine.jfreechart.themes.highcharts.renderers;

import java.awt.Color;

import java.text.DecimalFormat;

import java.util.List;

import org.jfree.chart.labels.CategoryToolTipGenerator;

import org.jfree.data.category.CategoryDataset;

import org.jfree.data.category.DefaultCategoryDataset;

import org.txm.ca.core.functions.CA;

import org.txm.ca.core.messages.CACoreMessages;

import org.txm.chartsengine.core.ChartsEngine;

import org.txm.chartsengine.core.messages.ChartsEngineCoreMessages;

import org.txm.chartsengine.jfreechart.core.renderers.interfaces.IRendererWithItemSelection;

import org.txm.chartsengine.jfreechart.core.themes.highcharts.defaulttheme.renderers.ItemSelectionCategoryBarRenderer;

import org.txm.chartsengine.jfreechart.core.themes.highcharts.defaulttheme.swing.CustomHTMLToolTip;

/**

 * Renderer providing item selection system and drawing features for selected item and custom rendering for CA singular values bar charts.

 * @author sjacquot

 *

 */

public class CASingularValuesItemSelectionRenderer extends ItemSelectionCategoryBarRenderer {

	/**

	 * Percent values number format.

	 */

	protected DecimalFormat percentValuesNumberFormat;

	/**

	 * Creates a renderer dedicated to CA charts.

	 */

	public CASingularValuesItemSelectionRenderer(CA ca) {

		super();

		this.mouseOverItemSelector.setResult(ca);

		this.percentValuesNumberFormat = new DecimalFormat("#.00");

	}

	@Override

	public void initToolTipGenerator(final IRendererWithItemSelection renderer)	{

		this.setBaseToolTipGenerator(new CategoryToolTipGenerator() {

			@Override

			public String generateToolTip(CategoryDataset dataset, int row, int column) {

				// Hexadecimal color

				Color color = (Color) getSeriesPaint(row);

				String hex = "#" + Integer.toHexString(color.getRGB()).substring(2);

				DefaultCategoryDataset catDataset = (DefaultCategoryDataset) dataset;

				Number value = catDataset.getValue(row, column);

				CA ca = (CA) getItemsSelector().getResult();

				List<List<Object>> singularValuesData = ca.getSingularValuesInfos();

				return CustomHTMLToolTip.getDefaultHTMLBody(renderer, hex) + "<p>#" + catDataset.getColumnKey(column) + "</p>"

						+ "<p><span style=\"color: " + hex + ";\">" + catDataset.getRowKey(row) + ChartsEngineCoreMessages.EMPTY

							+ " </span><b>" + valuesNumberFormat.format(value) + "</b></p>"

						+ "<p><span style=\"color: " + hex + ";\">" + CACoreMessages.percent + ChartsEngineCoreMessages.EMPTY

							+ " </span><b>" + percentValuesNumberFormat.format(singularValuesData.get(column).get(2)) + "</b></p>"

						+ "<p><span style=\"color: " + hex + ";\">" + CACoreMessages.charts_singularValues_tooltipSum + CACoreMessages.percent

							+ ChartsEngineCoreMessages.EMPTY

							+ " </span><b>" + percentValuesNumberFormat.format(singularValuesData.get(column).get(3)) + "</b></p>"

						+ "</body><html>";

			}

		});

	}

}

            class="org.txm.ca.core.chartsengine.jfreechart.themes.highcharts.chartcreators.JFCSingularValueChartCreator"

            class="org.txm.ca.core.chartsengine.r.RSingularValuesChartCreator"

				if (isLocked()) return Status.CANCEL_STATUS;

			return; // no refresh

		notifyExtensions("notifyStartOfRefresh"); //$NON-NLS-1$

		notifyExtensions("notifyEndOfRefresh"); //$NON-NLS-1$

	 * Synchronizes the result with editor parameters.

	/**

	 * UI safe

	 * 

	 * Synchronizes the editor with the result. 

	 * Dedicated to dynamically change the editor components from the stored result.

	 * <p>

	 * Use this method if you need to save parameter with Type not managed by the autoUpdateEditorFieldsFromResult method

	 * @throws Exception 

	 */

	public final void updateFromResult(final boolean update) throws Exception {

		if (this.parent != null && !this.parent.isDisposed()) {

			this.parent.getDisplay().syncExec(new Runnable() {

				@Override

				public void run() {

					try {

						refresh(update);

					} catch (Exception e) {

						// TODO Auto-generated catch block

						e.printStackTrace();

					}

				}

			});

		}

	}

	 * Synchronizes the editor with the result. 

	 * <p>

	 * Use this method if you need to save parameter with Type not managed by the autoUpdateEditorFieldsFromResult method

#TXM messages generated by the PluginMessagesManager class

#Thu Dec 06 15:02:43 CET 2018

coordColumnFormat=Формат колонки Coord

eigenvalues=Собственные значения

contributionColumnFormat=Формат колонки Вклад

openingTheCorrespondenceAnalysisResults=Открытие результатов факторного анализа соответствий

cosColumnFormat=Формат колонки Cos²

showTheColumns=Показать колонки в графике факторного плана

canNotComputeFactorialAnalysisWithOnlyP0PartsTheMinimumIs4Parts=** Невозможно провести факторный анализ соответствий при наличии только 

showTheRows=Показать строчки в графике факторного плана

distanceColumnFormat=Формат колонки Дистанция

factPlan=Факт. план

loadingCorrespondenceAnalysisResults=Загрузка результатов факторного анализа

computingCorrespondenceAnalysisOnP0WithPropertyP1=Расчет факторного анализа соответствий

CorrespondanceAnalysisEditorInput_11=∑%

eigenvalue=Собственные значения

canNotComputeCAOnLexicalTableWithLessThan4Columns=** Невозможно провести факторный анализ соответствий при наличии менее 4-х колонок

chi=χ²

CorrespondanceAnalysisEditorInput_4=Фактор

q=Qual

infosColonP0=Информация\: {0}

wrongInput=Ошибочный ввод

creatingCA=Создание окна ФАС

eigenvaluesHistogram=Гистограмма собственных значений

canNotComputeCAWithLessThan4RowsInTheTable=** Невозможно провести факторный анализ соответствий при наличии менее 4-х колонок в таблице

massColumnFormat=Формат колонки Масса

rowsInfos=Инф Строчки

qualityColumnFormat=Формат колонки Качество

colsInfos=Инф Колонки

	public static String eigenvaluesHistogram; 

#TXM messages generated by the PluginMessagesManager class

#Thu Dec 06 15:02:43 CET 2018

coordColumnFormat=Format de la colonne Coord

eigenvalues=Valeurs propres

showhidePointShapes=Afficher/Masquer les points

showhideTheRowPoints=Afficher/Masquer les lignes

contributionColumnFormat=Format de la colonne Contribution

axesColon=Axes \: 

cosColumnFormat=Format de la colonne Cos²

openingTheCorrespondenceAnalysisResults=Ouverture des résultats de l'analyse factorielle des correspondances

showTheColumns=Afficher les colonnes

canNotComputeFactorialAnalysisWithOnlyP0PartsTheMinimumIs4Parts=** Impossible de calculer l''analyse factorielle avec seulement {0} parties (le minimum est de 4 parties).

showTheRows=Afficher les lignes

distanceColumnFormat=Format de la colonne Distance

errorWhileOpeningCAEditorColonP0=** Erreur lors de l'ouverture de la fenêtre de résultats de l'AFC \: 

loadingCorrespondenceAnalysisResults=Chargement des résultats de l'analyse factorielle...

factPlan=Plan fact.

computingCorrespondenceAnalysisOnP0WithPropertyP1=Calcul de l''analyse factorielle des correspondances de {0} avec la propriété {1}

error_opening=** Erreur \: impossible d'ouvrir la fenêtre des résultats de l'AFC de {0}

showhideTheColumnPoints=Afficher/Masquer les colonnes

CorrespondanceAnalysisEditorInput_11=∑%

eigenvalue=Valeur propre

canNotComputeCAOnLexicalTableWithLessThan4Columns=** Impossible de calculer l'analyse factorielle des correspondances avec moins de 4 colonnes  ans la table

chi=χ²

showPointShapes=Afficher les points

CorrespondanceAnalysisEditorInput_4=\#

q=Q

infosColonP0=Informations \: {0}

error_cannot_compute_with_selection=** Erreur \: impossible de calculer l'AFC avec {0}

wrongInput=Entrée erronée

creatingCA=Création de la fenêtre de l'AFC

eigenvaluesHistogram=Diagramme à barres des valeurs propres

canNotComputeCAWithLessThan4RowsInTheTable=** Impossible de calculer l'analyse factorielle des correspondances avec moins de 4 lignes dans la table

massColumnFormat=Format de la colonne Masse

rowsInfos=Informations lignes

qualityColumnFormat=Format de la colonne Qualité

error_cannot_compute_with=** Erreur \: impossible de calculer l'AFC avec {0}

colsInfos=Informations sur les colonnes

lexicalTableCreatedWhenCalledFromAPartition=Table lexicale (créée quand appelée depuis une partition)

#TXM messages generated by the PluginMessagesManager class

#Thu Dec 06 15:02:43 CET 2018

coordColumnFormat=Coord column format

eigenvalues=Eigenvalues

showhidePointShapes=Show/Hide points

showhideTheRowPoints=Show/Hide row

contributionColumnFormat=Contribution column format

axesColon=Axes\: 

cosColumnFormat=Cos² column format

openingTheCorrespondenceAnalysisResults=Opening the correspondence analysis results

showTheColumns=Show columns

canNotComputeFactorialAnalysisWithOnlyP0PartsTheMinimumIs4Parts=** Can not compute factorial analysis with only {0} parts (the minimum is 4 parts).

showTheRows=Show rows

distanceColumnFormat=Distance column format

errorWhileOpeningCAEditorColonP0=** Error while opening the CA result window\: 

factPlan=Fact. plane

loadingCorrespondenceAnalysisResults=Loading correspondence analysis results…

computingCorrespondenceAnalysisOnP0WithPropertyP1=Computing Correspondence analysis of {0} with property {1}

error_opening=** Error\: can not open the CA result window with {0}

showhideTheColumnPoints=Show/Hide column

CorrespondanceAnalysisEditorInput_11=∑%

eigenvalue=Eigenvalue

canNotComputeCAOnLexicalTableWithLessThan4Columns=** Can not compute CA on lexical table with less than 4 columns in the table

chi=χ²

showPointShapes=Show points

CorrespondanceAnalysisEditorInput_4=\#

q=Q

error_cannot_compute_with_selection=** Error\: can not compute CA with current selection\={0} 

infosColonP0=Informations\: {0}

wrongInput=Wrong input

creatingCA=Creating the CA window

eigenvaluesHistogram=Eigenvalues bar chart

canNotComputeCAWithLessThan4RowsInTheTable=** Can not compute CA with less than 4 rows in the table

massColumnFormat=Mass column format

rowsInfos=Rows informations

error_cannot_compute_with=** Error\: can not compute CA with {0}

qualityColumnFormat=Quality column format

colsInfos=Columns information

lexicalTableCreatedWhenCalledFromAPartition=Lexical table (created when called from a partition)

import java.awt.Component;

import java.awt.event.ComponentEvent;

import java.awt.event.ComponentListener;

import java.util.List;

import org.txm.core.results.TXMResult;

// TODO: Auto-generated Javadoc

 * extends the GenericMultipage editor, and put the first tab next to the left

 * of the TabFolder

	//public static String SEPARATOR = "SEPARATOR"; //$NON-NLS-1$

	/* (non-Javadoc)

	 * @see org.txm.rcp.editors.GenericMultiPageEditor#createPages()

	 */

		/** The names. */

		this.names = Arrays.asList(new String[] {CAUIMessages.factPlan, CAUIMessages.eigenvalues, CAUIMessages.rowsInfos, CAUIMessages.colsInfos, CAUIMessages.eigenvaluesHistogram });

		// System.out.println("parent container layout : "+parentContainer.getLayout());

		// /////////////////////

		this.initCASingularValuesTableEditor();

			// to force the creation of the chart component and then add some listeners to it

			// FIXME: this code may be moved in CaFactorialMapChartEditor class

	//		caFactorialMapEditorPart.refresh(false);

			// Axis unit square ratio constraint

//			caFactorialMapEditorPart.getComposite().getChartComponent().setSquareOffEnabled(true);

//			caFactorialMapEditorPart.getComposite().getChartComponent().squareOff();

//			Component chartComponent = (Component) caFactorialMapEditorPart.getComposite().getChartComponent();

//			// Axis unit square ratio constraint on resize

//			chartComponent.addComponentListener(new ComponentListener() {

//

//				@Override

//				public void componentShown(ComponentEvent arg0) {

//					// TODO Auto-generated method stub

//				}

//

//				@Override

//				public void componentResized(ComponentEvent e) {

//					caFactorialMapEditorPart.getComposite().getChartComponent().squareOff();

//				}

//

//				@Override

//				public void componentMoved(ComponentEvent arg0) {

//					// TODO Auto-generated method stub

//				}

//

//				@Override

//				public void componentHidden(ComponentEvent arg0) {

//					// TODO Auto-generated method stub

//				}

//			});

		((ChartEditor)editors.get(4)).setParentMultiPagesEditor(this);

		// Editor part

		//caFactorialMapEditorPart.compute(false);

		// Editor input