1 内容介绍 本文利用 多项式拟合 对三棱镜色散实验数据进行拟合。 2 仿真代码 function [Data,Name,len] = DataRead() % 此函数为数据读取函数 % % 功能:从'色散曲线数据'文件夹中依次读取每个
1 内容介绍
本文利用多项式拟合对三棱镜色散实验数据进行拟合。
2 仿真代码
function [Data,Name,len] = DataRead()
% 此函数为数据读取函数
%
% 功能:从'色散曲线数据'文件夹中依次读取每个文件的文件名(玻璃种类)与数据
% (玻璃n,k值)分别存入数组Name和元胞数组Data中,最后得到文件夹中文件的个数
% (玻璃种类个数)并赋值给len;
%
% 返回值:
% 元胞矩阵Data:包含每种玻璃的一系列n,k值
% 矩阵Name:包含每一种玻璃的名称
% 数值len:其值为玻璃种类的总数
%
%
subdir = dir('色散曲线数据'); %列出文件夹内容
len = length(subdir)-2; %计算除默认文件外文件总个数
Data = cell(1,len); %创建元胞矩阵
for i=1:len
Data{1,i} = csvread (['色散曲线数据/',subdir(i+2).name],1,0); %为元胞矩阵循环赋值
str{i} = [subdir(i+2).name]; %提取文件名
end
Name = strrep(str,'.csv',''); %消除文件名后缀
end
3 运行结果
4 参考文献
[1]陈修芳. 基于LSSVM的色散曲线拟合[J]. 大学物理实验, 2013, 26(5):2.
[2]严达利, 孙佩雄, 寇晶. 三棱镜色散曲线拟合的MATLAB-GUI设计[J]. 实验室科学, 2010, 13(3):3.