I have been developing a new package (TinnRcom) to avoid the necessity of any script (as below) in the Rprofile.site file related to the use of Tinn-R Editor and R:
#=============================================================== # Tinn-R: necessary packages and functions # Tinn-R: >= 2.4.1.1 with TinnR package >= 1.0.3 #=============================================================== # Set the URL of the preferred repository, below some examples: options(repos='http://cran.at.r-project.org/') # Austria/Wien #options(repos='http://cran-r.c3sl.ufpr.br/') # Brazil/PR #options(repos='http://cran.fiocruz.br/') # Brazil/RJ #options(repos='http://www.vps.fmvz.usp.br/CRAN/') # Brazil/SP #options(repos='http://brieger.esalq.usp.br/CRAN/') # Brazil/SP library(utils) # Check necessary packages necessary <- c('TinnR', 'svSocket', 'formatR') installed <- necessary %in% installed.packages()[, 'Package'] if (length(necessary[!installed]) >=1) install.packages(necessary[!installed]) # Load packages library(TinnR) library(svSocket) # Uncoment the two lines below if you want Tinn-R to always start R at start-up # (Observation: check the path of Tinn-R.exe) options(IDE='C:/Tinn-R/bin/Tinn-R.exe') trStartIDE() # Short paths .trPaths <- paste(paste(Sys.getenv('APPDATA'), '\\Tinn-R\\tmp\\', sep=''), c('', 'search.txt', 'objects.txt', 'file.r', 'selection.r', 'block.r', 'lines.r', 'reformat-input.r', 'reformat-output.r'), sep='') library(Matrix) library(cluster) library(Hmisc) #=============================================================== For this it is necessary to put the object trPaths in the new TinnRcom package. I make this as follows in the folder TinnRcom/R/trPaths.R: trPaths <- paste(paste(Sys.getenv('APPDATA'), '\\Tinn-R\\tmp\\', sep=''), c('', 'search.txt', 'objects.txt', 'file.r', 'selection.r', 'block.r', 'lines.r', 'reformat-input.r', 'reformat-output.r'), sep='') The NAMESPACE file is as below: import(utils, tcltk, Hmisc, R2HTML) importFrom(formatR, tidy.source) importFrom(svSocket, evalServer) export( trArgs, trComplete, trCopy, trExport, trObjList, trObjSearch, trPaths, trStartIDE) S3method(trExport, default) S3method(trExport, data.frame) S3method(trExport, matrix) After to load the package > library(TinnRcom) the result is always: > trPaths [1] "\\Tinn-R\\tmp\\" "\\Tinn-R\\tmp\\search.txt" [3] "\\Tinn-R\\tmp\\objects.txt" "\\Tinn-R\\tmp\\file.r" [5] "\\Tinn-R\\tmp\\selection.r" "\\Tinn-R\\tmp\\block.r" [7] "\\Tinn-R\\tmp\\lines.r" "\\Tinn-R\\tmp\\reformat-input.r" [9] "\\Tinn-R\\tmp\\reformat-output.r" When should be: > trPaths [1] "C:\\Users\\jcfaria\\AppData\\Roaming\\Tinn-R\\tmp\\" [2] "C:\\Users\\jcfaria\\AppData\\Roaming\\Tinn-R\\tmp\\search.txt" [3] "C:\\Users\\jcfaria\\AppData\\Roaming\\Tinn-R\\tmp\\objects.txt" [4] "C:\\Users\\jcfaria\\AppData\\Roaming\\Tinn-R\\tmp\\file.r" [5] "C:\\Users\\jcfaria\\AppData\\Roaming\\Tinn-R\\tmp\\selection.r" [6] "C:\\Users\\jcfaria\\AppData\\Roaming\\Tinn-R\\tmp\\block.r" [7] "C:\\Users\\jcfaria\\AppData\\Roaming\\Tinn-R\\tmp\\lines.r" [8] "C:\\Users\\jcfaria\\AppData\\Roaming\\Tinn-R\\tmp\\reformat-input.r" [9] "C:\\Users\\jcfaria\\AppData\\Roaming\\Tinn-R\\tmp\\reformat-output.r" What is wrong? Why the Sys.getenv function is not making the job when in the package? Anyone can help please? P.S: The beta version of the TinnRcom package is available to download at: http://nbcgib.uesc.br/lec/download/R/TinnRcom_1.0-09.zip -- ///\\\///\\\///\\\///\\\///\\\///\\\///\\\///\\\ Jose Claudio Faria Estatistica UESC/DCET/Brasil joseclaudio.faria at gmail.com Telefones: 55(73)3680.5545 - UESC 55(73)9100.7351 - TIM 55(73)8817.6159 - OI ///\\\///\\\///\\\///\\\///\\\///\\\///\\\///\\\ ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
