I try to plot the following data with few positions (points) to highlight

```
plot(b$pos,b$log_p,col==ifelse(b$pos==c(14824849,13920386,14837470),90,100), pch=19, xlab='Chromosome 21 position', ylab='-log10(p)')

```

The plot produced, only show one point highlighted red with the following warning message: 

```
In b$pos == c(14824849, 13920386,14837470) : longer object length is not a multiple of shorter object length

```