diff --git a/DST-2021.R b/DST-2021.R index c87f7da..8d4ae49 100644 --- a/DST-2021.R +++ b/DST-2021.R @@ -39,7 +39,7 @@ summary(reg) # une augmentation d'un degré augmente le FWI de 1.28 # une augmentation du vent de 1 km/h augmente le FWI de 0.55 - +par(mfrow=c(2,2)) plot(reg) # cond application ok mais bof @@ -70,7 +70,7 @@ mon_image<-kde2d(x=forest$FFMC + forest$ISI + forest$BUI,y=forest$FWI,n=100) image(mon_image, legend = T, las=1) - +par(mfrow=c(2,2)) plot(mod) # y a des outliers @@ -91,7 +91,7 @@ summary(model) # région B plus que feu que région A significatif # être région B augmente risque de feu de 94% exp(model$coefficients) -#OR départ 1 +#OR départ 1 1.94/(1+1.94) # nv proba = 0.66 => 66 %