search for: izmirlian

Because functions get called and therefore, the calling sequence matters. It?s just protecting you from yourself, but as someone pointed out, there?s a way to silence such notes. G From: Herv? Pag?s <hpages.on.github at gmail.com> Sent: Tuesday, February 6, 2024 2:40 PM To: Izmirlian, Grant (NIH/NCI) [E] <izmirlig at mail.nih.gov>; Duncan Murdoch <murdoch.duncan at gmail.com>; r-devel at r-project.org Subject: Re: [EXTERNAL] Re: [Rd] NOTE: multiple local function definitions for ?fun? with different formal arguments On 2/6/24 11:19, Izmirlian, Grant (NIH/NCI) [E]...

...s: toto <- function(mode) { if (mode == 1) fun <- function(a, b, ...) a*b else fun <- function(u, v, w) (u + v) / w fun } to make sure that toto() returns functions that accept the same minimal number of arguments. /Henrik On Tue, Feb 6, 2024 at 1:15?PM Izmirlian, Grant (NIH/NCI) [E] via R-devel <r-devel at r-project.org> wrote: > > Because functions get called and therefore, the calling sequence matters. It?s just protecting you from yourself, but as someone pointed out, there?s a way to silence such notes. > G > > > From: Herv? Pag...

Thanks. Workarounds are interesting but... what's the point of the NOTE in the first place? H. On 2/4/24 09:07, Duncan Murdoch wrote: > On 04/02/2024 10:55 a.m., Izmirlian, Grant (NIH/NCI) [E] via R-devel > wrote: >> Well you can see that yeast is exactly weekday you have.? The way out >> is to just not name the result > > I think something happened to your explanation... > >> >> toto <- function(mode) >> { >> ????...

