Displaying 2 results from an estimated 2 matches for "mvalid".
Did you mean:
valid
2005 Jul 19
2
using argument names (of indeterminate number) within a function
...hat seems to contain the solution to my problem, but I am stuck because
sapply(match.call()[-1], deparse) gives me a vector of strings and I
don't know how to use the names in this vector in the cbind() function.
Up to now my (clearly deficit) function looks like:
test <- function(..., mvalid=1)
{
args = sapply(match.call()[-1], deparse)
# and here, I don't know how the vector names in args
# can be used in the cbind() function to follow:
#
# temp <- cbind( ???
if (mvalid > 1)
{
# here it goes on
}
}
Ultimately, I want that the function can be called like
test(x1...
2010 Mar 14
1
Segfault Problem c++ R interface (detailed)
...ioContext,
const std::vector<double>& inX,
const std::vector<double>& inF)
{
assert(inX.size() == inF.size());
unsigned int lNbrEval = 0;
for(unsigned int i=0; i<ioPopulation.size(); ++i) {
if(ioPopulation[i].mValid) continue;
double lQuadErr = 0.0;
for(unsigned int j=0; j<inX.size(); ++j) {
ioContext.mPrimitiveMap["X"]->setValue(&inX[j]);
double lResult = 0.0;
ioPopulation[i].interpret(&lResult, ioContext);
double lErr = lResult - inF[j];
lQuadErr...