similar to: isoreg memory leak?

Full_Name: Petr Klasterecky Version: 1.8.1 OS: Windows XP, Linux Submission from: (NULL) (195.113.27.212) The isoreg() function causes R to crash when called repeatedly. Consider the following simple script: { library(modreg) N <- 10 x <- rnorm(N) print("Original x values:") print(x) for(n in (1:N)){print(y <- isoreg(x[1:n])$yf)} } I am able to run (call) it several

Dear list, As can be seen below, adding a NA to the y values in a call to isoreg results in a segfault. ir4 <- isoreg(1:10, y4 <- c(5, 9, 1:2, 5:8, NA, 8)) Adding missing values to the x values, on the contrary, gives an error, but maybe the error message could be tailored to this particular situation. y <- c(5, 9, 1:2, 5:8, 3, 8) x <- c(1:9, NA) isoreg(x, y) ## error message:

Can someone explain the use of SETLENGTH() and SETTRUELENGTH()? I would like to allocate a vector and reserve some space at the end, so that it appears shorter than the allocated size. So that I can more efficiently append to the vector, without requiring a new copy every time. So I'd like to use SETLENGTH() with a shorter apparent length, and bump this up as needed until I've used the

Full_Name: Benjamin Tyner Version: 2.6.0 (43063) OS: WinXP Submission from: (NULL) (171.161.224.10) At the end of the examples for isoreg, there is cat("R^2 =", formatC(sum(residuals(ir4)^2) / (9*var(y4)), digits=2),"\n") I think this should be cat("R^2 =", formatC(1 - sum(residuals(ir4)^2) / (9*var(y4)), digits=2),"\n" Thanks Ben platform

Dear all, I want to create a function shrinkVector(x) that takes x and truncates it to the first element without copy. With SETLENGTH and SET_TRUELENGTH, I can achieve that. You can find a reproducible example below. But the memory that was freed is not available for other objects afterwards, except if x is a list (VECSXP). Any suggestions? library(inline) ## define the shrinking function

Dear R-devel, A couple of weeks ago I started to use the R C API for package development. Without knowing much about C, I've been able to write some routines sucessfully... until now. My problem consists in dynamically creating a list ("L1") of lists using .Call, the tricky part is that each element of the "mother list" contains two vectors (INTSXP and REALEXP types) with

Hi all, I wish to push a new version of a package (heatmaply). I sent it to winbuild with no issues but after submitting it to CRAN I got an update that it breaks on Debian, see: package heatmaply_0.15.0.tar.gz does not pass the incoming checks automatically, please see the following pre-tests: Windows: <https://win-builder.r-project.org/incoming_pretest/

While working on 'random walk' applications, I got interested in optimizing noisy objective functions. As an (artificial) example, the following is the Rosenbrock function, where Gaussian noise of standard deviation `sd = 0.01` is added to the function value. fn <- function(x) (1+rnorm(1, sd=0.01)) * adagio::fnRosenbrock(x) To smooth out the noise, define another

Hi, in Latex I get the table using: \begin{table}[H] \centering \renewcommand{\arraystretch}{1.3} \setlength{\tabcolsep}{18pt} \begin{tabular}{cc} \hline Idade & Frequ?ncia \\ \hline $18 \vdash 26$ & 11 \\ $26 \vdash 34$ & 8 \\ $34 \vdash 42$ & 26 \\ $42 \vdash 50$ & 20 \\ $50 \vdash 58$ & 23 \\ $58 \vdash 66$ & 30 \\ $66

I would like to have arrow heads at the end of my axes, since I am plotting variable where the absolute amount is irrelevant, there is not supposed to be numbers on the axes. An imperfect example: plot(rnorm(10),bty='l',xaxt='n',yaxt='n',ylab='',xlab='',type='l') abline(h=0) Like this but without, the xaxis and with arrrowheads More like this in

Hi, I'm using R_MakeExternalPtr() to store handles to (COM) objects in a SEXP. The code basically is sexp = R_MakeExternalPtr(handle,R_NilValue,R_NilValue); R_RegisterCFinalizerEx(...); After creating the sexp, LENGTH(sexp) returns some quite large integer value. It seems like an "unitialized" value. Can I safely assume, that an SEXP of type EXTPTRSXP can only contain a single

Before re-inventing the wheel I would like to ask: does anyone know about an optimizer in R which can reliably identify which value of X (Xopt) leads to Y (Yopt) closest to Ytarget in Y <- MonotoneStepFun(X) optionally with the restriction that Yopt <= Ytarget (at least if any Y <= Ytarget, otherwise any Yopt > Ytarget would be the preferred answer) If none is known, I will write

Dear All, I am running Debian testing on my box and I installed latex and R from the standard repositories. I am trying my hands at sweave, but somehow I am experiencing problems (I am trying to use beamer and Sweave). Please see the snippet at the end of the email and saved as report.Rnw. When I run the command $ R CMD Sweave report.Rnw Writing to file report.tex Processing code chunks ...

Hello! I am downloaded last version of speex library and did compile DLL. But I am have not good sound : Please see my code (Delphi) and say me please WHat I am do not right. Or please send me correct compiled DLL and example of correct using SPEEX_MODEID_WB and SPEEX_MODEID_UWB , denoise, and other effects. How I can set MONO mode in decode? My Code: smpRt:=32000; n:=10; encbits:

I need to reliably boot a server from a USB device. Since USB device ordering can be unpredictable, I wrote a simple early-userspace "init" program to find the root FS on the correct USB device & partition. I have "labeled" the root ext2 FS on the USB drive, and the program searches for the label by examining the bytes at a specific offset from the beginning of the

Hello, If I want to see how, say, apply function is written, how would I be able to do that? Just typing "apply" at the prompt does not work. Thank you for help! Sergey

I am trying to transition from Sweave to knitr, but there are a few things about customization of the appearence of R input and output that I did not get yet. Maybe somebody on the list can help me. In my Sweave presentations I used a slanted font for the R input and a normal font for the output, both in a small font. I also indented everything by an extra 2em. All this was achieved by the

Hi: My head is spinning with this latex doc so hopefully after I align my tables to the left of the page my headache are going to be over. I always use: \hspace*{-0.1in} to move my figures horizontally to the left margin of the page but the table below doesn't move at all, but instead it gets sideways. Not sure if \begin{landscape} has something to do with it or is just me. I? hope someone

Hi all, I've got a basic question regarding package documentation and rd.sty. I wrote my first own package, and now I would like to place the documentation into the appendix of another LaTex document. Seemingly I cannot simply \usepackage{Rd}, as this will modify the page-settings of my document. Is there a minimum style file which will just define the environments and commands needed for

I'm trying to write a program that reads an ogg stream and check all the CRC values along the way. But I have big trouble with computing the checksum, or at least I never got checksums that match the one that is in the ogg file. I do set the CRC field in the header to 0 before calculating it. I start with 0 and have no xor at the end. I feed page header with all lacing values and the page