How to use

add

method

in

org.rosuda.REngine.RList

public void insertElementAt(Object obj, int index) { add(index, obj); }
public void addElement(Object obj) { add(obj); }

public void putAll(Map t) {
if (t==null) return;
// NOTE: this if branch is dead since RList cannot inherit from Map
if (t instanceof RList) { // we need some more sophistication for RLists as they may have null-names which we append
  RList l = (RList) t;
  if (names==null) {
  addAll(l);
  return;
  }
  int n = l.size();
  int i = 0;
  while (i < n) {
  String key = l.keyAt(i);
  if (key==null)
    add(l.at(i));
  else
    put(key, l.at(i));
  i++;
  }
} else {
  Set ks = t.keySet();
  Iterator i = ks.iterator();
  while (i.hasNext()) {
  Object key = i.next();
  put(key, t.get(key));
  }
}
}

public void putAll(Map t) {
if (t==null) return;
// NOTE: this if branch is dead since RList cannot inherit from Map
if (t instanceof RList) { // we need some more sophistication for RLists as they may have null-names which we append
  RList l = (RList) t;
  if (names==null) {
  addAll(l);
  return;
  }
  int n = l.size();
  int i = 0;
  while (i < n) {
  String key = l.keyAt(i);
  if (key==null)
    add(l.at(i));
  else
    put(key, l.at(i));
  i++;
  }
} else {
  Set ks = t.keySet();
  Iterator i = ks.iterator();
  while (i.hasNext()) {
  Object key = i.next();
  put(key, t.get(key));
  }
}
}

public void addElement(Object obj) { add(obj); }
public void removeElementAt(int index) { remove(index); }

public void putAll(RList t) {
if (t == null) return;
RList l = (RList) t;
if (names==null) {
  addAll(l);
  return;
}
int n = l.size();
int i = 0;
while (i < n) {
  String key = l.keyAt(i);
  if (key == null)
  add(l.at(i));
  else
  put(key, l.at(i));
  i++;
}
}

public void insertElementAt(Object obj, int index) { add(index, obj); }
public void addElement(Object obj) { add(obj); }

public void putAll(RList t) {
if (t == null) return;
RList l = (RList) t;
if (names==null) {
  addAll(l);
  return;
}
int n = l.size();
int i = 0;
while (i < n) {
  String key = l.keyAt(i);
  if (key == null)
  add(l.at(i));
  else
  put(key, l.at(i));
  i++;
}
}

public void addElement(Object obj) { add(obj); }
public void removeElementAt(int index) { remove(index); }

public static REXP asCall(REXP what, REXP[] args) {
  RList l = new RList();
  l.add(what);
  for (int i = 0; i < args.length; i++) l.add(args[i]);
  return new REXPLanguage(l);
}
public static REXP asCall(String name, REXP[] args) {

public Object put(Object key, Object value) {
if (key==null) {
  add(value);
  return null;
}
if (names != null) {
  int p = names.indexOf(key);
  if (p >= 0)
  return super.set(p, value);
}
int i = size();
super.add(value);
if (names==null)
  names = new Vector(i+1);
while (names.size() < i) names.add(null);
names.add(key);
return null;
}

public Object put(Object key, Object value) {
if (key==null) {
  add(value);
  return null;
}
if (names != null) {
  int p = names.indexOf(key);
  if (p >= 0)
  return super.set(p, value);
}
int i = size();
super.add(value);
if (names==null)
  names = new Vector(i+1);
while (names.size() < i) names.add(null);
names.add(key);
return null;
}

    if (nf.cont.isSymbol() || nf.cont.isString()) name = nf.cont.asString();
  if (name==null) l.add(lc.cont);
  else l.put(name, lc.cont);
o = headf.parseREXP(buf, o);
int elIndex = rootList.size();
rootList.add(headf.cont);

    if (nf.cont.isSymbol() || nf.cont.isString()) name = nf.cont.asString();
  if (name==null) l.add(lc.cont);
  else l.put(name, lc.cont);
o = headf.parseREXP(buf, o);
int elIndex = rootList.size();
rootList.add(headf.cont);