search for: fargs

...~ v08_01_up11, data = dataset, xlab = "Dependent", ylab = "Independent #1" ) -- cut -- It is tedious to repeat the statement for all independent variables. Found an alternative, i.e. : -- cut -- mu <- list(5, 10, -3) sigma <- list(1, 5, 10) n <- list(1, 3, 5) fargs <- list(mean = mu, sd = sigma, n = n) fargs %>% purrr::pmap(rnorm) %>% str() -- cut -- I tried to use this for may scatterplot task: -- cut -- var_battery$v08 <- paste0("v08_", formatC(1:8, width = 2, format = "d", flag = "0")) v08_var_labs <- p...

Is there a way of getting the argument list of a function from within that function? For example, something like f <- function(x, y = 3) { fargs <- getFunctionArgList() print(fargs) ## Should be `alist(x, y = 3)' } Thanks, -roger

Dear All, I would like to define a function: f(x,y,z) with three arguments x,y,z, such that: given values for x,y, f(x,y,z) is still a function of z and that I am still allowed to find the root in terms of z when x,y are given. For example: f(x,y,z) = x+y + (x^2-z), given x=1,y=3, f(1,3,z)= 1+3+1-z is a function of z, and then I can use R to find the root z=5. Thank you. -Chee [[alternative

Hello, I am initializing FDR mode and finalizing/flushing the buffers manually. XRay does not log calls from the main thread unless there is a function call after __xray_log_finalize(). This behavior is abnormal since one would expect the trace file to contain all function calls made up to the point when __xray_log_finalize() is called. To demonstrate this behavior, I have taken the test case

Hi, I am trying to install R on my Ultra-10 running Solaris 2.6.1. and got following massege when i configure. # ./configure loading cache ./config.cache checking for a BSD compatible install... /opt/apps/R-0.62.4/etc/install-sh -c checking whether ln -s works... yes checking for ranlib... : checking for bison... no checking for byacc... no checking for ar... no checking for ratfor... no checking

useR's, I want to apply this function to the columns of a data frame: u[u >= range(v)[1] & u <= range(v)[2]] where u is the n column data frame under consideration and v is a data frame of values with the same number of columns as u. For example, v1 <- c(1,2,3) v2 <- c(3,4,5) v3 <- c(2,3,4) v <- as.data.frame(cbind(v1,v2,v3)) uk1 <- seq(min(v1) - .5, max(v1) + .5,

Hi, all. I want to write some functions like glm() so i studied it. In glm.fit(), it calls a fortran subroutine named "dqrfit" to compute least squares solutions to the system x * b = y To learn how "dqrfit" works, I just follow how glm() calls "dqrfit" by my own example, my codes are given below: > qr <- >

...evice_configure req) File "/usr/lib/python2.6/dist-packages/xen/xend/server/SrvDomain.py", line 186, in call return FormFn(fn, args)(req.args) File "/usr/lib/python2.6/dist-packages/xen/xend/Args.py", line 166, in __call__ return self.call_with_form_args(self.fn, fargs, xargs=xargs) File "/usr/lib/python2.6/dist-packages/xen/xend/Args.py", line 138, in call_with_form_args return fn(*params, **keys) File "/usr/lib/python2.6/dist-packages/xen/xend/XendDomainInfo.py", line 1214, in device_configure raise VmError("Device %s not co...

While I think total compatibility is not possible or even very important I have become aware recently of some fairly low level incompatibilities that have rather serious consequences for interchange between systems. Some of these are possibly well known, but I put them on on record here just in case. (I do not expect any action on these, of course, but people may want to note them, and correct

While I think total compatibility is not possible or even very important I have become aware recently of some fairly low level incompatibilities that have rather serious consequences for interchange between systems. Some of these are possibly well known, but I put them on on record here just in case. (I do not expect any action on these, of course, but people may want to note them, and correct

...on that can compute (multiple, group-wise) summary statistics easily, and return them in a tidy data frame with one row for each group. Naming depends on whether ? arguments are named and on some optional arguments. Here is an example. args(df_stats) ## function (formula, data, ..., drop = TRUE, fargs = list(), sep = "_", ## format = c("wide", "long"), groups = NULL, long_names = TRUE, ## nice_names = FALSE, na.action = "na.warn") df_stats(Sepal.Length ~ Species, data = iris, mean, sd, R = range, Q = quantile) ## Species mean_Sepal.Length sd_...

...val = op_method(op, req) File "/usr/lib/python/xen/xend/server/SrvDomain.py", line 47, in op_shutdown val = fn(req.args, {''dom'': self.dom.id}) File "/usr/lib/python/xen/xend/Args.py", line 145, in __call__ return self.call_with_form_args(self.fn, fargs, xargs=xargs) File "/usr/lib/python/xen/xend/Args.py", line 121, in call_with_form_args return fn(*params, **keys) File "/usr/lib/python/xen/xend/XendDomain.py", line 477, in domain_shutdown val = xend.domain_shutdown(dominfo.id, reason, key) File "/usr/lib/py...