search for: anggono

...---------------- On Mon, 28/11/16, Martin Maechler <maechler at stat.math.ethz.ch> wrote: Subject: Re: [Rd] ifelse() woes ... can we agree on a ifelse2() ? Cc: R-devel at r-project.org, maechler at stat.math.ethz.ch Date: Monday, 28 November, 2016, 10:00 PM >>>>> Suharto Anggono Suharto Anggono via R-devel <r-devel at r-project.org> >>>>> on Sat, 26 Nov 2016 17:14:01 +0000 writes: ... > On current 'ifelse' code in R: > * The part > ans[nas] <- NA > could be omitted because NA's are already in place....

...------------------ On Sun, 25/9/16, Martin Maechler <maechler at stat.math.ethz.ch> wrote: Subject: Re: [Rd] Undocumented 'use.names' argument to c() Cc: "R-devel" <R-devel at r-project.org> Date: Sunday, 25 September, 2016, 10:14 PM >>>>> Suharto Anggono Suharto Anggono via R-devel <r-devel at r-project.org> >>>>> on Sun, 25 Sep 2016 14:12:10 +0000 writes: >> From comments in >> http://stackoverflow.com/questions/24815572/why-does-function-c-accept-an-undocumented-argument/24815653 >> : The co...

...o: "Martin Maechler" <maechler at stat.math.ethz.ch> @r-project.org Date: Tuesday, 15 August, 2017, 3:55 PM >>>>> Martin Maechler <maechler at stat.math.ethz.ch> >>>>>? ?? on Mon, 14 Aug 2017 11:46:07 +0200 writes: >>>>> Suharto Anggono Suharto Anggono via R-devel <r-devel at r-project.org> >>>>>? ?? on Fri, 11 Aug 2017 17:11:06 +0000 writes: >>>>> Suharto Anggono Suharto Anggono via R-devel <r-devel at r-project.org> >>>>>? ?? on Fri, 11 Aug 2017 17:11:06 +0000 writes: ? ?...

...) -------------------------------------------- On Thu, 18/5/17, Martin Maechler <maechler at stat.math.ethz.ch> wrote: Subject: Re: [Rd] stopifnot() does not stop at first non-TRUE argument Cc: r-devel at r-project.org Date: Thursday, 18 May, 2017, 3:03 PM >>>>> Suharto Anggono Suharto Anggono via R-devel <r-devel at r-project.org> >>>>> on Tue, 16 May 2017 16:37:45 +0000 writes: > switch(i, ...) > extracts 'i'-th argument in '...'. It is like > eval(as.name(paste0("..", i))) . Yes, that's neat....

Here is a patch to function 'stopifnot' that adds 'evaluated' argument and makes 'exprs' argument in 'stopifnot' like 'exprs' argument in 'withAutoprint'. --- stop.R 2019-05-30 14:01:15.282197286 +0000 +++ stop_new.R 2019-05-30 14:01:51.372187466 +0000 @@ -31,7 +31,7 @@ .Internal(stop(call., .makeMessage(..., domain = domain))) }

I am trying once again. By just changing f <- match(xlevs[f], nlevs) to f <- match(xlevs, nlevs)[f] , function 'factor' in R devel could be made more consistent and back-compatible. Why not picking it? -------------------------------------------- On Sat, 25/11/17, Suharto Anggono Suharto Anggono <suharto_anggono at yahoo.com> wrote: Subject: Re: [Rd] Function 'factor' issues To: r-devel at r-project.org Date: Saturday, 25 November, 2017, 6:03 PM >From commits to R devel, I saw attempts to speed up subsetting and 'match', and to cache results of...

...ssion tests. -------------------------------------------- On Sat, 19/8/17, Martin Maechler <maechler at stat.math.ethz.ch> wrote: Subject: Re: [Rd] Issues of R_pretty in src/appl/pretty.c Cc: r-devel at r-project.org Date: Saturday, 19 August, 2017, 7:47 PM >>>>> Suharto Anggono Suharto Anggono via R-devel <r-devel at r-project.org> >>>>> on Fri, 18 Aug 2017 15:44:06 +0000 writes: > Examples similar to > pretty(c(-1,1)*1e300, n = 1e9, min.n = 1) > with smaller 'n': > pretty(c(-1,1)*1e304, n = 1e5, min.n = 1)...

>>>>> Suharto Anggono Suharto Anggono >>>>> on Thu, 30 May 2019 14:45:22 +0000 writes: >>>>> Suharto Anggono Suharto Anggono >>>>> on Thu, 30 May 2019 14:45:22 +0000 writes: > Here is a patch to function 'stopifnot' that adds 'evaluated' argu...

...)) ??? ??? as.call(c(quote(expression), exprs)) -------------------------------------------- On Mon, 4/3/19, Martin Maechler <maechler at stat.math.ethz.ch> wrote: Subject: Re: [Rd] stopifnot Cc: r-devel at r-project.org Date: Monday, 4 March, 2019, 4:59 PM >>>>> Suharto Anggono Suharto Anggono via R-devel >>>>>? ? on Sat, 2 Mar 2019 08:28:23 +0000 writes: >>>>> Suharto Anggono Suharto Anggono via R-devel >>>>>? ? on Sat, 2 Mar 2019 08:28:23 +0000 writes: ? ? > A private reply by Martin made me realize that I was wrong abo...

