function r = pickme(T, W, p,rs)

b = findme(T, W, p,rs);

k = length(b);
l=1;
for i=1:k,
   
   if mod(i-1,8)==0
      index(l)=b(i)
      l=l+1;
      
   end
   
end

r = index;