search for: external2

Hi, I am learning R by reading R source code. Here is one question I have about the optim function in R. The context : In the optim.R, after all the prep steps, the main function call call is made via : .External2(C_optim, par, fn1, gr1, method, con, lower, upper). So, it seems to me, to follow what is going on from here, that I should read the optim function in \src\library\stats\src\optim.c where it has this signature : SEXP optim(SEXP call, SEXP op, SEXP args, SEXP rho) I am not sure I follow here : I...

I'm working on linux server: Linux 4.9.0-4-amd64 #1 SMP Debian 4.9.51-1 (2017-09-28) x86_64 GNU/Linux I get error while creating png files. I'm sharing my commands and error while I run those commands: >png("abc", type="cairo") Error in .External2(C_X11, paste0("png::", filename), g$width, g$height, : unable to start device PNG In addition: Warning message: In png("abc", type = "cairo") : unable to open connection to X11 display '' > png("apoeqqplot.png", res=600) Error in .External2(C_X...

...9;m working on linux server: >Linux 4.9.0-4-amd64 #1 SMP Debian 4.9.51-1 (2017-09-28) x86_64 >GNU/Linux > >I get error while creating png files. I'm sharing my commands and error >while I run those commands: > >>png("abc", type="cairo") >Error in .External2(C_X11, paste0("png::", filename), g$width, >g$height, : > unable to start device PNG >In addition: Warning message: >In png("abc", type = "cairo") : unable to open connection to X11 >display '' > >> png("apoeqqplot.png", res=...

I tried installing the 'ks' package from my interactive R session, it failed with the following Erreur dans .External2(C_loadhistory, file) : aucun m?canisme d'historique des commandes disponible Calls: <Anonymous> Ex?cution arr?t?e second line is french for "no command history mechanism available", fouth is "execution stopped". This does not happen when I comment out the following...

...m working on linux server: >Linux 4.9.0-4-amd64 #1 SMP Debian 4.9.51-1 (2017-09-28) x86_64 >GNU/Linux > >I get error while creating png files. I'm sharing my commands and error >while I run those commands: > >>png("abc", type="cairo") >Error in .External2(C_X11, paste0("png::", filename), g$width, >g$height, : > unable to start device PNG >In addition: Warning message: >In png("abc", type = "cairo") : unable to open connection to X11 >display '' > >> png("apoeqqplot.png", re...

...t a > try, but I think progress would be better with more than one contributor. For me, the following fix makes the job : --- nlm.R.old??? 2018-09-25 10:44:49.000000000 +0200 +++ nlm.R??? 2023-02-20 10:46:39.893542531 +0100 @@ -143,14 +143,14 @@ ???? if(check.conv) { ???? val <- tryCatch(.External2(C_zeroin2, function(arg) f(arg, ...), -??? ??? ??? ??? ?? lower, upper, f.lower, f.upper, +??? ??? ??? ??? ?? lower, upper, f.low., f.upp., ???? ??? ??? ??? ?? tol, as.integer(maxiter)), ???? ??? ??? warning = function(w)w) ???? if(inherits(val, "warning")) ???? ??? stop("converg...

...gt;Linux 4.9.0-4-amd64 #1 SMP Debian 4.9.51-1 (2017-09-28) x86_64 >>GNU/Linux >> >>I get error while creating png files. I'm sharing my commands and >>error while I run those commands: >> >>>png("abc", type="cairo") >>Error in .External2(C_X11, paste0("png::", filename), g$width, >>g$height, : >> unable to start device PNG >>In addition: Warning message: >>In png("abc", type = "cairo") : unable to open connection to X11 >>display '' >> >>> png(&q...

...;>Linux 4.9.0-4-amd64 #1 SMP Debian 4.9.51-1 (2017-09-28) x86_64 >>GNU/Linux >> >>I get error while creating png files. I'm sharing my commands and error >>while I run those commands: >> >>>png("abc", type="cairo") >>Error in .External2(C_X11, paste0("png::", filename), g$width, >>g$height, : >> unable to start device PNG >>In addition: Warning message: >>In png("abc", type = "cairo") : unable to open connection to X11 >>display '' >> >>> png(&quo...

...MP Debian 4.9.51-1 (2017-09-28) x86_64 >>>GNU/Linux >>> >>>I get error while creating png files. I'm sharing my commands and >>>error while I run those commands: >>> >>>>png("abc", type="cairo") >>>Error in .External2(C_X11, paste0("png::", filename), g$width, >>>g$height, : >>> unable to start device PNG >>>In addition: Warning message: >>>In png("abc", type = "cairo") : unable to open connection to X11 >>>display '' >>...

...I'm working on linux server: Linux 4.9.0-4-amd64 #1 SMP Debian 4.9.51-1 (2017-09-28) x86_64 GNU/Linux I get error while creating png files. I'm sharing my commands and error while I run those commands: >png("abc", type="cairo") Error in .External2(C_X11, paste0("png::", filename), g$width, g$height, : unable to start device PNG In addition: Warning message: In png("abc", type = "cairo") : unable to open connection to X11 display '' > png("apoeqqplot.png", res=600)...

...View() seems to crash on just about anything. > > View(1:3) > *** stack smashing detected ***: terminated > Aborted (core dumped) > > If I debug(View) I get to the last line of code with nothing obviously > looking pathological: > > Browse[1]> > debug: invisible(.External2(C_dataviewer, x, title)) > Browse[1]> x > $x > [1] "1" "2" "3" > > Browse[1]> title > [1] "Data: 1:3" > Browse[1]> > *** stack smashing detected ***: terminated > Aborted (core dumped) > > > > ==== > R Under...

...kage), and using Hscv.diag function to calculate the bandwidth matrix where this line of code is run: result <- optim(diag(Hstart), scv.mat.temp, method = "Nelder-Mead", control = list(trace = as.numeric(verbose))) Within the optim function, there is a call to an external C function: .External2(C_optim, par, fn1, gr1, method, con, lower, upper) Where Par = (0.339, 0.339), fn1 = function (diagH) { H <- diag(diagH) %*% diag(diagH) if (default.bflag(d = d, n = n)) scvm <- scv.mat(x.star, H, Gs, binned = binned, verbose = FALSE, bin.par = bin.par.star, deriv.order = r) e...

...s weird. Can anyone else reproduce this? View() seems to crash on just about anything. View(1:3) *** stack smashing detected ***: terminated Aborted (core dumped) If I debug(View) I get to the last line of code with nothing obviously looking pathological: Browse[1]> debug: invisible(.External2(C_dataviewer, x, title)) Browse[1]> x $x [1] "1" "2" "3" Browse[1]> title [1] "Data: 1:3" Browse[1]> *** stack smashing detected ***: terminated Aborted (core dumped) ==== R Under development (unstable) (2024-04-24 r86483) Platform: x86_64-pc-lin...

I wrote first cut at unirootR for Martin M and he revised and put in Rmpfr. The following extends Ben's example, but adds the unirootR with trace output. c1 <- 4469.822 c2 <- 572.3413 f <- function(x) { c1/x - c2/(1-x) }; uniroot(f, c(1e-6, 1)) uniroot(f, c(1e-6, 1)) library(Rmpfr) unirootR(f, c(1e-6, 1), extendInt="no", trace=1) This gives more detail on the iterations,

...of whether my R was interactive or not, or if my Linux, ssh, and screen environment had X-Windows properly set up or not. It Just Worked. However, now in R 3.1.0 Patched (2014-04-15 r65398, on Linux), depending on whether I have a good X-Windows connection or not it can fail like so: Error in .External2(C_X11, d$display, d$width, d$height, d$pointsize, : unable to start device X11 Simply wrapping the palette() call in try() of course helps keep that error from breaking the rest of my R start up. However, occasionally the call to palette() will hang for perhaps a minute, unexpectedly lock...

Sorry for the long descritpion of the problem, I''d like to know If I misunderstand something or if I meet an intrinsic limit of my setup. 217.58.51.162 HDSL eth1 - SRV_XP: 192.168.254.10 eth0: 192.168.254.1 -----+------------------+------- 81.121.243.250 ADSL eth3 - I want to allow incoming pptp request (port 1723) to be forwarded to srv_xp

Compare: > quartz(); cat("Should this have generated an error instead?\n") Warning message: In quartz() : Quartz device is not available on this platform Should this have generated an error instead? to: > x11() Error in .External2(C_X11, d$display, d$width, d$height, d$pointsize, : unable to start device X11cairo In addition: Warning message: In x11() : unable to open connection to X11 display '' Wouldn't it make sense that a failed call to quartz() would give an error instead? > sessionInfo() R Under dev...

...uot;) without restarting R such that it reflects the enabling/disabling of X11? BACKGROUND: If I launch R with X11 server disabled (e.g. ssh -X / ssh -Y to remote Linux but forgot to enable Xming on local Windows), then I get: > capabilities("X11") X11 FALSE > x11() Error in .External2(C_X11, d$display, d$width, d$height, d$pointsize, : unable to start device X11cairo In addition: Warning message: In x11() : unable to open connection to X11 display '' So far so good. However, if I then enable the X11 server (e.g. start Xming on Windows), I still get: > capabiliti...

...nd Now suppose you happen to have a variable name that matches an R function name: model.frame(~replicate,data=data.frame(x=1:5)) ## Error in model.frame.default(~replicate, data = data.frame(x = 1:5)) : ## object is not a matrix This happens somewhere inside a .External() call: data <- .External2(C_modelframe, formula, rownames, variables, varnames, extras, extranames, subset, na.action) so I haven't had the heart to track it all the way to its source yet. FWIW this happens whether the function is built-in or user-created. I don't think the possibly forthcoming "well...

Dear both, I have found that names are not treated in the same way in optim() depending on the optimization method (argument method). The example below shows the difference between the Brent method and the L-BFGS-B method. f <- function(x){ y <- x^2;names(y) <-"f(x)";y} optim(10, f, method="Brent", lower=-1, upper=10)$value optim(10, f, method="L-BFGS-B",