similar to: migration to common runtime?

I see some code in R to attach finalizers to external pointer references (Register[C]Finalizer). Anyone have an example of how to code the finalizer? R_RegisterCFinalizer accepts a C function, but I can't see how to get it to operate on the pointer, since the pointer is not passed to the function when its called. RegisterFinalizer takes an R closure, but how is it called from R (tried

I'm doing convolutions in the frequency domain and need to know the layout of the Fourier modes returned by fft. (This is leading up to a more involved question about moment generating functions, but I need to know if I've got this part correct first.) I think in 1D the pattern is: 0 1 2 3 -2 1 (even) 0 1 2 3 -3 2 1 (odd) In 2D is it simply (for a square matrix): 0 1 2 -1 (horizontal)

I seem to remember something about an "internal" keyword for R doc files. How do we use it? Tim -- Timothy H. Keitt Department of Ecology and Evolution State University of New York at Stony Brook Stony Brook, New York 11794 USA Phone: 631-632-1101, FAX: 631-632-7626 http://life.bio.sunysb.edu/ee/keitt/ -.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-

Its not clear from the documentation whether one should do \keyword[key1, key2} or \keyword{key1} \keyword{key2} in .Rd files. I believe the latter is correct. (At least 'R CMD check' complains when given the first version.) It would help to make this explicit in the R extension writing docs. Tim -- Timothy H. Keitt Department of Ecology and Evolution State University of New

I have an application where I need to preserve object attributes across calls to 'lapply'. The current definition is: lapply <- function (X, FUN, ...) { FUN <- match.fun(FUN) if (!is.list(X)) X <- as.list(X) rval <- .Internal(lapply(X, FUN)) names(rval) <- names(X) return(rval) } Would it make sense to replace names(rval) <- names(X)

Can a C function wrapped with .Call return void? Or must it return a valid SEXP? Thnx. Tim -- Timothy H. Keitt Department of Ecology and Evolution State University of New York at Stony Brook Stony Brook, New York 11794 USA Phone: 631-632-1101, FAX: 631-632-7626 http://life.bio.sunysb.edu/ee/keitt/ -.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.- r-devel mailing

I'm revisiting the R/S DBI package and was wondering if there is any plan to implement package name spaces in R/S. I've taken to the habit of prepending a few characters to function names in packages to avoid collisions, e.g., dbConnect(). An alternative would be DBI::connect() (s/::/preferred/) which in some ways I find more pleasing. Not having thought about it in detail, it seems pretty

This is just an idea for comment. Perl6, the upcoming version of Perl has separated out the runtime into a virtual machine called Parrot. There are already several small languages (one is C-like, one is Java-like and one is BASIC-like) that target Parrot and given the popularity of Perl its likely that others may attempt to target it too. If R could interface easily with Parrot then it might be

Hello, I am trying to make the switch from SAS, and I have a fairly elemental problem with syntax using the nlme package for analyzing mixed models. There was a previous question on this topic posted to this list, so I apologize for redundancy, but I didn't understand the advice given to that inquiry. The model I want to run has the following factors: Host (fixed) Sire (random) Dam

Hi Everyone, I posted a similar question about a week ago, but haven't gotten any replies -- I'm afraid that's because my previous question was too vague. Let me try again with a more specific question, and I hope someone can help. NOTE, I know I should be using the newer lme4 package, I just haven't had a chance to update my version of R yet, so the question below relates

I've been putting together a package that defined generic methods for database access. The packages is called "Rdbi." It borrows as much as possible from existing database packages / proposals. I'd like to start a discussion about the proposed interface. Here's what I've come up with so far: # # Rdbi: connectionMethods.R # dbConnect <- function(dbObj, ...)

Thanks Arpith for this pointer but it did not contain what I was looking for. However, I solved my issue by finding that the BitCastInst used when outlining OpenMP parallel region offers a method for retrieving the original value within the bitcast via stripPointerCasts(). So what I did to retrieve omp_outlined..45 is: //bitcast is the third argument of __kmpc_fork_call Value *vcall =

Thanks for your reply. Yes, I was about to recurse over the use list of the argument in the called function. I did not want to pursue that because with this solution, I am going to implement the interprocedural part myself and was wondering if that was not already done. I was not also 100% sure that this will work for any type of arguments. If, based on your response, this is my only solution

Hello, I have been using the USE class to access the use-def chains of different values. However, what I have noticed is that the set of users of a particular value is limited for the appearance of that variable in the current function. How can I get the interprocedural use of a particular value? For example, if a variable *a* is used as an argument in a function call *foo*, the USE analysis

Hi, I got error messeges when I try to install RMySQL. The version of MySQL installed on my Debian is 4.0.12. Error messages were about the location of /include and /lib of MySQL distribution. Final error messages were; usr/bin/ld: cannot find -lz Any tips or advices? Thanks -- Sung-youn Kim -------------- Dept. of Political Science Stony Brook University (SUNY at Stony Brook) Office:

Hi, A question. When I run gelman.diag and gelman.plot with mcmc lists obtained from MCMCregress, the results are following. > post.R <- MCMCregress(Size~Age+Status, data = data, burnin = 5000, mcmc = 100000, + thin = 10, verbose = FALSE, beta.start = NA, sigma2.start = NA, + b0 = 0, B0 = 0, nu = 0.001, delta = 0.001) > post1.R <- MCMCregress(Size~Age+Status, data

Hello, The third argument of the OpenMP runtime call __kmpc_fork_call is the outlined function resulting from omp parallel directive; this is of type kmpc_micro. I can get this argument as an LLVM value by using (callInst->getArgOperand...), but once I get this value, i am stuck in knowing its class type. An example of this value can be: void (i32*, i32*, ...)* bitcast (void (i32*, i32*,

Full_Name: Tim Keitt Version: 1.4 OS: Linux Submission from: (NULL) (129.49.19.70) I think this code in 'ts' is incorrect: if (is.matrix(data) || is.data.frame(data)) { nseries <- ncol(data) ndata <- nrow(data) dimnames(data) <- list(NULL, names) } since > x <- data.frame(matrix(rnorm(100),ncol=10)) > names(x) [1] "X1"

I saw the latest parrot release notice on LWN this week and randomly wondered the Perl6 native call interface was like compared to the horrific mess that is Perl5 XS. The answer is that it is a thing of beauty ! Here is the libguestfs hello world example in Perl6 $ dd if=/dev/zero of=guest.img bs=1M count=100 $ mke2fs guest.img $ cat guestfs.p6 use NativeCall; say "Defining stubs";

Hi there, perl6 offers with the NativeCall package a great tool to implement other languages into perl scripts. This has already been done with python, C(++) and perl5. For my use cases - lots of data munging and statistical analyses (climatology/meteorology) - it would be perfect to parse data and call/run models from perl6 and then to do plotting and analyses in R. I saw R does have some