search for: r_posinf

In R, 0 ^ NaN yields Inf. I would have expected NaN or perhaps 0. Is this behaviour intended? >sessionInfo() R version 2.8.0 (2008-10-20) i386-pc-mingw32 locale: LC_COLLATE=English_United States.1252;LC_CTYPE=English_United States.1252;LC_MONETARY=English_United States.1252;LC_NUMERIC=C;LC_TIME=English_United States.1252 attached base packages: [1] stats graphics grDevices utils

Full_Name: Alexandre Da Costa Version: 1.5.1 OS: Windows NT 4 on Virtual PC 4 Submission from: (NULL) (193.253.191.74) I am using Virtual PC 4.0.2 for every day work. I wanted to try connections of R 1.5.1 to Oracle DataBases. But R is running but is not working at all ! The simple commands end with "no finite arguments" error. See following session:

Hi everyone, Has anyone written a parser in Java for either the ASCII or binary format produced by save()? I need to parse a single large 2D array that is structured like this: list( "32609_1" = c(-9549.39231289146, -9574.07159324482, ... ), "32610_2" = c(-6369.12526971635, -6403.99620977124, ... ), "32618_2" = c(-2138.29095689061, -2057.9229403233, ... ),

Full_Name: Albrecht Gebhardt Version: 0.65.0 OS: Digital Unix 4.0E Submission from: (NULL) (212.17.104.62) Plottimg on the Alpha stopped working with 0.65.0. The tickmarks have a length of -Inf and go across the whole plot. A first solution is the following patch: --- src/main/plot.c.alpha-patch Mon Sep 13 01:37:11 1999 +++ src/main/plot.c Mon Sep 13 01:58:16 1999 @@ -832,7 +832,7 @@

...tion is: static Rboolean rsum(double *x, R_xlen_t n, double *value, Rboolean narm) { LDOUBLE s = 0.0; Rboolean updated = FALSE; for (R_xlen_t i = 0; i < n; i++) { if (!narm || !ISNAN(x[i])) { if(!updated) updated = TRUE; s += x[i]; } } if(s > DBL_MAX) *value = R_PosInf; else if (s < -DBL_MAX) *value = R_NegInf; else *value = (double) s; return updated; } In other words, when na.rm=FALSE, that inner for loop: for (R_xlen_t i = 0; i < n; i++) { if (!narm || !ISNAN(x[i])) { if(!updated) updated = TRUE; s += x[i]; } } should e...

...ess it uses the AIX workaround). The fix I suggested to Ralf worked, and will probably be incorporated in 0.65.1 (unless we find a better one). Try replacing the line # define R_FINITE(x) ((x) != R_NaReal) in Arith.h by static int R_FINITE(double x) { return !isnan(x) & (x != R_PosInf) & (x != R_NegInf); } -- Brian D. Ripley, ripley@stats.ox.ac.uk Professor of Applied Statistics, http://www.stats.ox.ac.uk/~ripley/ University of Oxford, Tel: +44 1865 272861 (self) 1 South Parks Road, +44 1865 272860 (secr) Oxford OX1 3TG,...

Full_Name: Oren Cheyette Version: 2.7.2 OS: Win XP Submission from: (NULL) (64.161.123.194) Enter the following at the R command prompt: > sprintf("A %S %S %S XYZ", 1, 1, 1); Note the erroneous capitalized %S instead of %s and the numeric inputs instead of strings. With strings there's no crash - R reports bad format specifications.

...library, one might possible use R_IsNaN instead but this function is not included in libRmath v2.0 and the function R_IsNaNorNA which was used in libRmath v1.9 no longer exists While I am on this topic, there seems to be nothing at all in the standalone libRmath to deal with ISNA() and although R_PosInf and R_NegInf are in the library, they don't seem to me to be declared. Bill Northcott

hi, my environment... > sessionInfo() R version 3.3.2 (2016-10-31) Platform: x86_64-pc-linux-gnu (64-bit) Running under: Debian GNU/Linux 8 (jessie) locale: [1] LC_CTYPE=ja_JP.UTF-8 LC_NUMERIC=C [3] LC_TIME=ja_JP.UTF-8 LC_COLLATE=ja_JP.UTF-8 [5] LC_MONETARY=ja_JP.UTF-8 LC_MESSAGES=ja_JP.UTF-8 [7] LC_PAPER=ja_JP.UTF-8 LC_NAME=C [9] LC_ADDRESS=C

