[R] rotate.princomp

[Christian Hoffmann]

Hi all,

I am experimenting with transporting S+ (3.4) routines to R, and for mva I
am missing the  rotate.princomp(). It could be implemented "as is" in R, IF
the C-subroutines ".C("S_crawFerg",..." and ".C("S_orthomax",..." were
available.

.C("S_crawFerg",
		as.integer(n),
		as.integer(k),
		rmat = amat,
		correlation = correlation,
		tmat = tmat,
		as.double(kappa),
		as.double(eps),
		normalize = as.integer(normalize),
		iterations = as.integer(iter.max))[c("rmat", "correlation", 
		"tmat", "iterations")] 
.C("S_orthomax",
		as.integer(dA[1]),
		as.integer(dA[2]),
		rmat = amat,
		gamma = as.double(gamma),
		as.double(eps),
		normalize = as.integer(normalize),
		iterations = as.integer(iter.max))[c("rmat", "gamma", 
		"normalize", "iterations")]

Are these functions (as code in C) available? Has anybody compiled,
installed and used these functions in R? 

Thanks for your hints.
--christian
Dr.sc.math.Christian W. Hoffmann
Mathematics and Statistical Computing
Landscape Modeling and Web Applications
Swiss Federal Research Institute WSL 
Zuercherstrasse 111
CH-8903 Birmensdorf, Switzerland
phone: ++41-1-739 22 77    fax: ++41-1-739 22 15
e-mail: Hoffmann at WSL.CH
www: http://www.wsl.ch/staff/christian.hoffmann/

-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-
r-help mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
Send "info", "help", or "[un]subscribe"
(in the "body", not the subject !)  To: r-help-request at stat.math.ethz.ch
_._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._