[Analogue-commits] r304 - pkg/R

[noreply at r-forge.r-project.org]

Author: gsimpson
Date: 2013-03-18 03:41:22 +0100 (Mon, 18 Mar 2013)
New Revision: 304

Added:
   pkg/R/scores.prcurve.R
Log:
adds a scores method for class 'prcurve'

Added: pkg/R/scores.prcurve.R
===================================================================
--- pkg/R/scores.prcurve.R	                        (rev 0)
+++ pkg/R/scores.prcurve.R	2013-03-18 02:41:22 UTC (rev 304)
@@ -0,0 +1,4 @@
+## `scores` extractor function for prcurve class
+`scores.prcurve` <- function(x, ...) {
+  matrix(x$lambda, ncol = 1)
+}