Displaying 1 result from an estimated 1 matches for "getoptionscipen".
2003 May 02
2
Suppressing Scientific Notation
...<= *mi) { /* IFF it needs less space : "F" (Fixpoint) format */
---
> if (mF <= *mi + R_print.scipen) { /* IFF less space : "F"(Fixpt) fmt */
diff -r R-1.7.0/src/main/options.c R-1.7.0.mod/src/main/options.c
52a53
> * "scipen"
136a138,140
> int GetOptionSciPen(SEXP rho) {
> return asInteger(GetOption(install("scipen"), rho));
> }
235a240,243
> SET_TAG(v, install("scipen"));
> SETCAR(v, ScalarInteger(0));
> v = CDR(v);
>
374a383,386
> else if (streql(CHAR(namei), "scipen")) {
>...