I’m trying to modify the function from outside, i.e., when I call the function.
Ken kmna...@gmail.com 914-450-0816 (tel) 347-730-4813 (fax) > On Jun 28, 2016, at 5:07 PM, Greg Snow <538...@gmail.com> wrote: > > Can you edit the source of the function? or are you trying to modify an > existing function without working on the source? > > On Tue, Jun 28, 2016 at 2:46 PM, KMNanus <kmna...@gmail.com > <mailto:kmna...@gmail.com>> wrote: > Thanks for getting back to me. None of them work, because I’m trying to use > the string in the function call - myfun(z, “string”) to replace the empty > space in ggtitle. > > When I call myfun(z, gsub(“______”, “string (or any word)”, myfun), I get an > error msg because gsub is looking for a data frame, not a function. > > Paste or paste0 doesn’t work, either because I still have to replace the > space in ggtitle with something. > > In short, I want to put another argument into the function that will enable > me to call it and fill that space. > > I’m stumped. > > > Ken > kmna...@gmail.com <mailto:kmna...@gmail.com> > 914-450-0816 (tel) > 347-730-4813 (fax) > > <image001.jpg> > >> On Jun 28, 2016, at 3:42 PM, Greg Snow <538...@gmail.com >> <mailto:538...@gmail.com>> wrote: >> >> There are several options. The option that is most like search and >> replace is to use the `sub` or `gsub` function (or similar functions >> in added packages). But you may be able to accomplish what you want >> even simpler by using the `paste`, `paste0`, or `sprintf` functions. >> >> On Tue, Jun 28, 2016 at 12:10 PM, KMNanus <kmna...@gmail.com >> <mailto:kmna...@gmail.com>> wrote: >>> Thanks for getting back to me, I’m sorry if I was unclear. >>> >>> What I’m trying to figure out is the equivalent of “find and replace” in >>> Word. >>> >>> I have a function - >>> >>> myfun <- function(z){ >>> ggplot(df, aes(x,y)+ >>> geom_point() + >>> ggtitle (“_______ quick brown fox jumped over the lazy dog”)} >>> >>> Calling myfun(z) works perfectly. What I’m trying to do is add a string to >>> myfun so that it would read: function(z, “string”){ >>> >>> Then I could call myfun(z, “string”) to replace the space in ggtitle. Is >>> there a straightforward way to do that? >>> >>> Ken >>> kmna...@gmail.com <mailto:kmna...@gmail.com> >>> 914-450-0816 (tel) >>> 347-730-4813 (fax) >>> >>> >>> >>>> On Jun 28, 2016, at 12:20 PM, David Winsemius <dwinsem...@comcast.net >>>> <mailto:dwinsem...@comcast.net>> wrote: >>>> >>>>> >>>>> On Jun 27, 2016, at 6:12 PM, KMNanus <kmna...@gmail.com >>>>> <mailto:kmna...@gmail.com>> wrote: >>>>> >>>>> I’m inexperience but am trying to get my head around using functions to >>>>> make a number of ggplots easier to do. >>>>> >>>>> I have a function that creates a ggplot taking one input variable as an >>>>> argument. The variable name is shorthand for the actual variable >>>>> (variable name = tue, Actual name = Tuesday). Since I want to use the >>>>> actual variable name in ylab and ggtitle, I’d like to add a second >>>>> argument, new.name <http://new.name/>, to the function which would allow >>>>> me to utilize both inputs as arguments but have not been successful. I >>>>> tried creating a function within the function to accomplish this, using >>>>> deparse(substitute(new.name <http://new.name/>))and also using the code >>>>> you see below. >>>>> >>>>> >>>>> myfun <- function(myvar, new.name <http://new.name/>){ >>>>> function(new.name >>>>> <http://new.name/>){return(as.character(substitute(new.name >>>>> <http://new.name/>)))} >>>>> ggplot(b12.2, aes(x= games, y = myvar, col = Group))+ >>>>> geom_point() + >>>>> geom_line()+ >>>>> xlab("Minimum Games" ) + >>>>> ylab(paste(new.name <http://new.name/>, “Average Change"))+ >>>>> ggtitle(new.name <http://new.name/>, "Change \n as a Function of Minimum >>>>> Number of Games”)+ >>>>> theme_bw() >>>>> >>>>> When call myfun(myvar, new.name <http://new.name/>), I get an error msg >>>>> “new.name <http://new.name/> is not found” whether I call new.name >>>>> <http://new.name/> or Tuesday. >>>> >>>> Q1: At the moment we have no idea _how_ you might be "calling" this >>>> function. We also do not know what might be assigned to `myvar` or >>>> `new.name <http://new.name/>` in the calling environment. Sounds unlikely >>>> that you are typing: >>>> >>>> myfun(myvar, new.name <http://new.name/>) ## ?, so was there a >>>> loop/lapply calling method? >>>> >>>> >>>> Q2: You should not imagine that the inner anonymous function would be >>>> altering the value of `new.name <http://new.name/>`. (That function is >>>> only defined and never called, and even if it were called, it would not >>>> change the value of the `new.name <http://new.name/>` in the calling >>>> environment.) >>>> >>>> Since more than 12 hours have passed with no response, we can surmise that >>>> many people have passed the question over after concluding there was an >>>> incomplete problem description. You should post code that can be >>>> cut-pasted into a session and produce the error you are getting. It would >>>> include data setup and a loop or loop equivalent to show how the function >>>> is being called. >>>> >>>> -- >>>> David. >>>> >>>> >>>>> >>>>> I want ggplot to automatically insert Tuesday into ylab and ggtitle. >>>>> >>>>> Can anyone help me with this? Thanks for your patience. >>>>> >>>>> Ken >>>>> kmna...@gmail.com <mailto:kmna...@gmail.com> <mailto:kmna...@gmail.com >>>>> <mailto:kmna...@gmail.com>> >>>>> 914-450-0816 (tel) >>>>> 347-730-4813 (fax) >>>>> >>>>> >>>>> >>>>> ______________________________________________ >>>>> R-help@r-project.org <mailto:R-help@r-project.org> >>>>> <mailto:R-help@r-project.org <mailto:R-help@r-project.org>> mailing list >>>>> -- To UNSUBSCRIBE and more, see >>>>> https://stat.ethz.ch/mailman/listinfo/r-help >>>>> <https://stat.ethz.ch/mailman/listinfo/r-help> >>>>> <https://stat.ethz.ch/mailman/listinfo/r-help >>>>> <https://stat.ethz.ch/mailman/listinfo/r-help>> >>>>> PLEASE do read the posting guide >>>>> http://www.R-project.org/posting-guide.html >>>>> <http://www.r-project.org/posting-guide.html> >>>>> <http://www.r-project.org/posting-guide.html >>>>> <http://www.r-project.org/posting-guide.html>> >>>>> and provide commented, minimal, self-contained, reproducible code. >>>> >>>> David Winsemius >>>> Alameda, CA, USA >>> >>> ______________________________________________ >>> R-help@r-project.org <mailto:R-help@r-project.org> mailing list -- To >>> UNSUBSCRIBE and more, see >>> https://stat.ethz.ch/mailman/listinfo/r-help >>> <https://stat.ethz.ch/mailman/listinfo/r-help> >>> PLEASE do read the posting guide >>> http://www.R-project.org/posting-guide.html >>> <http://www.r-project.org/posting-guide.html> >>> and provide commented, minimal, self-contained, reproducible code. >> >> >> >> -- >> Gregory (Greg) L. Snow Ph.D. >> 538...@gmail.com <mailto:538...@gmail.com> > > > > > -- > Gregory (Greg) L. Snow Ph.D. > 538...@gmail.com <mailto:538...@gmail.com> ______________________________________________ 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.
