有哪些信誉好的足球投注网站- 1、有哪些信誉好的足球投注网站（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。。
- 2、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
- 4、该文档为VIP文档，如果想要下载，成为VIP会员后，下载免费。
- 5、成为VIP后，下载本文档将扣除1次下载权益。下载后，不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后，您将拥有八大权益，权益包括：VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传，每下载1次， 网站将根据用户上传文档的质量评分、类型等，对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
3拟合方法数控机床的刀具补偿
拟合方法实验 数控机床的刀具补偿 实验目的 实验指导 t={0,1,2,3,4,5,6,7}; y={27.0,26.8,26.5,26.3,26.1,25.7,25.3,24.8}; data=Transpose[{t,y}] d1=ListPlot[data,PlotStyle-{RGBColor[0,0,1], PointSize[0.02]},PlotRange-{24,27.5}]; M[a_,b_]:=Sum[(y[[i]]-(a+b t[[i]]))^2,{i,1,8}]; eqt={D[M[a,b],a]==0,D[M[a,b],b]==0}//Simplify r=Solve[eqt,{a,b}] {{a?27.125,b?-0.303571}} f[x_]=a+b x/.r[[1]] g1=Plot[f[x],{x,-1,9}, PlotStyle-RGBColor[1.000,0,0.000]]; Show[g1,d1] ; Fit[data,{1,x},x] 27.125 -0.303571 x Fit[data,{1,x,x^2},x] g2=Plot[%,{x,-1,9}, PlotStyle-RGBColor[1.000,0.000,1.000]]; Show[g2,d1]; t1={3,6,9,12,15,18,21,24}; y1={57.6,41.9,31.0,22.7,16.6,12.2,8.9,6.5}; data1=Transpose[{t1,y1}]; d2=ListPlot[data1,PlotStyle-{RGBColor[0,0,1],PointSize[0.02]}]; logy=Log[y1]; data2=Transpose[{t1,logy}]; d3=ListPlot[data2,PlotStyle-{RGBColor[0,0,1], PointSize [0.02] }]; ly=Fit[data2,{1,x},x] y=Exp[ly]//Factor g=Plot[y,{x,1,25}, PlotStyle-RGBColor[1.000,0.000,0.502]]; Show[g, d2];
文档评论（0）