>>>>> Suharto Anggono Suharto Anggono <suharto_anggono at yahoo.com> >>>>> on Mon, 26 Sep 2016 14:51:11 +0000 writes: > By "an argument named 'use.names' is included for concatenation", I meant something like this, that someone might try. >> c(as.Date("20...

>>>>> Suharto Anggono Suharto Anggono >>>>> on Tue, 5 Mar 2019 17:29:20 +0000 writes: > Another possible shortcut definition: > assert <- function(exprs) > do.call("stopifnot", list(exprs = substitute(exprs), local = parent.frame())) Thank you. I think this is mo...

See https://stat.ethz.ch/pipermail/r-devel/2017-August/074746.html for the origin of the example here. That pretty(c(-1,1)*1e300, n = 1e9, min.n = 1) gave 20 intervals, far from 1e9, but pretty(c(-1,1)*1e300, n = 1e6, min.n = 1) gave 1000000 intervals (on a machine), made me trace through the code to function 'R_pretty' in https://svn.r-project.org/R/trunk/src/appl/pretty.c . *lo is

...4) you would see Error in f(y, z) : x > y is not TRUE instead of the less informative Error: x > y is not TRUE Bill Dunlap TIBCO Software wdunlap tibco.com On Fri, May 19, 2017 at 5:31 AM, Martin Maechler <maechler at stat.math.ethz.ch > wrote: > >>>>> Suharto Anggono Suharto Anggono via R-devel <r-devel at r-project.org> > >>>>> on Thu, 18 May 2017 16:27:09 +0000 writes: > > >> From an example in > > >> http://www.uni-muenster.de/ZIV.BennoSueselbeck/s-html/ > helpfiles/nargs.html > >> ,...

...r is TRUE. -------------------------------------------- On Fri, 15/2/19, Martin Maechler <maechler at stat.math.ethz.ch> wrote: Subject: Re: [Rd] Extract.data.frame.Rd about $.data.frame Cc: r-devel at r-project.org Date: Friday, 15 February, 2019, 4:15 PM >>>>> Suharto Anggono Suharto Anggono via R-devel >>>>> on Sun, 10 Feb 2019 16:33:25 +0000 writes: > In R devel, data.frame method of '$' has been removed, but this part of "Details" section of Extract.data.frame.Rd still implies existence of the method. > The \code{da...

I found this part in the documentation of 'factor'. 'factor(x, exclude=NULL)' applied to a factor is a no-operation unless there are unused levels: in that case, a factor with the reduced level set is returned. If 'exclude' is used it should also be a factor with the same level set as 'x' or a set of codes for the levels to be excluded.

...: "Martin Maechler" <maechler at stat.math.ethz.ch> @r-project.org Date: Saturday, 13 August, 2016, 4:29 AM >>>>> Martin Maechler <maechler at stat.math.ethz.ch> >>>>> on Fri, 12 Aug 2016 10:12:01 +0200 writes: >>>>> Suharto Anggono Suharto Anggono via R-devel <r-devel at r-project.org> >>>>> on Thu, 11 Aug 2016 16:19:49 +0000 writes: >> I stand corrected. The part "If set to 'NULL', it implies >> 'useNA="always"'." is even in the documentation i...

>>>>> Suharto Anggono Suharto Anggono via R-devel <r-devel at r-project.org> >>>>> on Thu, 18 May 2017 16:27:09 +0000 writes: >> From an example in >> http://www.uni-muenster.de/ZIV.BennoSueselbeck/s-html/helpfiles/nargs.html >> , number of arguments in '......

Previous mentions: - https://stat.ethz.ch/pipermail/r-devel/2017-July/074723.html - https://stat.ethz.ch/pipermail/r-devel/2017-August/074737.html The NEWS item corresponding to PR#17284 is in "CHANGES in R-devel". However, fix for PR#17284 is already included in R 3.4.2 beta.

In?function?'Summary.Date'?in?dates.R?, ..1 could?be?used?instead?of ...elt(1L) In?function?'format.POSIXlt'?in?datetime.R?, unlist(unclass(x)[1L:3L],?use.names=FALSE) could?be?used?instead?of unlist(`names<-`(unclass(x)[1L:3L],?NULL)) Also, the fragment secs <- x$sec[f0]; secs <- secs[is.finite(secs)] could be put inside if(np?>=?1L)

>>>>> Suharto Anggono Suharto Anggono via R-devel <r-devel at r-project.org> >>>>> on Fri, 11 Aug 2017 17:11:06 +0000 writes: >>>>> Suharto Anggono Suharto Anggono via R-devel <r-devel at r-project.org> >>>>> on Fri, 11 Aug 2017 17:11:06 +0000 writes:...