Browse code

Adding rlm_compute_se_R() at the C-level

git-svn-id: file:///home/git/hedgehog.fhcrc.org/bioconductor/trunk/madman/Rpacks/preprocessCore@51995 bc3139a8-67e5-0310-9ffc-ced21a209358

Benilton Carvalho authored on 20/01/2011 18:45:34
Showing2 changed files

... ...
@@ -1,5 +1,5 @@
1 1
 Package: preprocessCore
2
-Version: 1.13.4
2
+Version: 1.13.5
3 3
 Title: A collection of pre-processing functions
4 4
 Author: Benjamin Milo Bolstad <bmb@bmbolstad.com>
5 5
 Maintainer: Benjamin Milo Bolstad <bmb@bmbolstad.com>
... ...
@@ -425,3 +425,8 @@ void rlm_compute_se(double *X,double *Y, int n, int p, double *beta, double *res
425 425
   Free(W);
426 426
 }
427 427
 
428
+void rlm_compute_se_R(double *X, double *Y, int *n, int *p, double *beta, double *resids, double *weights, double *se_estimates, double *varcov, double *residSE, int *method){
429
+
430
+  rlm_compute_se(X, Y, *n, *p, beta, resids, weights, se_estimates, varcov, residSE, *method, psi_huber, 1.345);
431
+
432
+}