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("localScore") | ||||||
| library("latex2exp") | library("latex2exp") | ||||||
| library("Rcpp") | library("Rcpp") | ||||||
|  | library("caret") | ||||||
| ``` | ``` | ||||||
| 
 | 
 | ||||||
| ## 1. Proposition for simulations under $\mathcal{H}_1$ | ## 1. Proposition for simulations under $\mathcal{H}_1$ | ||||||
| @ -345,6 +346,8 @@ for (lambda0 in (2:5)){ | |||||||
|             print(summary(LS_H0)) |             print(summary(LS_H0)) | ||||||
|             cat("Scan Statistics:\n") |             cat("Scan Statistics:\n") | ||||||
|             print(summary(SS_H0)) |             print(summary(SS_H0)) | ||||||
|  |             cat("Confusion Matrix:\n") | ||||||
|  |             print(confusionMatrix(factor(LS_H0$class), factor(SS_H0$class))) | ||||||
|              |              | ||||||
|             cat("- Elisa version:\n") |             cat("- Elisa version:\n") | ||||||
|             Score = ScoreDistribElisa(lambda0, lambda1, T) |             Score = ScoreDistribElisa(lambda0, lambda1, T) | ||||||
| @ -360,14 +363,10 @@ for (lambda0 in (2:5)){ | |||||||
|             print(summary(LS_H0)) |             print(summary(LS_H0)) | ||||||
|             cat("Scan Statistics:\n") |             cat("Scan Statistics:\n") | ||||||
|             print(summary(SS_H0)) |             print(summary(SS_H0)) | ||||||
|  |             cat("Confusion Matrix:\n") | ||||||
|  |             print(confusionMatrix(factor(LS_H0$class), factor(SS_H0$class))) | ||||||
|             cat("---\n") |             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
	 Paul-Corbalan
						Paul-Corbalan