...ifferent size cmeans.c:25: warning: cast to pointer from integer of different size cmeans.c:26: warning: cast to pointer from integer of different size cmeans.c: In function ?cmeans_weighted_median?: cmeans.c:66: warning: implicit declaration of function ?rsort_with_index? cmeans.c:79: error: ?R_PosInf? undeclared (first use in this function) cmeans.c:79: error: (Each undeclared identifier is reported only once cmeans.c:79: error: for each function it appears in.) cmeans.c: In function ?cmeans?: cmeans.c:253: warning: implicit declaration of function ?Rprintf? make: *** [cmeans.o] Error 1 c...

...> } > > > > > > ... > > > > 6C889F1E R.dll:6C889F1E do_sprintf sprintf.c:297 > > > > ... > > sprintf(bit, fmtp, " NaN"); > > else > >> sprintf(bit, fmtp, "NaN"); > > } else if (x =3D=3D R_PosInf) { > > if (strcspn(fmtp, "+") < strlen(fmtp)) > > ... > > > > ______________________________________________ > > R-devel at r-project.org mailing list > > https://stat.ethz.ch/mailman/listinfo/r-devel > > >=20 > --=20 > Brian D. Ripl...

...n, double *value, Rboolean narm) > { > LDOUBLE s = 0.0; > Rboolean updated = FALSE; > for (R_xlen_t i = 0; i < n; i++) { > if (!narm || !ISNAN(x[i])) { > if(!updated) updated = TRUE; > s += x[i]; > } > } > if(s > DBL_MAX) *value = R_PosInf; > else if (s < -DBL_MAX) *value = R_NegInf; > else *value = (double) s; > return updated; > } > > In other words, when na.rm=FALSE, that inner for loop: > > for (R_xlen_t i = 0; i < n; i++) { > if (!narm || !ISNAN(x[i])) { > if(!updated) update...

...> >>> ... >>> >>> 6C889F1E R.dll:6C889F1E do_sprintf sprintf.c:297 >>> >>> ... >>> sprintf(bit, fmtp, " NaN"); >>> else >>>> sprintf(bit, fmtp, "NaN"); >>> } else if (x == R_PosInf) { >>> if (strcspn(fmtp, "+") < strlen(fmtp)) >>> ... >>> >>> ______________________________________________ >>> R-devel at r-project.org mailing list >>> https://stat.ethz.ch/mailman/listinfo/r-devel >>> >> >&gt...

Hello, I installed the new release 0.65.0 of R on our local Solaris system. As I already (and sucessfully) installed the 0.64.0 and 0.64.1 version of R, I hadn't had any trouble during the installation. But as I've started R in order to see the demo I've got horizontal and vertical lines goint to the left and top of the X11 window at each tick (demo ("graphics")). This seems

...method = *tiesmethod; double a = 0; // to avoid uninitialized compiler warning double b, tol, small, absa; Rboolean isna; if (ties_method==1) GetRNGstate(); for (r = 0; r < n_r; r++) { /* first check row for any NAs and find the smallst entry */ small = R_PosInf; if (na_rm){ isna = TRUE; for (c = 0; c < n_c; c++){ a = x[r + c * n_r]; if (!ISNAN(a)) { isna = FALSE; absa = fabs(a); if (absa<small && absa!=0) small = absa;...

...n/vega/astro/local/src/rstat/R-0.63.3/src/librar y/lqs' make[4]: Entering directory `/mn/vega/astro/local/src/rstat/R-0.63.3/src/librar y/lqs/src' gcc -ieee_with_inexact -g -I../../../../include -c lqs.c -o lqs.o ld -shared -lm -o lqs.so lqs.o ld: Warning: Unresolved: unif_rand calloc free R_PosInf seed_in dqrdc2_ dqrsl_ rsort rPsort sqrt seed_out log __exc_add_pc_range_table __exc_add_gp_range __exc_remove_pc_range_table __exc_remove_gp_range make[4]: Leaving directory `/mn/vega/astro/local/src/rstat/R-0.63.3/src/library /lqs/src' make[3]: Leaving directory `/mn/vega/astro/local/src/rsta...

...ga/astro/local/src/rstat/R-0.63.3/src/= librar y/lqs' make[4]: Entering directory `/mn/vega/astro/local/src/rstat/R-0.63.3/src/= librar y/lqs/src' gcc -ieee_with_inexact -g -I../../../../include -c lqs.c -o lqs.o ld -shared -lm -o lqs.so lqs.o ld: Warning: Unresolved: unif_rand calloc free R_PosInf seed_in dqrdc2_ dqrsl_ rsort rPsort sqrt seed_out log __exc_add_pc_range_table __exc_add_gp_range __exc_remove_pc_range_table __exc_remove_gp_range make[4]: Leaving directory `/mn/vega/astro/local/src/rstat/R-0.63.3/src/l= ibrary /lqs/src' make[3]: Leaving directory `/mn/vega/astro/local/src/rs...