@Override
 public void visit(ExpressionVector vector) {
   List<SEXP> list = Lists.newArrayList();
   for (SEXP exp : vector) {
     list.add(substitute(exp));
   }
   result = new ExpressionVector(list, vector.getAttributes());
 }
Esempio n. 2
0
 private SEXP evaluateExpressionVector(ExpressionVector expressionVector, Environment rho) {
   if (expressionVector.length() == 0) {
     setInvisibleFlag();
     return Null.INSTANCE;
   } else {
     SEXP result = Null.INSTANCE;
     for (SEXP sexp : expressionVector) {
       result = evaluate(sexp, rho);
     }
     return result;
   }
 }