Upgrading to TINN - R 2.1.1.6

From: Steve_Friedman at nps.gov <Steve_Friedman at nps.gov>
Subject: Re: [R] Upgrading to TINN - R 2.1.1.6
To: mazatlanmexico at yahoo.com
Date: Wednesday, February 4, 2009, 6:03 AM
Felipe,

Thank you it works !  Life is Good.

Hey I have a friend from graduate school from Mexico - his
name is Hector
Franco-Lopez and he is a forest biometry specialists.  If
you run across
him say hello for me. I believe he should be in Mexico
City, but I could be
wrong.

Thanks for the help,  Much appreciated.

Steve


Steve Friedman Ph. D.
Spatial Statistical Analyst
Everglades and Dry Tortugas National Park
950 N Krome Ave (3rd Floor)
Homestead, Florida 33034

Steve_Friedman at nps.gov
Office (305) 224 - 4282
Fax     (305) 224 - 4147

No problem Steve, I know what is like to be frustrated when
things don't
work right, I have been there a few times trying to figure
how these programs run.
OK, When I had the problem that you are having now, I
unistalled Tinn-R,
deleted everything from my Rprofile and re-installed
Tinn-R. Try to do the
same and after that,open R, click on 'packages',
'install packages' click
on a mirror close to you (I usually use USA(CA 1)),then
select Tinn-R and
svSocket packages and click on OK. Now close R and Open
Tinn-R. From the
Tinn-R menu click on R>>Configure>>Permanent (
this will open your
Rprofile),delete everything from your Rprofile and then
copy and paste the
code that I sent you earlier. Next, click on R >>
start/close and
connections >> Rgui. If you are able to open R from
Tinn-R, run a test from
Tinn-R with something like
<<plot(rnorm(100))>>.You need to be connected to
the internet in order to download the above packages.
This is the .strPaths..Make sure is no missing any
quotations or commas.I
copied it from my Rprofile so it should be correct. Let me
know
.trPaths <- paste(paste(Sys.getenv('APPDATA'),
'\\Tinn-R\\tmp\\',
 sep=''),c('', 'search.txt',
'objects.txt','file.r',
'selection.r',
'block.r','lines.r'), sep='')

<Steve_Friedman at nps.gov> wrote:

From: Steve_Friedman at nps.gov

<Steve_Friedman at nps.gov>

Subject: Re: [R] Upgrading to TINN - R 2.1.1.6
To: mazatlanmexico at yahoo.com
Date: Tuesday, February 3, 2009, 12:29 PM
Felipe,

Sorry to be taking so much of your time.  I copied

and

pasted the code as
you provided it.

when I start R from within Tinn-R, it opens a CRAN

mirror

site list asking
that I select a mirror.  After I select one, it

returns the

warnings and
error messages shown next.


--- Please select a CRAN mirror for use in this

session

---
Warning: unable to access index for repository

http://lib.stat.cmu.edu/R/CRAN/bin/windows/contrib/2.8

Warning: unable to access index for repository

http://www.stats.ox.ac.uk/pub/RWin/bin/windows/contrib/2.8

Warning message:
packages ?TinnR?, ?svSocket? are not

available

Error in library(TinnR) : there is no package called
'TinnR'

You suggested that I make sure that the .trPath was
correct.  I have no
idea how to determine this


Any other suggestions ?

Thanks

Steve Friedman Ph. D.
Spatial Statistical Analyst
Everglades and Dry Tortugas National Park
950 N Krome Ave (3rd Floor)
Homestead, Florida 33034

Steve_Friedman at nps.gov
Office (305) 224 - 4282
Fax     (305) 224 - 4147

Steve:
Download the Tinn-r package from cran, then save your
current Rprofile just
in case something goes wrong(use notepad or something
similar). After you
have saved your Rprofile,copy the code below to the

empty

Rprofile. I had
the same problem and after tweaking this code a bit

now

works great. Let me
know if it works for you.. Make sure .trPaths is

correct.

# Tinn-R: necessary packages and functions
# Tinn-R: >= 2.0.0.1

#===============================================================

library(utils)

# check necessary packages
necessary = c('TinnR', 'svSocket')
installed = necessary %in% installed.packages()[,
'Package']
if (length(necessary[!installed]) >=1)
  install.packages(necessary[!installed], dep=T)

# set options
options(use.DDE=T)
# uncoment the line below if you want Tinn-R starts
# always R starts
#options(IDE='C:/Tinn-R/bin/Tinn-R.exe')

# load packages
library(TinnR)
library(svSocket)

# start DDE
trDDEInstall()

.trPaths <-

paste(paste(Sys.getenv('APPDATA'),

'\\Tinn-R\\tmp\\',
sep=''),
c('', 'search.txt',

'objects.txt',

'file.r', 'selection.r',

'block.r',

'lines.r'), sep='')