MATLAB代码优化：计算Excel数据四次拟合项调整后的R方

%20%E6%8C%87%E5%AE%9A%E6%96%87%E4%BB%B6%E8%B7%AF%E5%BE%84%E5%92%8C%E6%96%87%E4%BB%B6%E5%90%8D%0AfilePath%20%3D%20%27D%3A%5C%E6%A1%8C%E9%9D%A2%5C%E5%A4%8F%E5%81%87%E6%95%B0%E6%A8%A1%5C%E7%AC%AC%E5%85%AD%E6%AC%A1%E6%A8%A1%E6%8B%9F%E8%B5%9B%E9%A2%98%5CB%5C111.xlsx%27%3B%0AsheetName%20%3D%20%27%E9%A2%98%E7%9B%AE1-1%27%3B%0A%0A%20%20%2F%2F%20%E8%AF%BB%E5%8F%96Excel%E6%96%87%E4%BB%B6%E4%B8%AD%E7%9A%84%E6%95%B0%E6%8D%AE%0Adata%20%3D%20xlsread(filePath%2C%20sheetName)%3B%0A%0Afigure%3B%0A%0Afor%20tar%3D1%3A21%0A%20%20x1%3B%3By1%3B%3By2%3B%0A%20%20for%20i%3D1%3A114%0A%20%20%20%20if%20data(i%2C1)%3D%3Dtar%0A%20%20%20%20%20%20tmp%3D%5Bx1%2Cdata(i%2C2)%5D%3Bx1%3Dtmp%3B%0A%20%20%20%20%20%20tmp%3D%5By1%2Cdata(i%2C3)%5D%3By1%3Dtmp%3B%0A%20%20%20%20%20%20tmp%3D%5By2%2Cdata(i%2C4)%5D%3By2%3Dtmp%3B%0A%20%20%20%20end%0A%20%20end%0A%20%20%20%20%2F%2F%20%E6%A0%B7%E5%90%88%E5%9B%9B%E6%AC%A1%E9%A1%B9%E5%87%BD%E6%95%B0%0A%20%20p%20%3D%20polyfit(x1%2C%20y1%2C%204)%3B%0A%0A%20%20%2F%2F%20%E8BA%8F%E7%AE%97%E6%A0%B7%E5%90%88%E5%80%BC%0A%20%20y_fit%20%3D%20polyval(p%2C%20x1)%3B%0A%0A%20%20%2F%2F%20%E8BA%8F%E7%AE%97%E6%80%BB%E5%B9%B3%E6%96%B9%E5%92%8C%0A%20%20SS_total%20%3D%20sum((y1%20-%20mean(y1)).%5E2)%3B%0A%0A%20%20%2F%2F%20%E8BA%8F%E7%AE%97%E6%AE%81%E5%BE%84%E5%B9%B3%E6%96%B9%E5%92%8C%0A%20%20SS_residual%20%3D%20sum((y1%20-%20y_fit).%5E2)%3B%0A%0A%20%20%2F%2F%20%E8BA%8F%E7%AE%97%E8C2C%E6%95%B4%E5%90%8E%E7%9A%84%20R%20%E6%96%B9%0A%20%20n%20%3D%20length(y1)%3B%0A%20%20p_order%20%3D%20length(p)%3B%0A%20%20R_square_adj%20%3D%201%20-%20SS_residual%20%2F%20(n%20-%20p_order%20-%201)%20%2F%20(SS_total%20%2F%20(n%20-%201))%3B%0A%0A%20%20disp(R_square_adj)%0Aend