library(hgu95av2.db)
  x <- hgu95av2CHRLOC
  ls(x)[1:3]
  exists(ls(x)[1], x)
  exists("titi", x)
  get(ls(x)[1], x)
  x[[ls(x)[1]]]
  x$titi # NULL
  mget(ls(x)[1:3], x)
  eapply(x, length)
  contents(x)
  sample(x, 3)
Run the code above in your browser using DataLab