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
kmnanus at gmail.com
914-450-0816 (tel)
347-730-4813 (fax)
> On Jun 28, 2016, at 12:20 PM, David Winsemius <dwinsemius at
comcast.net> wrote:
>
>>
>> On Jun 27, 2016, at 6:12 PM, KMNanus <kmnanus at 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, 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))and also using the code you see below.
>>
>>
>> myfun <- function(myvar, new.name){
>> function(new.name){return(as.character(substitute(new.name)))}
>> ggplot(b12.2, aes(x= games, y = myvar, col = Group))+
>> geom_point() +
>> geom_line()+
>> xlab("Minimum Games" ) +
>> ylab(paste(new.name, ?Average Change"))+
>> ggtitle(new.name, "Change \n as a Function of Minimum Number of
Games?)+
>> theme_bw()
>>
>> When call myfun(myvar, new.name), I get an error msg ?new.name is not
found? whether I call 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` in the calling environment. Sounds unlikely that you are typing:
>
> myfun(myvar, 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`. (That function is only defined and never
called, and even if it were called, it would not change the value of the
`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
>> kmnanus at gmail.com <mailto:kmnanus at gmail.com>
>> 914-450-0816 (tel)
>> 347-730-4813 (fax)
>>
>>
>>
>> ______________________________________________
>> R-help at r-project.org <mailto:R-help at 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.
>
> David Winsemius
> Alameda, CA, USA
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 <kmnanus at 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 > kmnanus at gmail.com > 914-450-0816 (tel) > 347-730-4813 (fax) > > > >> On Jun 28, 2016, at 12:20 PM, David Winsemius <dwinsemius at comcast.net> wrote: >> >>> >>> On Jun 27, 2016, at 6:12 PM, KMNanus <kmnanus at 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, 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))and also using the code you see below. >>> >>> >>> myfun <- function(myvar, new.name){ >>> function(new.name){return(as.character(substitute(new.name)))} >>> ggplot(b12.2, aes(x= games, y = myvar, col = Group))+ >>> geom_point() + >>> geom_line()+ >>> xlab("Minimum Games" ) + >>> ylab(paste(new.name, ?Average Change"))+ >>> ggtitle(new.name, "Change \n as a Function of Minimum Number of Games?)+ >>> theme_bw() >>> >>> When call myfun(myvar, new.name), I get an error msg ?new.name is not found? whether I call 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` in the calling environment. Sounds unlikely that you are typing: >> >> myfun(myvar, 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`. (That function is only defined and never called, and even if it were called, it would not change the value of the `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 >>> kmnanus at gmail.com <mailto:kmnanus at gmail.com> >>> 914-450-0816 (tel) >>> 347-730-4813 (fax) >>> >>> >>> >>> ______________________________________________ >>> R-help at r-project.org <mailto:R-help at 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. >> >> David Winsemius >> Alameda, CA, USA > > ______________________________________________ > R-help at 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.-- Gregory (Greg) L. Snow Ph.D. 538280 at gmail.com
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 kmnanus at gmail.com 914-450-0816 (tel) 347-730-4813 (fax)> On Jun 28, 2016, at 3:42 PM, Greg Snow <538280 at 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 <kmnanus at 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 >> kmnanus at gmail.com >> 914-450-0816 (tel) >> 347-730-4813 (fax) >> >> >> >>> On Jun 28, 2016, at 12:20 PM, David Winsemius <dwinsemius at comcast.net> wrote: >>> >>>> >>>> On Jun 27, 2016, at 6:12 PM, KMNanus <kmnanus at 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, 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))and also using the code you see below. >>>> >>>> >>>> myfun <- function(myvar, new.name){ >>>> function(new.name){return(as.character(substitute(new.name)))} >>>> ggplot(b12.2, aes(x= games, y = myvar, col = Group))+ >>>> geom_point() + >>>> geom_line()+ >>>> xlab("Minimum Games" ) + >>>> ylab(paste(new.name, ?Average Change"))+ >>>> ggtitle(new.name, "Change \n as a Function of Minimum Number of Games?)+ >>>> theme_bw() >>>> >>>> When call myfun(myvar, new.name), I get an error msg ?new.name is not found? whether I call 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` in the calling environment. Sounds unlikely that you are typing: >>> >>> myfun(myvar, 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`. (That function is only defined and never called, and even if it were called, it would not change the value of the `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 >>>> kmnanus at gmail.com <mailto:kmnanus at gmail.com> >>>> 914-450-0816 (tel) >>>> 347-730-4813 (fax) >>>> >>>> >>>> >>>> ______________________________________________ >>>> R-help at r-project.org <mailto:R-help at 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. >>> >>> David Winsemius >>> Alameda, CA, USA >> >> ______________________________________________ >> R-help at 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. > > > > -- > Gregory (Greg) L. Snow Ph.D. > 538280 at gmail.com
I?m trying to modify the function from outside, i.e., when I call the function. Ken kmnanus at gmail.com 914-450-0816 (tel) 347-730-4813 (fax)> On Jun 28, 2016, at 5:07 PM, Greg Snow <538280 at 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 <kmnanus at gmail.com <mailto:kmnanus at 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 > kmnanus at gmail.com <mailto:kmnanus at gmail.com> > 914-450-0816 (tel) > 347-730-4813 (fax) > > <image001.jpg> > >> On Jun 28, 2016, at 3:42 PM, Greg Snow <538280 at gmail.com <mailto:538280 at 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 <kmnanus at gmail.com <mailto:kmnanus at 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 >>> kmnanus at gmail.com <mailto:kmnanus at gmail.com> >>> 914-450-0816 (tel) >>> 347-730-4813 (fax) >>> >>> >>> >>>> On Jun 28, 2016, at 12:20 PM, David Winsemius <dwinsemius at comcast.net <mailto:dwinsemius at comcast.net>> wrote: >>>> >>>>> >>>>> On Jun 27, 2016, at 6:12 PM, KMNanus <kmnanus at gmail.com <mailto:kmnanus at 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 >>>>> kmnanus at gmail.com <mailto:kmnanus at gmail.com> <mailto:kmnanus at gmail.com <mailto:kmnanus at gmail.com>> >>>>> 914-450-0816 (tel) >>>>> 347-730-4813 (fax) >>>>> >>>>> >>>>> >>>>> ______________________________________________ >>>>> R-help at r-project.org <mailto:R-help at r-project.org> <mailto:R-help at r-project.org <mailto:R-help at 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 at r-project.org <mailto:R-help at 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. >> 538280 at gmail.com <mailto:538280 at gmail.com> > > > > > -- > Gregory (Greg) L. Snow Ph.D. > 538280 at gmail.com <mailto:538280 at gmail.com>