1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50
| liste_arg2=list('2009','2010','2011','2012')
liste_arg1=list('CRD','Verst','OU','ET')
liste_arg3=list('Mars','Juin','Sept','Dec')
resultat_nb_a=0
resultat_nb_b=0
resultat_nb_a_dans_b=0
position=1
for (i in 1:length(liste_arg2))
{
arg2=liste_arg2[[i]]
for (j in 1:length(liste_arg3))
{
arg2=paste(liste_arg3[[j]],"_",liste_arg2[[i]],sep="")
print(arg2)
for (k in 1:length(liste_arg1))
{
arg1=paste(arg2,'_',liste_arg1[[k]],sep="")
print(arg1)
texte3=paste("SELECT COUNT(",arg1,")"," FROM Mod",sep="")
texte4=paste("SELECT COUNT(",arg2,")"," FROM Vrai",sep="")
texte5=paste("SELECT COUNT(",arg1,")"," FROM Mod WHERE ",arg1," IN (SELECT ",arg2," FROM Vrai)",sep="")
print(texte3)
nb_a=sqldf(texte3)
print(texte4)
nb_b=sqldf(texte4)
print(texte5)
nb_a_dans_b=sqldf(texte5)
resultat_nb_a[position]=nb_a
resultat_nb_b[position]=nb_b
resultat_nb_a_dans_b[position]=nb_a_dans_b
position=position+1
}
}
}
resultat_nb_a
resultat_nb_b
resultat_nb_a_dans_b |
Partager