define $ right parameter with a variable in R

Question

I would like to pass a variable to the binary operator $.

Let's say I have this

> levels(diamonds$cut)
[1] "Fair"      "Good"      "Very Good" "Premium"   "Ideal" 

Then I want to make a function that takes as parameter the selector for $

my_helper <- function (my_param) {
  levels(diamonds$my_param)
}

But this doesn't work

> my_helper(cut)
NULL

> my_helper("cut")
NULL

Answer 1

You cannot access components of an object without having access to the object itself, which is why your my_helper() fails.

It seems that you are a little confused about R objects, and I would strongly recommend a decent introductory texts. Some good free ones at the CRAN sites, and there are also several decent books. And SO had a number of threads on this as e.g.

• http://stackoverflow.com/questions/192369/books-for-learning-the-r-language
• http://stackoverflow.com/questions/420296/what-are-some-good-books-web-resources-and-projects-for-learning-r
• http://stackoverflow.com/questions/1204043/good-intro-books-for-r

Answer 2

Hi,

Try something like this:

dat = data.frame(one=rep(1,10), two=rep(2,10), three=rep(3,10))
myvar="one"
dat[,names(dat)==myvar]

This should return the first column/variable of the data frame dat

dat$one --> [1] 1 1 1 1 1 1 1 1 1 1

Answer 3

Use [[ instead of $. x$y is short hand for x[["y"]].

my_helper <- function (my_param) {
  levels(diamond[[my_param]])
}
my_helper("cut")