Revision 2687
tmp/org.txm.statsengine.r.core/src/org/txm/statsengine/r/core/data/MatrixImpl.java (revision 2687) | ||
---|---|---|
710 | 710 |
REXP r = rw.eval(symbol + " <- " + symbol + "[,-" + ArrayIndex.zeroToOneBasedIndex(col) + "];"); //$NON-NLS-1$ //$NON-NLS-2$ //$NON-NLS-3$ |
711 | 711 |
} |
712 | 712 |
catch (RWorkspaceException e) { |
713 |
// TODO Auto-generated catch block |
|
714 |
org.txm.utils.logger.Log.printStackTrace(e); |
|
713 |
Log.printStackTrace(e); |
|
715 | 714 |
} |
716 | 715 |
} |
717 | 716 |
|
... | ... | |
732 | 731 |
} |
733 | 732 |
} |
734 | 733 |
catch (RWorkspaceException e) { |
735 |
// TODO Auto-generated catch block |
|
736 |
org.txm.utils.logger.Log.printStackTrace(e); |
|
734 |
Log.printStackTrace(e); |
|
737 | 735 |
} |
738 | 736 |
} |
739 | 737 |
|
... | ... | |
753 | 751 |
|
754 | 752 |
public void removeCols(int[] cols, boolean removeEmptyLines) throws RWorkspaceException { |
755 | 753 |
removeCols(cols); |
756 |
if (removeEmptyLines) removeEmptyRows(); |
|
754 |
if (removeEmptyLines) { |
|
755 |
removeEmptyRows(); |
|
756 |
} |
|
757 | 757 |
} |
758 | 758 |
|
759 | 759 |
/** |
... | ... | |
783 | 783 |
ArrayList<Integer> removecols = new ArrayList<>(); |
784 | 784 |
// get the empty line index |
785 | 785 |
for (int i = 0; i < colsums.length; i++) { |
786 |
if (colsums[i] == 0) |
|
786 |
if (colsums[i] == 0) {
|
|
787 | 787 |
removecols.add(i); |
788 |
} |
|
788 | 789 |
} |
789 | 790 |
|
790 | 791 |
if (removecols.size() > 0) { |
... | ... | |
792 | 793 |
} |
793 | 794 |
} |
794 | 795 |
catch (REXPMismatchException e) { |
795 |
// TODO Auto-generated catch block |
|
796 |
org.txm.utils.logger.Log.printStackTrace(e); |
|
796 |
Log.printStackTrace(e); |
|
797 | 797 |
} |
798 | 798 |
} |
799 | 799 |
|
... | ... | |
808 | 808 |
ArrayList<Integer> rowIndexes = new ArrayList<>(); |
809 | 809 |
// get the empty line index |
810 | 810 |
for (int i = 0; i < rowsums.length; i++) { |
811 |
if (rowsums[i] == 0) |
|
811 |
if (rowsums[i] == 0) {
|
|
812 | 812 |
rowIndexes.add(i); |
813 |
} |
|
813 | 814 |
} |
814 | 815 |
|
815 | 816 |
if (rowIndexes.size() > 0) { |
... | ... | |
817 | 818 |
} |
818 | 819 |
} |
819 | 820 |
catch (REXPMismatchException e) { |
820 |
// TODO Auto-generated catch block |
|
821 |
org.txm.utils.logger.Log.printStackTrace(e); |
|
821 |
Log.printStackTrace(e); |
|
822 | 822 |
} |
823 | 823 |
} |
824 | 824 |
|
... | ... | |
834 | 834 |
+ " <- " + symbol + "[ -" + ArrayIndex.zeroToOneBasedIndex(row) + ",];"); //$NON-NLS-1$ //$NON-NLS-2$ //$NON-NLS-3$ |
835 | 835 |
} |
836 | 836 |
catch (RWorkspaceException e) { |
837 |
// TODO Auto-generated catch block |
|
838 |
org.txm.utils.logger.Log.printStackTrace(e); |
|
837 |
Log.printStackTrace(e); |
|
839 | 838 |
} |
840 | 839 |
// de la liste rows |
841 | 840 |
} |
... | ... | |
910 | 909 |
|
911 | 910 |
public void removeRows(int[] rows, boolean removeEmptyCols) throws RWorkspaceException { |
912 | 911 |
removeRows(rows); |
913 |
if (removeEmptyCols) removeEmptyCols(); |
|
912 |
if (removeEmptyCols) { |
|
913 |
removeEmptyCols(); |
|
914 |
} |
|
914 | 915 |
} |
915 | 916 |
|
916 | 917 |
/** |
... | ... | |
987 | 988 |
+ "[" + ArrayIndex.zeroToOneBasedIndex(row) + ", " + ArrayIndex.zeroToOneBasedIndex(col) + " ] <- " + value + ";"); //$NON-NLS-1$ //$NON-NLS-2$ //$NON-NLS-3$ //$NON-NLS-4$ |
988 | 989 |
} |
989 | 990 |
catch (RWorkspaceException e) { |
990 |
// TODO Auto-generated catch block |
|
991 |
org.txm.utils.logger.Log.printStackTrace(e); |
|
991 |
Log.printStackTrace(e); |
|
992 | 992 |
} |
993 | 993 |
} |
994 | 994 |
|
... | ... | |
1006 | 1006 |
} |
1007 | 1007 |
String order = "c("; //$NON-NLS-1$ |
1008 | 1008 |
if (reverse) { |
1009 |
for (int i = neworder.size() - 1; i >= 0; i--) |
|
1009 |
for (int i = neworder.size() - 1; i >= 0; i--) {
|
|
1010 | 1010 |
order += "" + (neworder.get(i) + 1) + ", "; //$NON-NLS-1$ //$NON-NLS-2$ |
1011 |
} |
|
1011 | 1012 |
} |
1012 | 1013 |
else { |
1013 |
for (Integer i : neworder) |
|
1014 |
for (Integer i : neworder) {
|
|
1014 | 1015 |
order += "" + (i + 1) + ", "; //$NON-NLS-1$ //$NON-NLS-2$ |
1016 |
} |
|
1015 | 1017 |
} |
1016 | 1018 |
order = order.substring(0, order.length() - 2); |
1017 | 1019 |
order += ")"; //$NON-NLS-1$ |
... | ... | |
1021 | 1023 |
// REXP r2 = rw.eval("rownames("+symbol+") <- rownames(" + symbol + ")[" + order + "];"); //$NON-NLS-1$ //$NON-NLS-2$ //$NON-NLS-3$ |
1022 | 1024 |
} |
1023 | 1025 |
catch (RWorkspaceException e) { |
1024 |
// TODO Auto-generated catch block |
|
1025 |
org.txm.utils.logger.Log.printStackTrace(e); |
|
1026 |
Log.printStackTrace(e); |
|
1026 | 1027 |
} |
1027 | 1028 |
} |
1028 | 1029 |
|
... | ... | |
1040 | 1041 |
+ "<- " + symbol + "[order(" + symbol + "[ ," + (col + 1) + "], decreasing = " + reverse.toString().toUpperCase() + "), ];;"); //$NON-NLS-1$ //$NON-NLS-2$ //$NON-NLS-3$ //$NON-NLS-4$ //$NON-NLS-5$ |
1041 | 1042 |
} |
1042 | 1043 |
catch (RWorkspaceException e) { |
1043 |
// TODO Auto-generated catch block |
|
1044 |
org.txm.utils.logger.Log.printStackTrace(e); |
|
1044 |
Log.printStackTrace(e); |
|
1045 | 1045 |
} |
1046 | 1046 |
} |
1047 | 1047 |
|
... | ... | |
1060 | 1060 |
getRowNames().sort(reverse); |
1061 | 1061 |
} |
1062 | 1062 |
catch (RWorkspaceException e) { |
1063 |
// TODO Auto-generated catch block |
|
1064 |
org.txm.utils.logger.Log.printStackTrace(e); |
|
1063 |
Log.printStackTrace(e); |
|
1065 | 1064 |
} |
1066 | 1065 |
} |
1067 | 1066 |
|
... | ... | |
1081 | 1080 |
+ ", sep=\"" + colseparator + "\");"); //$NON-NLS-1$ //$NON-NLS-2$ |
1082 | 1081 |
} |
1083 | 1082 |
catch (Exception e1) { |
1084 |
org.txm.utils.logger.Log.printStackTrace(e1);
|
|
1083 |
Log.printStackTrace(e1); |
|
1085 | 1084 |
RWorkspace.printLastSafeEvalExpr(); |
1086 | 1085 |
return false; |
1087 | 1086 |
} |
Also available in: Unified diff