span class="op">$</span>Population <span class="op">%in%</span><span class="st"> </span><span class="kw">c</span>(<span class="st">"CEU"</span>,<span class="st">"TSI"</span>,<span class="st">"FIN"</span>,<span class="st">"GBR"</span>,<span class="st">"IBS"</span>),<span class="op">-</span><span class="kw">c</span>(<span class="dv">2</span>,<span class="dv">4</span>)]
eas &lt;-<span class="st"> </span>sample_info[sample_info<span class="op">$</span>Population <span class="op">%in%</span><span class="st"> </s