Problem with GSUB in PEIP

You may want to report to the maintainer - the GSVD sources have the following which is completely broken:
GSVD
function (A, B) 
{
    SS = Sys.info()
    ssysname = SS[[1]]
    if (ssysname == "Linux") {
        lpath = paste(R.home(), "/lib/libRlapack.so", sep = "")
    }
    else {
        lpath = paste(R.home(), "lib/i386/libRlapack.dylib", 
            sep = "")
    }
[...]
    dyn.load(lpath)

It seems like the author failed to use the proper flags for linking LAPACK and then tried to hack around it in a horrible way that doesn't really work.

I suppose this happens when you don't even have a single test that a particular function works otherwise CRAN checks would not allow it in...

Cheers,
Simon

Hi All:

I am trying to do a generalized SVD which is used in canonical variate analysis in System Identification routines.  I am running R 3.2 on Yosemite. When I do ?sos(?gsvd?) only a few routines show, up, one is in the package PEIP.  I have installed the package PEIP (from binary), and the error below should be reproducible because it is not a function of my data:

junk<-GSVD(Yf,Yp)
Error in dyn.load(lpath) : 
 unable to load shared object '/Library/Frameworks/R.framework/Resourceslib/i386/libRlapack.dylib':
 dlopen(/Library/Frameworks/R.framework/Resourceslib/i386/libRlapack.dylib, 6): image not found
In the Mac installation, at least for R3.2, there is no /Library/Frameworks/R.framework/Resourceslib (there is a /Library/Frameworks/R.framework/Resources/lib) and even then there is no /Library/Frameworks/R.framework/Resources/lib/i386.

Any suggestions on getting PEIP to work, or an alternative to doing the gsvd, would be greatly appreciated.  The PEIP maintainer is on this email also.

Thanks for any help.

-Roy M.

**********************
"The contents of this message do not reflect any position of the U.S. Government or NOAA."
**********************
Roy Mendelssohn
Supervisory Operations Research Analyst
NOAA/NMFS
Environmental Research Division
Southwest Fisheries Science Center
***Note new address and phone***
110 Shaffer Road
Santa Cruz, CA 95060
Phone: (831)-420-3666
Fax: (831) 420-3980
e-mail: Roy.Mendelssohn at noaa.gov www: http://www.pfeg.noaa.gov/

"Old age and treachery will overcome youth and skill."
"From those who have been given much, much will be expected" 
"the arc of the moral universe is long, but it bends toward justice" -MLK Jr.

_______________________________________________
R-SIG-Mac mailing list
R-SIG-Mac at r-project.org
https://stat.ethz.ch/mailman/listinfo/r-sig-mac

Problem with GSUB in PEIP

Thread (5 messages)