This message is in MIME format. The first part should be readable text, while the remaining parts are likely unreadable without MIME-aware tools.
--27464147-2109857085-1209372640=:16392 Content-Type: TEXT/PLAIN; charset=utf-8; format=flowed Content-Transfer-Encoding: 8BIT It has already been changed in R-patched, though .... On Mon, 28 Apr 2008, Peter Dalgaard wrote: > [EMAIL PROTECTED] wrote: >> Setting enviroment variable R_DEFAULT_DEVICE causes an error. >> The patch below fixes this. >> > Probably, but it may not be the best fix, so please give your analysis > of the situation. Reproducible example and all that. > > To do your homework for you, the issue seems to be this: > > viggo:~/>R_INTERACTIVE_DEVICE=pdf ~/misc/r-release-branch/BUILD-dist/bin/R > > R version 2.7.0 (2008-04-22) > .... >> plot(0) > Error in plot.new() : no active or default device >> names(options()) > [1] "HTTPUserAgent" "OutDec" > [3] "add.smooth" "bitmapType" > [5] "browser" "check.bounds" > [7] "continue" "contrasts" > [9] "defaultPackages" "device.R_INTERACTIVE_DEVICE" > > OBS!!! > > [11] "device.ask.default" "digits" > ..... > [47] "useFancyQuotes" "verbose" > [49] "warn" "warnings.length" > [51] "width" >> > >> I guess the same goes for R_INTERACTIVE_DEVICE. >> >> >> --- R-2.7.0/src/library/grDevices/R/zzz.R 2008-04-27 >> 13:49:11.000000000 +0200 >> +++ R-2.7.0/src/library/grDevices/R/zzz.R.new 2008-04-27 >> 13:59:37.000000000 +0200 >> @@ -22,7 +22,7 @@ >> extras <- if(.Platform$OS.type == "windows") >> list(windowsTimeouts = c(100L,500L)) else >> list(bitmapType = if(capabilities("aqua")) "quartz" else >> if(capabilities("cairo")) "cairo" else "Xlib") >> - defdev <- Sys.getenv("R_DEFAULT_DEVICE") >> + defdev <- as.character(Sys.getenv("R_DEFAULT_DEVICE")) >> if(!nzchar(defdev)) defdev <- "pdf" >> device <- if(interactive()) { >> intdev <- Sys.getenv("R_INTERACTIVE_DEVICE") >> >> >> >> >> --please do not edit the information below-- >> >> Version: >> platform = i686-pc-linux-gnu >> arch = i686 >> os = linux-gnu >> system = i686, linux-gnu >> status = >> major = 2 >> minor = 7.0 >> year = 2008 >> month = 04 >> day = 22 >> svn rev = 45424 >> language = R >> version.string = R version 2.7.0 (2008-04-22) >> >> Locale: >> [EMAIL PROTECTED];LC_NUMERIC=C;[EMAIL >> PROTECTED];LC_COLLATE=C;LC_MONETARY=C;[EMAIL PROTECTED];[EMAIL >> PROTECTED];LC_NAME=C;LC_ADDRESS=C;LC_TELEPHONE=C;[EMAIL >> PROTECTED];LC_IDENTIFICATION=C >> >> Search Path: >> .GlobalEnv, package:stats, package:graphics, package:utils, >> package:datasets, package:grDevices, package:methods, Autoloads, package:base >> >> ______________________________________________ >> R-devel@r-project.org mailing list >> https://stat.ethz.ch/mailman/listinfo/r-devel >> > > > -- > O__ ---- Peter Dalgaard Ãster Farimagsgade 5, Entr.B > c/ /'_ --- Dept. of Biostatistics PO Box 2099, 1014 Cph. K > (*) \(*) -- University of Copenhagen Denmark Ph: (+45) 35327918 > ~~~~~~~~~~ - ([EMAIL PROTECTED]) FAX: (+45) 35327907 > > ______________________________________________ > R-devel@r-project.org mailing list > https://stat.ethz.ch/mailman/listinfo/r-devel > -- Brian D. Ripley, [EMAIL PROTECTED] 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 272866 (PA) Oxford OX1 3TG, UK Fax: +44 1865 272595 --27464147-2109857085-1209372640=:16392-- ______________________________________________ R-devel@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-devel