how to find point of intersection of two curves

x = 0:1:1200;
y1 = (6871)*x.^(-1);
y2 = 1.5*log(x)-3.417;

Answer 1

[Matt J]

x = 0:1:1200;
y1 = (6871)*x.^(-1);
y2 = 1.5*log(x)-3.417;

[~,imin]=min(abs(y1-y2));

xint=fzero(@(x)  1.5*log(x)-3.417 - (6871)*x.^(-1),  x(imin))

xint = 991.2737

%verify
plot(x,y1,x,y2,[xint,xint],[6.6,7.5],'--');
xlim([980,1000])