paul-corbalan
/
Scan-Statistics-Project-4Y-INSA
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Update Comparaison_of_methods.rmd

This commit is contained in:
elisaduz 2022-05-16 10:28:15 +02:00
parent 92c5d6e9a5
commit 8ef3ea88b5
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Comparaison_of_methods.rmd
View File

@ -275,7 +275,7 @@ ScoreDistribEmpiric <- function(lambda0, lambda1, n_sample, T){
``` ```
```{r} ```{r}
T=10
lambda0=5 lambda0=5
lambda1=7 lambda1=7
distrib_mc=ScoreDistribEmpiric(lambda0,lambda1,10000,T) distrib_mc=ScoreDistribEmpiric(lambda0,lambda1,10000,T)
@ -289,7 +289,7 @@ amplitude=abs(score_max-score_min)
print(amplitude) print(amplitude)
E=ComputeE(lambda0, lambda1) E=ComputeE(lambda0, lambda1)
print(E) print(E)
barplot(distrib_mc[,2]) barplot(distrib_mc[,2],names.arg=distrib_mc[,1])
``` ```