search for: rf_asreal

...the R code for seq.default and the C code for seq.int appear to be semantically very similar. My question is whether, in fact, it is intended that behave identically for all inputs. I have found two cases so far where they differ, first that seq.int will coerce a character string to a real (via Rf_asReal) whereas seq.default appears to coerce it to NA and then throws an error: > seq.default("2", "5") Error in seq.default("2", "5") : 'from' cannot be NA, NaN or infinite > seq.int("2", "5") [1] 2 3 4 5 > and second, th...

...seq? is a standard generic with a default method. > ?seq.int? is a primitive which can be much faster but has a few restrictions. > > > I have found two cases so far where they differ, first > > that seq.int will coerce a character string to a real (via > > Rf_asReal) whereas seq.default appears to coerce it to NA > > and then throws an error: > > >> seq.default("2", "5") > > Error in seq.default("2", "5") : 'from' cannot be NA, NaN or infinite > >> seq.int(&quo...

...#39;Description'): ?seq? is a standard generic with a default method. ?seq.int? is a primitive which can be much faster but has a few restrictions. > I have found two cases so far where they differ, first > that seq.int will coerce a character string to a real (via > Rf_asReal) whereas seq.default appears to coerce it to NA > and then throws an error: >> seq.default("2", "5") > Error in seq.default("2", "5") : 'from' cannot be NA, NaN or infinite >> seq.int("2", "5")...

...ric with a default method. >> ?seq.int? is a primitive which can be much faster but has a few restrictions. >> >> > I have found two cases so far where they differ, first >> > that seq.int will coerce a character string to a real (via >> > Rf_asReal) whereas seq.default appears to coerce it to NA >> > and then throws an error: >> >> >> seq.default("2", "5") >> > Error in seq.default("2", "5") : 'from' cannot be NA, NaN or infinite >>...

...ld: 0711-317 ERROR: Undefined symbol: .Rf_endcontext ld: 0711-317 ERROR: Undefined symbol: .Rf_setAttrib ld: 0711-317 ERROR: Undefined symbol: .Rf_unprotect ld: 0711-317 ERROR: Undefined symbol: .R_setX11Routines ld: 0711-317 ERROR: Undefined symbol: .vmaxget ld: 0711-317 ERROR: Undefined symbol: .Rf_asReal ld: 0711-317 ERROR: Undefined symbol: .Rf_isValidString ld: 0711-317 ERROR: Undefined symbol: .Rf_warningcall ld: 0711-317 ERROR: Undefined symbol: .Rf_isString ld: 0711-317 ERROR: Undefined symbol: .Rf_isInteger ld: 0711-317 ERROR: Undefined symbol: .Rf_isLogical ld: 0711-317 ERROR: Undefined symb...

Hi, I would have thought that these two constructions would produce the same result but they do not. Resp <- rbinom(10, 1, 0.5) Stim <- rep(0:1, 5) mm <- model.matrix(~ Stim) Xb <- mm %*% c(0, 1) ifelse(Resp, log(pnorm(Xb)), log(1 - pnorm(Xb))) pnorm(as.vector(Xb), lower.tail = Resp, log.p = TRUE) > ifelse(Resp, log(pnorm(Xb)), log(1 - pnorm(Xb))) [1] -0.6931472 -1.8410216

...-std1 -ieee_with_inexact -I/soft/readline/v4.2.1/include -c nls.c -o nls.o /usr/bin/cc -shared -L/soft/readline/v4.2.1/lib -o nls.so nls.o ld: Warning: Unresolved: fabs sqrt R_finite Rf_error R_GlobalEnv R_NamesSymbol Rf_coerceVector Rf_allocMatrix Rf_allocVector Rf_asInteger Rf_asLogical Rf_asReal Rf_eval Rf_findVar Rf_getAttrib Rf_install Rf_isEnvironment Rf_isFunction Rf_isNewList Rf_isNumeric Rf_isReal Rf_isString Rf_lang1 Rf_lang2 Rf_protect Rf_setAttrib Rf_unprotect LENGTH R_CHAR STRING_ELT VECTOR_ELT SET_VECTOR_ELT REAL R_registerRoutines mkdir -p -- ../../../../library/nls/libs gmake[...