[R] Why don't the comments appear in the function?

[Bert Gunter]

I do not see this behavior.

f <- function(x){
   ## a comment
   2
}

g <- list(a =2, fun =f)

> g
$a
[1] 2

$fun
function(x){
   ## a comment
   2
}

> g[[2]]
function(x){
   ## a comment
   2
}
> g[2]
$fun
function(x){
   ## a comment
   2
}

Cheers,
Bert

Bert Gunter

"The trouble with having an open mind is that people keep coming along and
sticking things into it."
-- Opus (aka Berkeley Breathed in his "Bloom County" comic strip )


On Mon, Nov 25, 2019 at 7:03 AM <bickis using math.usask.ca> wrote:

> I have made a list in which each element is a function.   If I print
> individual elements of the list, then the function code is shown along
> with embedded comments.  However, if I print the list or sublist, then the
> function code is shown without comments.   Why (and how) are the comments
> hidden?
>
> >flist[[3]]
> function(y,brackets,rates){
>         # Calculates before-tax income required to realized value y
>
> ints<-c(0,cumsum(diff(brackets)*rates[1:(length(rates)-1)]))-brackets*rates
>         x<-(y+ints)/(1-rates)
>         x[sum(x>brackets)]
> }
>
>
> >flist[3]
> $btv
> function (y, brackets, rates)
> {
>     ints <- c(0, cumsum(diff(brackets) * rates[1:(length(rates) -
>         1)])) - brackets * rates
>     x <- (y + ints)/(1 - rates)
>     x[sum(x > brackets)]
> }
>
> I am running R 3.3.2 on Mac OS X  10.10.5
>
> Mik Bickis
>
> ______________________________________________
> R-help using 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.
>

	[[alternative HTML version deleted]]