Add Confusion Matrix to Experience plan
This commit is contained in:
		
							parent
							
								
									320c78084c
								
							
						
					
					
						commit
						932c8e7876
					
				@ -10,6 +10,7 @@ output: pdf_document
 | 
			
		||||
library("localScore")
 | 
			
		||||
library("latex2exp")
 | 
			
		||||
library("Rcpp")
 | 
			
		||||
library("caret")
 | 
			
		||||
```
 | 
			
		||||
 | 
			
		||||
## 1. Proposition for simulations under $\mathcal{H}_1$
 | 
			
		||||
@ -345,6 +346,8 @@ for (lambda0 in (2:5)){
 | 
			
		||||
            print(summary(LS_H0))
 | 
			
		||||
            cat("Scan Statistics:\n")
 | 
			
		||||
            print(summary(SS_H0))
 | 
			
		||||
            cat("Confusion Matrix:\n")
 | 
			
		||||
            print(confusionMatrix(factor(LS_H0$class), factor(SS_H0$class)))
 | 
			
		||||
            
 | 
			
		||||
            cat("- Elisa version:\n")
 | 
			
		||||
            Score = ScoreDistribElisa(lambda0, lambda1, T)
 | 
			
		||||
@ -360,14 +363,10 @@ for (lambda0 in (2:5)){
 | 
			
		||||
            print(summary(LS_H0))
 | 
			
		||||
            cat("Scan Statistics:\n")
 | 
			
		||||
            print(summary(SS_H0))
 | 
			
		||||
            cat("Confusion Matrix:\n")
 | 
			
		||||
            print(confusionMatrix(factor(LS_H0$class), factor(SS_H0$class)))
 | 
			
		||||
            cat("---\n")
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
```
 | 
			
		||||
 | 
			
		||||
Test `confusionMatrix`
 | 
			
		||||
```{r}
 | 
			
		||||
library(caret)
 | 
			
		||||
confusionMatrix(factor(LS_H0$class), factor(SS_H0$class))
 | 
			
		||||
```
 | 
			
		||||
 | 
			
		||||
		Loading…
	
	
			
			x
			
			
		
	
		Reference in New Issue
	
	Block a user