Finding the roots across a range of values

I'd like to find the roots of b for the array b(i,1) and store those values in BI(i)

H = 0.1;

I = 200;

Y = 0;

b = transpose(1:I);

for i = 1:I

b(i) = fzero(@(b)(b(i)*tan(b(i))-H),b(i));

BI(i) = b(i) ;

end

Answer 1

[VBBV]

H = 0.1; 
I = 200;
Y = 0; 
b = transpose(1:I);
for i = 1:I
b(i) = fzero(@(b)(b*tan(b)-H),b(i)); 
BI(i) = b(i) ;
end