similar to: Default Generic function for: args(name, default = TRUE)

?.S3methods f <- function()(2) > length(.S3methods(f)) [1] 0 > length(.S3methods(print)) [1] 206 There may be better ways, but this is what came to my mind. -- Bert On Wed, Mar 8, 2023 at 11:09?AM Leonard Mada via R-help < r-help at r-project.org> wrote: > Dear R-Users, > > I want to change the args() function to return by default the arguments > of the default

Dear Gregg, Thank you for the fast response. I believe though that isGeneric works only for S4-functions: isGeneric("plot") # FALSE I still try to get it to work. Sincerely, Leonard On 3/8/2023 9:13 PM, Gregg Powell wrote: > Yes, there is a way to check if a function is generic. You can use the isGeneric function to check if a function is generic. Here's an updated version

Dear Rich, It depends how the data is generated. Although I am not an expert in ecology, I can explain it based on a biomedical example. Certain variables are generated geometrically (exponentially), e.g. MIC or Titer. MIC = Minimum Inhibitory Concentration for bacterial resistance Titer = dilution which still has an effect, e.g. serially diluting blood samples; Obviously, diluting the

Dear R Users, Are there any tools to extract the function names called by reverse-dependencies? I would like to group these functions using clustering methods based on the co-occurrence in the reverse-dependencies. Utility: It may be possible to split complex packages into modules with fewer reverse-dependencies. Package pkgdepR may offer some of the functionality; but I did not have time to

If one makes the reasonable assumption that Pct is much larger than Cutoff, sorting Cutoff is the expensive part e.g O(nlog2(n) for Quicksort (n = length Cutoff). I believe looping is O(n^2). Jeff's approach using findInterval may be faster. Of course implementation details matter. -- Bert On Mon, Oct 16, 2023 at 4:41?AM Leonard Mada <leo.mada at syonic.eu> wrote: > > Dear

Dear Jason, The code could look something like: dummyData = data.frame(Tract=seq(1, 10, by=1), ?? ?Pct = c(0.05,0.03,0.01,0.12,0.21,0.04,0.07,0.09,0.06,0.03), ?? ?Totpop = c(4000,3500,4500,4100,3900,4250,5100,4700,4950,4800)) # Define the cutoffs # - allow for duplicate entries; by = 0.03; # by = 0.01; cutoffs <- seq(0, 0.20, by = by) # Create a new column with cutoffs dummyData$Cutoff

Dear R-Users, I noticed that *read* is not a generic function. Although it could benefit from the functionality available for generic functions: read = function(file, ...) UseMethod("read") methods(read) ?# [1] read.csv???? read.csv2??? read.dcf???? read.delim read.delim2? read.DIF???? read.fortran ?# [8] read.ftable? read.fwf???? read.socket? read.table The users would still

My mistake! It does actually something else, which is incorrect. One could still use (although the code is more difficult to read): subset(tmp <- table(sample(1:10, 100, T)), tmp > 10) Sincerely, Leonard On 10/21/2023 10:26 PM, Leonard Mada wrote: > Dear List Members, > > There was recently an issue on R-devel (which I noticed only very late): >

Dear Akshay, The best response was given by Andrew. "{...}" is not a closure. This is unusual for someone used to C-type languages. But I will try to explain some of the rationale. In the case that "{...}" was a closure, then external variables would need to be explicitly declared before the closure (in order to reuse those values): intermediate = c() { ??? intermediate

Dear members of the R Development Team, I am looking for people with a deep understanding of R internals to assist in bridging R to OpenOffice. While R is a state of the art statistical environment, less experienced users often find it difficult to work with R. Therefore, I believe that a bridge between R and a spreadsheet program will make this transition less painful. I sincerely believe

Dear list members, Every "modern" OS comes with dozens of useless fonts, so that the current font drop-down list in most programs is overcrowded with fonts one never will use. Selecting a useful font becomes a nightmare. In an attempt to ease the selection of useful fonts, I began looking into sorting fonts using some statistical techniques. I summed my ideas on the OpenOffice.org

Dear Jason, I do not think that the solution based on aggregate offered by GPT was correct. That quasi-solution only aggregates for every individual level. As I understand, you want the cumulative sum. The idea was proposed by Bert; you need only to sort first based on the cutoff (e.g. using an ordered factor). And then only extract the last value for each level. If Pct is unique, than you

Dear List Members, There was recently an issue on R-devel (which I noticed only very late): https://stat.ethz.ch/pipermail/r-devel/2023-October/082943.html It is possible to use subset as well, almost as initially stated: subset(table(sample(1:5, 100, T)), table > 10) # Error in table > 10 : #? comparison (>) is possible only for atomic and list types subset(table(sample(1:5, 100,

Dear Emily, Using a look-behind solves the split problem in this case. (Note: Using Regex is in most/many cases the simplest solution.) str = c("leucocyten + gramnegatieve staven +++ grampositieve staven ++", "leucocyten ? grampositieve coccen +") tokens = strsplit(str, "(?<=[-+])\\s++", perl=TRUE) PROBLEM The current expression does NOT work for a different

Dear Konrad, I presume that the system can be written as follows, where h0, d0, ga0, kga and kd are given: err1 = h + hd + hga - h0; err2 = d + hd - d0; err3 = ga + hga - ga0; err4 = hga - kga*h*ga; err5 = hd - kd*h*d; All error terms should be zero. Do you need (a) the symbolic solution or (b) is a numeric solution fine? I do not have any experience with yacas or caracas. But see below. ###

Fit NLE - was: [R] computer algebra in R Original post: https://stat.ethz.ch/pipermail/r-help/2023-November/478619.html Dear Kornad, I think I have started to understand what you try to achieve. The problem is to fit a NLE and compute the parameters of the NL-Eq. I have included the R Help-list back in the loop, as I am not an expert in optimization. Goal: y ~ I0 + IHD * hd + ID * d; where: y

I agree, this is a good idea and would be very helpful in interactive contexts. I have a draft patch implementing this feature here: https://github.com/r-devel/r-svn/pull/122 (Append ?.patch? to the URL to get a raw patch.) Regards, Tomasz > On Mar 31, 2023, at 2:11 PM, Karolis K <karolis.koncevicius at gmail.com> wrote: > > Hello, > > In the current R-devel @ is S3

Dear R-Users, Did anyone follow more closely the SARS Cov-2 lineages? I have done a quick check of Cov-2 mutations on the list downloaded from NCBI (see GitHub page below); but it seems that the list contains the cumulative mutations only for B.1 => B.1.1, but not after the B.1.1 branch: # B.1 => B.1.1 seems cumulative diff.lineage("B.1.1", "B.1", data=z) # but B.1.1

Dear R-List Members, I am looking for collaborators to further develop the BioShapes almost-package. I added a brief description below. A.) BioShapes (Almost-) Package The aim of the BioShapes quasi-package is to facilitate the generation of graphical objects resembling biological and chemical entities, enabling the construction of diagrams based on these objects. It currently includes

Dear Richard, I wrote s small shiny app to improve the search for CRAN-packages. It can be installed from GitHub: https://github.com/discoleo/PackageBrowser Searching for "(?<![- ]cat)astro|sun" yields 19 packages. A few (2 or 3) are unrelated. The remaining may be interesting, e.g. suntools, suncalc, astroFns. Sincerely, Leonard [[alternative HTML version deleted]]