I tried editing the corExp function (added a line) within the nlme
environment with the following code, but it looks like my declaration did
not have any effect. I am guessing it is locked some how. Is there an easy
way to do this or am I treading into complicated waters? (I just picked up R
a year ago, and I don't have any experience in development. Willing to
learn.)
> assignInNamespace("corExp",
+ function (value = numeric(0), form = ~1, nugget = FALSE, metric =
c("euclidean",
+ "maximum", "manhattan"), fixed = FALSE)
+ {
+ cat("corExp\n") # I ADDED THIS LINE HERE
+ attr(value, "formula") <- form
+ attr(value, "nugget") <- nugget
+ attr(value, "metric") <- match.arg(metric)
+ attr(value, "fixed") <- fixed
+ class(value) <- c("corExp", "corSpatial", "corStruct")
+ value
+ },
+ environment(corExp))
> corExp
function (value = numeric(0), form = ~1, nugget = FALSE, metric =
c("euclidean",
"maximum", "manhattan"), fixed = FALSE)
{
attr(value, "formula") <- form
attr(value, "nugget") <- nugget
attr(value, "metric") <- match.arg(metric)
attr(value, "fixed") <- fixed
class(value) <- c("corExp", "corSpatial", "corStruct")
value
}
<environment: namespace:nlme>
On Mon, Apr 26, 2010 at 10:46 PM, Michael Steven Rooney <
michael.s.roo...@gmail.com> wrote:
> Thanks.
>
> How do I make my function visible to others? Will assignInNamespace do
> that?
>
> On Mon, Apr 26, 2010 at 10:23 PM, Gabor Grothendieck <
> ggrothendi...@gmail.com> wrote:
>
>> See ?assignInNamespace
>>
>> On Mon, Apr 26, 2010 at 9:49 PM, Michael Steven Rooney
>> <michael.s.roo...@gmail.com> wrote:
>> > Hi,
>> >
>> > I am trying to place my own functions in the nlme environment:
>> >
>> > The following statement works:
>> >
>> > environment(coef.corSPT) <-
>> environment(getS3method("coef","corSpatial"))
>> >
>> > but this one returns an error:
>> >
>> > environment(get("coef<-.corSPT")) <-
>> > environment(getS3method("coef<-","corSpatial"))
>> > Error in environment(get("coef<-.corSPT")) <-
>> > environment(getS3method("coef<-", :
>> > target of assignment expands to non-language object
>> >
>> > What should I do?
>> >
>> > Thanks.
>> >
>> > Mike
>> >
>> > [[alternative HTML version deleted]]
>> >
>> > ______________________________________________
>> > R-help@r-project.org mailing list
>> > 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.
>> >
>>
>
>
[[alternative HTML version deleted]]
______________________________________________
R-help@r-project.org mailing list
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.
