The R Project SVN R

Rev

Rev 76182 | Rev 79255 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 76182 Rev 76885
Line 33... Line 33...
33 
options(show.error.messages = TRUE)
 33 
options(show.error.messages = TRUE)
34 
## keep in sync with PrintDefaults() in  ../../main/print.c :
 34 
## keep in sync with PrintDefaults() in  ../../main/print.c :
35 
options(scipen = 0)
 35 
options(scipen = 0)
36 
options(max.print = 99999)# max. #{entries} in internal printMatrix()
 36 
options(max.print = 99999)# max. #{entries} in internal printMatrix()
37 
options(add.smooth = TRUE)# currently only used in 'plot.lm'
 37 
options(add.smooth = TRUE)# currently only used in 'plot.lm'
- 
 
 38 
 
- 
 
 39 
if(isFALSE(as.logical(Sys.getenv("_R_OPTIONS_STRINGS_AS_FACTORS_")))) {
- 
 
 40 
    options(stringsAsFactors = FALSE)
- 
 
 41 
} else {
38 
options(stringsAsFactors = TRUE)
 42 
    options(stringsAsFactors = TRUE)
- 
 
 43 
}
- 
 
 44 
 
39 
if(!interactive() && is.null(getOption("showErrorCalls")))
 45 
if(!interactive() && is.null(getOption("showErrorCalls")))
40 
    options(showErrorCalls = TRUE)
 46 
    options(showErrorCalls = TRUE)
41 
 
 47 
 
42 
local({dp <- Sys.getenv("R_DEFAULT_PACKAGES")
 48 
local({dp <- Sys.getenv("R_DEFAULT_PACKAGES")
43 
       if(identical(dp, "")) ## it fact methods is done first
 49 
       if(identical(dp, "")) ## it fact methods is done first