www.gusucode.com > 基于逐步回归的脑卒中发病环境因素分析及干预模型 > 基于逐步回归的脑卒中发病环境因素分析及干预模型【论文+程序】/文章+源码/附录/新建文件夹/pearson.m

    x1=[1027.219355 1022.144335 1019.225 1017.117204 1009.71371 1005.694167 1003.922581 1006.024194 1011.334167 1018.209677 1023.169167 1023.329839]';
y=[1348.25 1256.25 1373 1346 1400.5 1232.5 1300 1295.75 1241 1330.5 1205 1142.5]';
x01=1015.592;y0=1289.271;
r1=sum((x1-x01).*(y-y0))/(sqrt(sum((x1-x01).^2))*sqrt(sum((y-y0).^2)))
x2=[1029.851613 1024.994212 1022.362097 1020.138656 1011.883065 1007.386667 1005.583871 1007.737903 1013.0475 1020.187903 1025.4 1026.137097]';
x02=1017.893;
r2=sum((x2-x02).*(y-y0))/(sqrt(sum((x2-x02).^2))*sqrt(sum((y-y0).^2)))
x3=[1024.479839 1019.114224 1015.984677 1014.057016 1007.360484 1003.870833 1002.137097 1004.26129 1009.635 1016.358065 1020.9125 1020.609677]';
x03=1013.232;
r3=sum((x3-x03).*(y-y0))/(sqrt(sum((x3-x03).^2))*sqrt(sum((y-y0).^2)))
x4=[3.758064516 6.739347291 10.3483871 13.38163978 21.58629032 24.47416667 29.1483871 28.88709677 24.78 19.43629032 12.16666667 6.805645161]';
x04=16.79267;
r4=sum((x4-x04).*(y-y0))/(sqrt(sum((x4-x04).^2))*sqrt(sum((y-y0).^2)))
x5=[7.604032258 10.88574507 14.79516129 17.80930108 26.73790323 28.3075 33.26532258 32.88225806 28.54333333 23.58870968 16.5825 11.01854839]';
x05=21.00169;
r5=sum((x5-x05).*(y-y0))/(sqrt(sum((x5-x05).^2))*sqrt(sum((y-y0).^2)))
x6=[0.841935484 3.484698276 6.644354839 9.648548387 17.34435484 21.60833333 26.00806452 25.94596774 22.04333333 16.01129032 8.56 3.37983871]';
x06=13.46006;
r6=sum((x6-x06).*(y-y0))/(sqrt(sum((x6-x06).^2))*sqrt(sum((y-y0).^2)))
x7=[67.83064516 70.70628079 67.25 66.37553763 64.41935484 77.15833333 73.83870968 74.88709677 78.175 73.16935484 70.975 66.86290323]';
x07=70.97068;
r7=sum((x7-x07).*(y-y0))/(sqrt(sum((x7-x07).^2))*sqrt(sum((y-y0).^2)))
x8=[51.00806452 51.95720443 46.39516129 46.12258065 40.21774194 58.58333333 55.35483871 56.19354839 60.14166667 50.54032258 48.91666667 46.97580645]';
x08=51.03391;
r8=sum((x8-x08).*(y-y0))/(sqrt(sum((x8-x08).^2))*sqrt(sum((y-y0).^2)))