How do I delete columns from a matrix based on an array

I have matrix of A=[4 3 5 6 7; 1 4 8 4 7] and B=[3 6 7] and i want do delete columns of A which's first row contain the values of B and have the answer; A= [4 5; 1 8]

thank you

Answer 1

[James Tursa]

A(:,ismember(A(1,:),B)) = [];

[kowshik Thopalli]

Very elegant.

Answer 2

[kowshik Thopalli]

As you can imagine there is more than one way to do this. here is one method.Not elegant but works

   A=[4 3 5 6 7; 1 4 8 4 7];B=[3 6 7];
   [ismem index] = ismember(A(1,:),B)
   i=repmat(index,[2,1]
   A(i~=0)=[]
   reshape(A,2,2)