Bonjour,

Plus simple, pour un tableau qui s'appellerait tab et une colonne qui s'appellerait vals :

plot(..., col = c("blue", "red")[as.factor(tab$vals)],...)