Jump to content

File:Log DiagnosticOddsRatio.png

From Wikipedia, the free encyclopedia

Original file (672 × 671 pixels, file size: 6 KB, MIME type: image/png)

Summary

[edit]

Created in R by contributor.

Commands:

> sensitivity <- seq(0.01, 0.99, by=0.01)
> specificity <- seq(0.01, 0.99, by=0.01)
> dor <- matrix(nrow=length(sensitivity), ncol=length(specificity))
> for (i in 1:length(sensitivity)) {
+   for (j in 1:length(specificity)) {
+     dor[i,j] <- (sensitivity[i]*specificity[j])/((1-sensitivity[i])*(1-specificity[j]))
+   }
+ }
> ldor <- log(dor)
> filled.contour(sensitivity, specificity, ldor,
+   xlim=c(0,1), ylim=c(0,1),
+   col=hsv(h=seq(0.75,0,length=20),s=1,v=1),
+   plot.title=title(xlab="Sensitivity",ylab="Specificity"),
+   key.title=title(main="log(DOR)")
+ )

Licensing

[edit]
I, the copyright holder of this work, hereby publish it under the following license:

File history

Click on a date/time to view the file as it appeared at that time.

Date/TimeThumbnailDimensionsUserComment
current10:20, 1 November 2011Thumbnail for version as of 10:20, 1 November 2011672 × 671 (6 KB)Ts4079 (talk | contribs)Created in R by contributor. Commands: sensitivity <- seq(0.01, 0.99, by=0.01) specificity <- seq(0.01, 0.99, by=0.01) dor <- matrix(nrow=length(sensitivity), ncol=length(specificity)) for (i in 1:length(sensitivity)) { for (j in 1:length(specificity))
No pages on the English Wikipedia use this file (pages on other projects are not listed).

Metadata