On 04/02/2024 10:55 a.m., Izmirlian, Grant (NIH/NCI) [E] via R-devel wrote: > Well you can see that yeast is exactly weekday you have. The way out is to just not name the result I think something happened to your explanation... > > toto <- function(mode) > { > ifelse(mode == 1, > function(a,b) a...

Well you can see that yeast is exactly weekday you have. The way out is to just not name the result toto <- function(mode) { ifelse(mode == 1, function(a,b) a*b, function(u, v, w) (u + v) / w) } ________________________________ From: Grant Izmirlian <izmirlidroid at gmail.com> Date: Sun, Feb 4, 2024, 10:44 AM To: "Izmirlian, Grant (NIH/NCI) [E]" <izmirlig at mail.nih.gov> Subject: Fwd: [EXTERNAL] R-devel Digest, Vol 252, Issue 2 Hi, I just ran into this 'R CMD check' NOTE for the first time: * checking R code f...

...ilently ignore the typo print(m = 2). >>> >>> Martin Morgan >>> >>> From: R-devel <r-devel-bounces at r-project.org> on behalf of Henrik Bengtsson <henrik.bengtsson at gmail.com> >>> Date: Tuesday, February 6, 2024 at 4:34?PM >>> To: Izmirlian, Grant (NIH/NCI) [E] <izmirlig at mail.nih.gov> >>> Cc: r-devel at r-project.org <r-devel at r-project.org> >>> Subject: Re: [Rd] [EXTERNAL] Re: NOTE: multiple local function definitions for ?fun? with different formal arguments >>> Here's a dummy example...

...g, INSTALLING again, this time works. We are able to call .C("trian", ...) by hand inside of R, but then when we uncomment out the call in the .R file, it throws the error again. We've even retyped that portion of code, we've even dos2unix 'd everything. Any thoughts? Grant Izmirlian, Ph.D. Mathematical Statistician izmirlig at mail.nih.gov Delivery Address: 9609 Medical Center Dr, RM 5E130 Rockville MD 20850 Postal Address: BG 9609 RM 5E130 MSC 9789 9609 Medical Center Dr Bethesda, MD 20892-9789 ofc: 240-276-7025 cell: 240-888-7367 fax: 240-276-7845 [[alternative HT...

...gonal (n_i + q) x q with the missing (n_i + q) x n_i portion producing the orthogonal square matrix mentioned in the text? I tried appending the n_i x n_i identity matrix to the block diagonal, but this doesn't work as the resulting likelihood is insensitive to the variance parameters. Grant Izmirlian NCI

...zation of the above that will work given a vector of 'p' cumulative probabilities: qtl <- function(p, x, w) { if(length(p)==1) ans <- qtl.one(p, x, w) if(length(p) >1) ans <- sapply(p, FUN=qtl.one, x=x,w=w) ans } ________________________________ From: "Izmirlian, Grant (NIH/NCI) [E]" <izmirlig at mail.nih.gov> Date: Mon, Jan 29, 2024, 3:55 AM To: "Izmirlian, Grant (NIH/NCI) [E]" <izmirlig at mail.nih.gov> Subject: Re: [R] DescTools::Quantile Greetings, I am having a problem with DescTools::Quantile (a function computing quantil...

...s been implemented in C. Its a neater way to carry stuff around and I am guessing would make future implementation easier. Because of its inherent redundancy from the users standpoint, it isn't something to send to CRAN. However, I was wondering whether anyone is interested in a copy? Grant Izmirlian NCI

Full_Name: Grant Izmirlian Version: 2.2.0 OS: SuSe Linux version 9.2 Submission from: (NULL) (156.40.34.177) Sorry about the last submission, my bug-fix had an error in it because ifelse doesn't vectorize. I'll repost with the correct bug-fix. ----------------------------------------------------------------------...

As I have previously asked, in response to a similar question: Is this a homework problem? cheers, Rolf Turner rolf at math.unb.ca

...me %,% " <- " %,% var.val eval(cmd) assign(var.name, var.val, globalenv()) } } Next, assuming the data.frame listed in the previous posting, 'df' exists in your workspace, the call jingjiangyan(bb ~ aa, data=df) would produce the desired results. Cheers, Grant Izmirlian -- ????? ?????????

...al (n_i + q) x q with the missing (n_i + q) x n_i portion producing the orthogonal square matrix mentioned in the text? I tried appending the n_i x n_i identity matrix to the block diagonal, but this doesn't work as the resulting likelihood is insensitive to the variance parameters. Grant Izmirlian NCI

I'm fairly astute at C and R but new to parallelization. Would someone be willing to provide help in the form of a simple example that parallelizes an R function from the inside of a C routine? If so, write me back at izmirlig at mail.nih.gov Thanks!

Hi -- there are lots of replies --I have not read them all, if someone else suggested this, sorry for duplication. This is similar to the suggestion using mapply, but not specific to matrices. In fact it's a kludge that applies to many settings. You 'sapply' over the index 1:2, and pass a, b as arguments: a <- c(1,4) b <- c(5,8) sapply(1:2, FUN=function(x, a, b)a[x]:b[x],

Hi all, For those interested, while scanning /. tonight, I came across a posting which referred to a new editorial in the November 2007 Notices of the American Mathematical Society: Open Source Mathematical Software by David Joyner and William Stein http://www.ams.org/notices/200710/tx071001279p.pdf Although brief, it makes for interesting reading. Regards, Marc Schwartz

> From: Hin-Tak Leung > > Izmirlian, Grant (NIH/NCI) wrote: > <snipped> > > The only interesting feature is that the tree structure has been > > implemented in C. Its a neater way to carry stuff around and I am > > guessing would make future implementation easier. > > > > Because of its inhere...

...a compound object class for linking individuals calls to PwrGSD to components of a list that are linked to an indexing dataframe for reference purpose. I appologize for a lengthy note, but attach a quite informative example below. Best Regards, Grant Izmirlian Mathematical Statistician Division of Cancer Prevention US National Cancer Institute 1-(301)496-7519 izmirlig at mail.nih.gov ????? ????????? --------------------------------------------------------------------------------- tlook <- c(7.14, 8.14, 9.14, 1...

...a compound object class for linking individuals calls to PwrGSD to components of a list that are linked to an indexing dataframe for reference purpose. I appologize for a lengthy note, but attach a quite informative example below. Best Regards, Grant Izmirlian Mathematical Statistician Division of Cancer Prevention US National Cancer Institute 1-(301)496-7519 izmirlig at mail.nih.gov ????? ????????? --------------------------------------------------------------------------------- tlook <- c(7.14, 8.14, 9.14, 1...