je travaille sur une longue table avec 2 colonnes (id et cmd),je voulais supprimer les id ou le cmd=27/90
[id cmd]
[1 24]
[2 26]
[3 28]
[4 NA]
[5 27]
[6 90]
l
Code : Tout sélectionner
time1<-Sys.time()
long_tabl=nrow(test_01_02)
i=1
repeat{
if(i<=long_tabl){
print(test_01_02$CMD[i])
if(test_01_02$CMD[i]=="90" | test_01_02$CMD[i]=="27" ){
test_01_02<- test_01_02[!(test_01_02$id==test_01_02$id[i]),]
i=1
long_tabl=nrow(test_01_02)
}
else {
i=i+1
}
}
else{
break
}
}
time2<-Sys.time()
difftime(time2, time1)
mais il bloque sur la ligne ou il y a cmd=NA et il m'affiche une erreur :une valeur manquante
Error in if (test_01_02$CMD[i] == "90" | test_01_02$CMD[i] == "27") { :
missing value where TRUE/FALSE needed
Merci d’avance