[Rd] Help: Where can I find the code for 'C_Cdqrls'?

[Uwe Ligges]

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 at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-devel
>