public RObject extractRObject() {
try {
return _assignInterface.getObjectFromReference(this);
} catch (RemoteException re) {
throw new RuntimeException(org.kchine.r.server.Utils.getStackTraceAsString(re));
}
}
@Override
public RList getAttributes() {
try {
return _assignInterface.getAttributes(_rObjectIdHolder[0], _slotsPath);
} catch (Exception e) {
throw new RuntimeException(Utils.getStackTraceAsString(e));
}
}
@Override
public void setAttributes(RList attrs) {
try {
_rObjectIdHolder[0] = _assignInterface.setAttributes(_rObjectIdHolder[0], _slotsPath, attrs);
} catch (Exception e) {
throw new RuntimeException(Utils.getStackTraceAsString(e));
}
}
public String toString() {
StringBuffer result = new StringBuffer();
try {
result.append(
"A Reference to an object of Class \"RFunction\" on the R servant <"
+ _assignInterface.getName()
+ "> ["
+ _rObjectIdHolder[0]
+ "/"
+ _slotsPath
+ "]\n");
} catch (java.rmi.RemoteException e) {
e.printStackTrace();
}
return result.toString();
}
