My profile.site file is :
# Things you might want to change
# options(papersize="a4")
# options(editor="notepad")
# options(pager="internal")
# set the default help type
# options(help_type="text")
# options(help_type="html")
# set a CRAN mirror
local({r <- getOption("repos")
r["CRAN"] <- "http://cran.skazkaforyou.com"
options(repos=r)})
# set library paths
aaa <- strsplit(R.home(),"R-")[[1]][1]
.libPaths(c(paste(aaa,"cran",sep=""),paste(aaa,"Others",sep="")))
# set for 'jags' , 'WinBUGS' , 'Sweave' , 'EBImage' , 'JGR'
aa <- strsplit(R.home(),"R")[[1]][1]
local({
Sys.setenv("JAGS_HOME"=paste(aa,"R/JAGS-2.2.0",sep=""))
Sys.setenv("GTK_BASEPATH"=paste(aa,"R/GTK",sep=""))
Sys.setenv("R_HOME"=paste(aa,"R/R-2.12.1",sep=""))
Sys.setenv("R_LIBS"=paste(aa,"R/Cran",sep=""))
Sys.setenv("DYLD_LIBRARY_PATH"=paste(aa,"R/R-2.12.1/bin/i386",sep=""))
PathNew <- paste(aa,"R/GTK/bin;",aa,"R/ImageMagick;",Sys.getenv("PATH"),";",aa,"PortableUSB/PortableApps/MikeTex/miktex/bin",sep="")
Sys.setenv("DirWinBugs"=paste(aa,"PortableUSB/PortableApps/WinBUGS14",sep=""))
Sys.setenv("PATH"=PathNew)
#
})
Any ideas what can be wrong?
Thanks
R.Heberto Ghezzo Ph.D.
Montreal - Canada