非常新手(对Java)问题:
我在localhost上打开了一个Rserve连接(http://www.rforge.net/Rserve/),我想使用REngine客户端(Rserve包中的src / client / java-new)连接到它。
我需要做些什么才能让“RTest.java”(位于src / client / java-new / Rserve;粘贴在下面)进行编译?
我认为我需要编译org.rosuda。*库。我怎么能用Eclipse 3.5做到这一点?我尝试将“src / client / java-new”文件夹复制到我的Java项目的“src”目录中,右键单击Eclipse - >构建路径 - >用作源文件夹。但我不认为这足以创建“org.rosuda”包,因为我没有看到任何地方创建的“org / rosuda”目录结构(Eclipse中那些不祥的红线不会消失)。
最近有人这么做,小心提供指针?非常感谢。
import org.rosuda.REngine.*;
import org.rosuda.REngine.Rserve.*;
class TestException extends Exception {
public TestException(String msg) { super(msg); }
}
public class test {
public static void main(String[] args) {
try {
RConnection c = new RConnection();
System.out.println(">>"+c.eval("R.version$version.string").asString()+"<<");
{
System.out.println("* Test string and list retrieval");
RList l = c.eval("{d=data.frame(\"huhu\",c(11:20)); lapply(d,as.character)}").asList();
int cols = l.size();
int rows = l.at(0).length();
String[][] s = new String[cols][];
for (int i=0; i<cols; i++) s[i]=l.at(i).asStrings();
System.out.println("PASSED");
}
{
System.out.println("* Test NA/NaN support in double vectors...");
double R_NA = Double.longBitsToDouble(0x7ff00000000007a2L);
// int R_NA_int = -2147483648; // just for completeness
double x[] = { 1.0, 0.5, R_NA, Double.NaN, 3.5 };
c.assign("x",x);
String nas = c.eval("paste(capture.output(print(x)),collapse='\\n')").asString();
System.out.println(nas);
if (!nas.equals("[1] 1.0 0.5 NA NaN 3.5"))
throw new TestException("NA/NaN assign+retrieve test failed");
System.out.println("PASSED");
}
{
System.out.println("* Test assigning of lists and vectors ...");
RList l = new RList();
l.put("a",new REXPInteger(new int[] { 0,1,2,3}));
l.put("b",new REXPDouble(new double[] { 0.5,1.2,2.3,3.0}));
System.out.println(" assign x=pairlist");
c.assign("x", new REXPList(l));
System.out.println(" assign y=vector");
c.assign("y", new REXPGenericVector(l));
System.out.println(" assign z=data.frame");
c.assign("z", REXP.createDataFrame(l));
System.out.println(" pull all three back to Java");
REXP x = c.parseAndEval("x");
System.out.println(" x = "+x);
x = c.eval("y");
System.out.println(" y = "+x);
x = c.eval("z");
System.out.println(" z = "+x);
System.out.println("PASSED");
}
{
System.out.println("* Test support for logicals ... ");
System.out.println(" assign b={true,false,true}");
c.assign("b", new REXPLogical(new boolean[] { true, false, true }));
REXP x = c.parseAndEval("b");
System.out.println(" " + ((x != null) ? x.toDebugString() : "NULL"));
if (!x.isLogical() || x.length() != 3)
throw new TestException("boolean array assign+retrieve test failed");
boolean q[] = ((REXPLogical)x).isTRUE();
if (q[0] != true || q[1] != false || q[2] != true)
throw new TestException("boolean array assign+retrieve test failed (value mismatch)");
System.out.println(" get c(TRUE,FLASE,NA)");
x = c.parseAndEval("c(TRUE,FALSE,NA)");
System.out.println(" " + ((x != null) ? x.toDebugString() : "NULL"));
if (!x.isLogical() || x.length() != 3)
throw new TestException("boolean array NA test failed");
boolean q1[] = ((REXPLogical)x).isTRUE();
boolean q2[] = ((REXPLogical)x).isFALSE();
boolean q3[] = ((REXPLogical)x).isNA();
if (q1[0] != true || q1[1] != false || q1[2] != false ||
q2[0] != false || q2[1] != true || q2[2] != false ||
q3[0] != false || q3[1] != false || q3[2] != true)
throw new TestException("boolean array NA test failed (value mismatch)");
}
{ // regression: object bit was not set for Java-side generated objects before 0.5-3
System.out.println("* Testing functionality of assembled S3 objects ...");
// we have already assigned the data.frame in previous test, so we jsut re-use it
REXP x = c.parseAndEval("z[2,2]");
System.out.println(" z[2,2] = " + x);
if (x == null || x.length() != 1 || x.asDouble() != 1.2)
throw new TestException("S3 object bit regression test failed");
System.out.println("PASSED");
}
{ // this test does a pull and push of a data frame. It will fail when the S3 test above failed.
System.out.println("* Testing pass-though capability for data.frames ...");
REXP df = c.parseAndEval("{data(iris); iris}");
c.assign("df", df);
REXP x = c.eval("identical(df, iris)");
System.out.println(" identical(df, iris) = "+x);
if (x == null || !x.isLogical() || x.length() != 1 || !((REXPLogical)x).isTrue()[0])
throw new TestException("Pass-through test for a data.frame failed");
System.out.println("PASSED");
}
{ // factors
System.out.println("* Test support of factors");
REXP f = c.parseAndEval("factor(paste('F',as.integer(runif(20)*5),sep=''))");
System.out.println(" f="+f);
System.out.println(" isFactor: "+f.isFactor()+", asFactor: "+f.asFactor());
if (!f.isFactor() || f.asFactor() == null) throw new TestException("factor test failed");
System.out.println(" singe-level factor used to degenerate:");
f = c.parseAndEval("factor('foo')");
System.out.println(" isFactor: "+f.isFactor()+", asFactor: "+f.asFactor());
if (!f.isFactor() || f.asFactor() == null) throw new TestException("single factor test failed (not a factor)");
if (!f.asFactor().at(0).equals("foo")) throw new TestException("single factor test failed (wrong value)");
System.out.println(" test factors with null elements contents:");
c.assign("f", new REXPFactor(new RFactor(new String[] { "foo", "bar", "foo", "foo", null, "bar" })));
f = c.parseAndEval("f");
if (!f.isFactor() || f.asFactor() == null) throw new TestException("factor assign-eval test failed (not a factor)");
System.out.println(" f = "+f.asFactor());
f = c.parseAndEval("as.factor(c(1,'a','b',1,'b'))");
System.out.println(" f = "+f);
if (!f.isFactor() || f.asFactor() == null) throw new TestException("factor test failed (not a factor)");
System.out.println("PASSED");
}
{
System.out.println("* Lowess test");
double x[] = c.eval("rnorm(100)").asDoubles();
double y[] = c.eval("rnorm(100)").asDoubles();
c.assign("x", x);
c.assign("y", y);
RList l = c.parseAndEval("lowess(x,y)").asList();
System.out.println(" "+l);
x = l.at("x").asDoubles();
y = l.at("y").asDoubles();
System.out.println("PASSED");
}
{
// multi-line expressions
System.out.println("* Test multi-line expressions");
if (c.eval("{ a=1:10\nb=11:20\nmean(b-a) }\n").asInteger()!=10)
throw new TestException("multi-line test failed.");
System.out.println("PASSED");
}
{
System.out.println("* Matrix tests\n matrix: create a matrix");
int m=100, n=100;
double[] mat=new double[m*n];
int i=0;
while (i<m*n) mat[i++]=i/100;
System.out.println(" matrix: assign a matrix");
c.assign("m", mat);
c.voidEval("m<-matrix(m,"+m+","+n+")");
System.out.println("matrix: cross-product");
double[][] mr=c.parseAndEval("crossprod(m,m)").asDoubleMatrix();
System.out.println("PASSED");
}
{
System.out.println("* Test serialization and raw vectors");
byte[] b = c.eval("serialize(ls, NULL, ascii=FALSE)").asBytes();
System.out.println(" serialized ls is "+b.length+" bytes long");
c.assign("r", new REXPRaw(b));
String[] s = c.eval("unserialize(r)()").asStrings();
System.out.println(" we have "+s.length+" items in the workspace");
System.out.println("PASSED");
}
{ // string encoding test (will work with Rserve 0.5-3 and higher only)
System.out.println("* Test string encoding support ...");
String t = "ひらがな"; // hiragana (literally, in hiragana ;))
c.setStringEncoding("utf8");
// -- Just in case the console is not UTF-8 don't display it
//System.out.println(" unicode text: "+t);
c.assign("s", t);
REXP x = c.parseAndEval("nchar(s)");
System.out.println(" nchar = " + x);
if (x == null || !x.isInteger() || x.asInteger() != 4)
throw new TestException("UTF-8 encoding string length test failed");
// we cannot really test any other encoding ..
System.out.println("PASSED");
}
} catch (RserveException rse) {
System.out.println(rse);
} catch (REXPMismatchException mme) {
System.out.println(mme);
mme.printStackTrace();
} catch(TestException te) {
System.err.println("** Test failed: "+te.getMessage());
te.printStackTrace();
} catch (Exception e) {
e.printStackTrace();
}
}
}
答案 0 :(得分:2)
我无法帮助您解决Java问题,除了注意到在我的Linux机器上,只需调用make
即可:
/tmp/java-new$ make
javac -d . -source 1.4 -target 1.4 MutableREXP.java REngineException.java REngine.java REXPDouble.java REXPEnvironment.java REXPExpressionVector.java REXPFactor.java REXPGenericVector.java REXPInteger.java REXP.java REXPLanguage.java REXPList.java REXPLogical.java REXPMismatchException.java REXPNull.java REXPRaw.java REXPReference.javaREXPS4.java REXPString.java REXPSymbol.java REXPUnknown.java REXPVector.java RFactor.java RList.java
jar fc REngine.jar org
rm -rf org
javac -d . -cp REngine.jar Rserve/RConnection.java Rserve/RFileInputStream.java Rserve/RFileOutputStream.java Rserve/RserveException.java Rserve/RSession.java Rserve/protocol/jcrypt.java Rserve/protocol/REXPFactory.java Rserve/protocol/RPacket.java Rserve/protocol/RTalk.java
Note: Rserve/protocol/REXPFactory.java uses unchecked or unsafe operations.
Note: Recompile with -Xlint:unchecked for details.
jar fc Rserve.jar org
rm -rf org
与您提到的示例目录一样 - 它在我的Linux机器上构建正常,只是说'make'。我没有使用Eclipse,也无法帮助解决这个问题。
C ++示例也运行良好(虽然我需要调整Makefile来构建它们)。
您可能需要向Rosuda列表索取Rserv。
答案 1 :(得分:1)
是的,的确如此。像Dirk指示的那样编译JAR,然后在Eclipse中右键单击 - &gt;添加到构建路径,并创建org.rosuda。*包,并可以像示例中一样导入。
答案 2 :(得分:1)
FWIW JAR文件也可以直接从Rserve网站获得: http://www.rforge.net/Rserve/files/
是的,“make”就是你需要运行来从源创建JAR文件(适用于任何平台,包括Windows)。