Bonjour,
Si je lance la totalité du script, j'aimerais qu'il puisse s'arrêter tout seul pour que je puisse répondre à la question avant que le script continu. Mais je ne sais pas comment faire.
Auriez-vous une idée ?
Voici mon script :
choixenregistrementtableau<-factor(readline("Voulez vous enregistrer le tableau ? OUI ou NON : \n"))
if (choixenregistrementtableau==" NON") {
cat("D'accord vous ne voulez pas enregistrer le fichier")
} else {
choixformattableau<-factor (readline(prompt ="Dans quel format voulez vous enregistrer le tableau ? .CSV ou .TXT : \n"))
choixformattableau<-as.integer( choixformattableau)
}
if (choixformattableau==".TXT"){
write.table(tabfinal,file= 'resultats.txt') #pour l�enregistrer en .txt
cat("OK TXT")
}
if (choixformattableau=="..CSV"){
write.csv2(tabfinal,file= 'resultats.csv') #pour l�enregistrer en .csv
cat("OK CSV")
}
Merci pour vos réponses
-----