Remove extra blank lines in M2/Statistiques Non Paramétrique/TP1.Rmd

This commit is contained in:
2026-01-05 16:57:22 +01:00
parent 98807a1b63
commit 0cb4dd4c57

View File

@@ -4,7 +4,6 @@ n = 100
Z = sample.int(3, n, replace=T) Z = sample.int(3, n, replace=T)
``` ```
```{r} ```{r}
mu1 = -3 mu1 = -3
mu2 = 0 mu2 = 0
@@ -17,7 +16,6 @@ X[Z == 2] = rnorm(sum(Z == 2), mu2, sqrt(sigma22))
X[Z == 3] = rnorm(sum(Z == 3), mu3, sqrt(sigma32)) X[Z == 3] = rnorm(sum(Z == 3), mu3, sqrt(sigma32))
``` ```
```{r} ```{r}
plot(density(X, bw = 0.1), ylim = c(0, 0.85), main = 'Estimation de la densité') plot(density(X, bw = 0.1), ylim = c(0, 0.85), main = 'Estimation de la densité')
rug(X) rug(X)
@@ -69,7 +67,6 @@ legend(
La validation croisée non biaisée (UCV) semble donner les meilleurs résultats.. La validation croisée non biaisée (UCV) semble donner les meilleurs résultats..
```{r} ```{r}
kmax = 50 kmax = 50
H = (1:kmax)^2 / (n * sqrt(2 * pi)) H = (1:kmax)^2 / (n * sqrt(2 * pi))