• 《数学实验》Matelab数据拟合求散热系数


                         

    《数学实验》报告

     

     

    题  目: 大物实验《电热法测量油品的比热容》散热系数K的求解 

     

     

     

     

    时间 :2018年12  月30   日

    一、问题背景与提出

      当我们做实验的时候往往会得出大量的数据,首先我们需要对数据进行处理。对一些必要的原始数据进行加工使用,其中比较常用的是将数据进行处理为统计图像,统计图像往往能直观的反映出一组数据的特点。

    比如在大学物理实验中《电热法测量油品的比热容》实验中,需要将大量的降温实验数据进行处理,画出线性的拟合图像,根据图像斜率得出散热系数K。本文将利用matelab对数据进行处理并拟合直线求出相关量。

     

     

     

    二、实验目的

    拟合实验数据图像,求出拟合直线的斜率,求出散热系数。

     

    三、实验原理与数学模型

       当一个系统的温度与环境温度相差不大(约不超过10-15℃)时,系统冷却速率(或散热速率)与系统和环境间的温度差成正比,这个规律就是牛顿冷却定律,用数学表达式为(即模型):

    dT/dt = -K(T-θ)dt

    对上式进行积分得:InT-θ)=-Kt+In(T0-θ)

    In|T0-θ|=-Kt+b

     

    四、实验结果报告与实验总结

    1、          数据处理。

    t(min)

    1

    2

    3

    4

    5

    6

    7

    8

    9

    10

    11

    12

    13

    T(℃)

    27.00

    26.90

    26.90

    26.80

    26.80

    26.80

    26.70

    26.80

    26.60

    26.60

    26.60

    26.60

    26.50

    |T-θ|

    4.00

    3.90

    3.90

    3.90

    3.80

    3.80

    3.70

    3.70

    3.60

    3.60

    3.60

    3.60

    3.50

    In|T0-θ|

    1.39

    1.36

    1.36

    1.36

    1.34

    1.34

    1.34

    1.34

    1.28

    1.28

    1.28

    1.28

    1.25

    2、          图像拟合。

    相关代码:

    x=1:13;

    y=[1.39 1.36 1.36 1.36 1.34 1.34 1.34 1.34 1.28 1.28 1.28 1.28 1.25];

    scatter(x,y,'filled')

    hold on

    p=polyfit(x,y,1);

    yy=polyval(p,x);

    y8=polyval(p,14);

    cftool;

    disp(['预测下一个结果1=’ ,num2str(y8)])

    y9=polyval(p,15);

    disp(['预测下一个结果2’ ,num2str(y9])

    plot([x 14 15],[yy y8 y9],[14 15],[y8 y9],'ko')

    axis([0 15 1.0 2.0])

     

     

     

     

     

     

     

    利用cftool:

    [xData, yData] = prepareCurveData( x, y );

     

    % Set up fittype and options.

    ft = fittype( 'poly1' );

     

    % Fit model to data.

    [fitresult, gof] = fit( xData, yData, ft );

     

    % Plot fit with data.

    figure( 'Name', 'untitled fit 1' );

    h = plot( fitresult, xData, yData );

    legend( h, 'y vs. x', 'untitled fit 1', 'Location', 'NorthEast' );

    % Label axes

    xlabel x

    ylabel y

    grid on

     

     

     

     

     

     

     

    得出相关内容:

     

     

     

     

     

    Linear model Poly1:

         f(x) = p1*x + p2

    Coefficients (with 95% confidence bounds):

           p1 =    -0.01055  (-0.01287, -0.008231)

           p2 =       1.397  (1.379, 1.415)

    Goodness of fit:

      SSE: 0.002222

      R-square: 0.9011

      Adjusted R-square: 0.8922

      RMSE: 0.01421

     

     

     

    图像为:

     

    3、实验总结:

    根据结果图像以及计算结果,得出实验数据基本符合牛顿冷却定律,K=-0.01055b=1.397,故散热系数为-0.01055

    五、参考文献

    《数学实验》

    《大学物理实验》(第二版)

    此文仅供阅读交流,版权所有。

  • 相关阅读:
    Ubuntu 网络代理配置
    WSL2 环境配置
    两台笔记本电脑实现同一wifi下虚拟主机网络实现互通
    Linux /dev/loop0文件详解
    Excel两张表查重,返回True
    计算机网络基础/进制转换/企业级子网IP划分
    leetcode 2030. 含特定字母的最小子序列
    nginx https
    kubernetes(二十四)ingress https
    求两个向量的旋转矩阵 E
  • 原文地址:https://www.cnblogs.com/shdwin/p/10199057.html
Copyright © 2020-2023  润新知