On 23.04.2013 09:35, 赵自强 wrote:
Dear all,
I’m not sure if it is O.K. to ask this question here.
But where can I find the code for the function ‘C_Cdqrls’
which is called by the R function ‘lsfit‘.
Look into the R sources:
grepping for dqrls shows the following relevant files:
./src/appl/dqrls.f: subroutine
dqrls(x,n,p,y,ny,tol,b,rsd,qty,k,jpvt,qraux,work)
./src/include/R_ext/Applic.h:void F77_NAME(dqrls)(double *x, int *n, int
*p, double *y, int *ny,
./src/library/stats/src/init.c: CALLDEF(Cdqrls, 3),
./src/library/stats/src/lm.c: z <- .Fortran("dqrls",
./src/library/stats/src/lm.c:SEXP Cdqrls(SEXP x, SEXP y, SEXP tol)
./src/library/stats/src/lm.c: F77_CALL(dqrls)(REAL(qr), &n, &p,
REAL(y), &ny, &rtol,
./src/library/stats/src/statsR.h:SEXP Cdqrls(SEXP x, SEXP y, SEXP tol);
Best,
Uwe Ligges
Thank you all.
Sorry for being naïve if so.
--------------------
Ziqiang Zhao
2013-04-23
[[alternative HTML version deleted]]
______________________________________________
R-devel@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel
______________________________________________
R-devel@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel
