Révision 1775

tmp/org.txm.statsengine.r.core/src/org/txm/statsengine/r/core/RWorkspace.java (revision 1775)
1527 1527 
			}
1528 1528 
			else if (rexp instanceof org.rosuda.REngine.REXPDouble) {
1529 1529 
				if (rexp.isVector()) {
1530 
					return rexp.asDouble();
1530 
					return Arrays.toString(rexp.asDoubles());
1531 1531 
				}
1532 1532 
				else {
1533 
					return Arrays.toString(rexp.asDoubles());
1533 
					return rexp.asDouble();
1534 1534 
				}
1535 1535 
			}
1536 1536 
			else if (rexp instanceof org.rosuda.REngine.REXPInteger) {
1537 1537 
				if (rexp.isVector()) {
1538 
					return rexp.asInteger();
1538 
					return Arrays.toString(rexp.asIntegers());
1539 1539 
				}
1540 1540 
				else {
1541 
					return Arrays.toString(rexp.asIntegers());
1541 
					return rexp.asInteger();
1542 1542 
				}
1543 1543 
			}
1544 1544 
			else if (rexp instanceof org.rosuda.REngine.REXPNull) {

Formats disponibles : Unified diff