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.