I am trying to write a function that will graph a variable of a dataset or
a variable from a subset of the data. My function is as follows:

graphics<-function(dat, var, graph, varname, val, subset){
  if(subset==1) {
    data<-mySubset(dat=dat,varname=varname,val=val)
  }else if(subset!=1){
    data<-(dat)
  }
  if(graph==1) {
    with(data, boxplot(var), main = paste("Vertical box plot of",
myfunc(dat), "variable", myfunc(var), xlab = myfunc(var)))
  }else if(graph==2){
    with(data, boxplot(var), horizontal=TRUE, main = paste("Horizontal
box plot of", myfunc(dat), "variable", myfunc(var), xlab =
myfunc(var)))
  }else if(graph==3){
    hist(var, main="Histogram of", myfunc(var))
  }}

I included "subset" as a parameter for the function, so that subset=1 would
tell the function to subset, and any other value will use the full dataset.
However, when I run the function with the following expression (bolts is
the dataset, SPEED1 is the variable, value=3)

graphics(bolts, bolts$SPEED1, graph=3, bolts$SPEED1, 3, 1)

I receive this error message: Error in eval(substitute(expr), data, enclos
= parent.frame()) : invalid 'envir' argument of type 'logical'

Does anyone know why this is, or if there is something wrong with my code?
Thanks!

-- 
*Alexandra Hua *
Yale University | MPH Candidate Class of 2016
Chronic Disease Epidemiology

        [[alternative HTML version deleted]]

______________________________________________
R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

Reply via email to