error=test_value1-train_value1; %误差=实际值-预测值 disp(' 序号 期望值 预测值 误差') disp([ test_value1 train_value1 error]') rmse=sqrt(mean((error).^2)); disp(['根均方差(RMSE):',num2str(rmse)]) mae=mean(abs(error)); disp(['平均绝对误差(MAE):',num2str(mae)]) mse=mean(abs(error).^2); disp(['均方误差MSE为:',num2str(mse)]) %mape=mean(abs(error)/ELM_OUT); %disp(['平均相对百分误差(MAPE):',num2str(mape)]) mape=mean(abs(error)/train_value1); disp(['平均相对百分误差(MAPE):',num2str(mape)]) %R=corrcoef(T1,ELM_OUT); %r=R(1,2); %disp(['决定系数R^2为:',num2str(r)]) %SSE=sum(error.^2); %disp(['误差平方和SSE为:',num2str(SSE)]) R=corrcoef(test_value1,train_value1); r=R(1,2); disp(['决定系数R^2为:',num2str(r)]) TIC=sqrt(mean(error).^2)/(sqrt(mean((train_value1).^2))+sqrt(mean((test_value1).^2))); disp(['泰尔不等式系数TIC为: ',num2str(TIC)]) figure('color','w') hold on %plot(1:41,test_value1,'-*') %plot(1:41,train_value1,'r-o') plot(1:69,test_value1,'b-.','linewidth',1.5) plot(1:69,train_value1,'r*-.','linewidth',1.5) grid on xlabel('sample point') ylabel('photovoltaic power generation') legend('actual value','ELM predicted value ') grid off;解释这个程序并在每一行加上备注

时间: 2024-01-02 07:02:58 浏览: 26
这段程序是用于评估 ELM(Extreme Learning Machine)模型预测结果的准确性。下面是每一行的解释: 1. error=test_value1-train_value1; % 误差=实际值-预测值,计算预测误差。 2. disp(' 序号 期望值 预测值 误差'):在命令行窗口中输出表头信息。 3. disp([test_value1 train_value1 error]'):在命令行窗口中输出测试数据的预测值、真实值和误差。 4. rmse=sqrt(mean((error).^2));:计算均方根误差(RMSE)。 5. disp(['根均方差(RMSE):',num2str(rmse)]):在命令行窗口中输出 RMSE 的值。 6. mae=mean(abs(error));:计算平均绝对误差(MAE)。 7. disp(['平均绝对误差(MAE):',num2str(mae)]):在命令行窗口中输出 MAE 的值。 8. mse=mean(abs(error).^2);:计算均方误差(MSE)。 9. disp(['均方误差MSE为:',num2str(mse)]):在命令行窗口中输出 MSE 的值。 10. mape=mean(abs(error)/train_value1);:计算平均相对百分误差(MAPE)。 11. disp(['平均相对百分误差(MAPE):',num2str(mape)]):在命令行窗口中输出 MAPE 的值。 12. R=corrcoef(test_value1,train_value1); r=R(1,2);:计算决定系数(R^2)。 13. disp(['决定系数R^2为:',num2str(r)]):在命令行窗口中输出 R^2 的值。 14. TIC=sqrt(mean(error).^2)/(sqrt(mean((train_value1).^2))+sqrt(mean((test_value1).^2)));:计算泰尔不等式系数(TIC)。 15. disp(['泰尔不等式系数TIC为: ',num2str(TIC)]):在命令行窗口中输出 TIC 的值。 16. figure('color','w'):创建一个新的图形窗口。 17. hold on:在图形窗口中添加新的图像时保持原有图像。 18. plot(1:69,test_value1,'b-.','linewidth',1.5):绘制测试数据的实际值的折线图。 19. plot(1:69,train_value1,'r*-.','linewidth',1.5):绘制测试数据的预测值的折线图。 20. grid on:显示坐标网格。 21. xlabel('sample point'):设置 X 轴标签。 22. ylabel('photovoltaic power generation'):设置 Y 轴标签。 23. legend('actual value','ELM predicted value '):设置图例。 24. grid off:隐藏坐标网格。

相关推荐

% 载入数据 res = xlsread('Copy_of_数据集.xlsx'); input = res((1:120), 2:6)'; % 载入输入数据 output = res((1:120), 7:9)'; % 载入输出数据 % 划分训练集和测试集 input_train = input(:, 1:80); output_train = output(:, 1:80); input_test = input(:, 81:100); output_test = output(:, 81:100); % 归一化 [input_train_n, input_ps] = mapminmax(input_train, -1, 1); [output_train_n, output_ps] = mapminmax(output_train, -1, 1); % 建立模型 input_num = size(input_train_n, 1); % 输入层节点数量 hidden_num = 10; % 隐含层节点数量 output_num = size(output_train_n, 1); % 输出层节点数量 net = newff(input_train_n, output_train_n, hidden_num, {'tansig','purelin'}, 'trainlm'); net.trainParam.epochs = 15000; net.trainParam.lr = 0.01; net.trainParam.goal = 0.0001; % 训练模型 [net, tr] = train(net, input_train_n, output_train_n); % 测试模型 input_test_n = mapminmax('apply', input_test, input_ps); output_test_n = mapminmax('apply', output_test, output_ps); output_pred_n = sim(net, input_test_n); %%反归一化 output_test_pred = mapminmax('reverse', output_pred_n, output_ps); output_test_pred = round(output_test_pred); % 四舍五入取整 % 使用测试集评估网络性能 pos_pred = net_pos(test_set(:, 1:input_size)'); % 预测位置 ori_pred = net_ori(test_set(:, 1:input_size)'); % 预测姿态 pos_error = pos_pred - test_set(:, input_size+1:input_size+output_size); % 位置误差 ori_error = ori_pred - test_set(:, input_size+output_size+1:end); % 姿态误差 mse_pos = mean(pos_error.^2); % 位置均方误差 mse_ori = mean(ori_error.^2); % 姿态均方误差 % 使用附加测试集评估网络性能 additional_test_data = [theta([6, 12, 18], :), actual_poses([6, 12, 18], :)]; pos_pred = net_pos(additional_test_data(:, 1:input_size)'); % 预测位置 ori_pred = net_ori(additional_test_data(:, 1:input_size)'); % 预测姿态 pos_error = pos_pred - additional_test_data(:, input_size+1:input_size+output_size); % 位置误差 ori_error = ori_pred - additional_test_data(:, input_size+output_size+1:end); % 姿态误差 mse_pos_additional = mean(pos_error.^2); % 位置均方误差 mse_ori_additional = mean(ori_error.^2); % 姿态均方误差 %%绘制预测结果和真实结果的对比图 figure; plot(output_test(1,:), 'bo-'); hold on; plot(output_test_pred(1,:), 'r*-'); legend('真实结果', '预测结果'); xlabel('样本编号'); ylabel('输出值'); title('预测结果和真实结果'); 帮我修改一下这段代码

clear all; clc; % 载入数据 data = xlsread('Copy_of_数据集.xlsx'); input = data((1:120), 2:6)'; output = data((1:120), 7:9)'; % 划分训练集和测试集 input_train = input(:, 1:80); output_train = output(:, 1:80); input_test = input(:, 81:100); output_test = output(:, 81:100); % 归一化 [input_train_n, input_ps] = mapminmax(input_train, -1, 1); [output_train_n, output_ps] = mapminmax(output_train, -1, 1); % 建立模型 input_size = size(input_train_n, 1); hidden_size = 10; output_size = size(output_train_n, 1); net = newff(input_train_n, output_train_n, hidden_size, {'tansig','purelin'}, 'trainlm'); net.trainParam.epochs = 15000; net.trainParam.lr = 0.01; net.trainParam.goal = 0.0001; % 训练模型 [net, tr] = train(net, input_train_n, output_train_n); % 测试模型 input_test_n = mapminmax('apply', input_test, input_ps); output_test_n = mapminmax('apply', output_test, output_ps); output_pred_n = sim(net, input_test_n); %% 反归一化 output_test_pred = mapminmax('reverse', output_pred_n, output_ps); output_test_pred = round(output_test_pred); % 四舍五入取整 % 使用测试集评估网络性能 pos_pred = sim(net, input_test_n); % 预测位置 ori_pred = sim(net, input_test_n); % 预测姿态 pos_error = pos_pred - output_test(:,1:20)% 位置误差 ori_error = ori_pred - output_test(:,1:20);% 姿态误差 mse_pos = mean(pos_error.^2); % 位置均方误差 mse_ori = mean(ori_error.^2); % 姿态均方误差 % 使用附加测试集评估网络性能 % additional_test_data = [theta([6, 12, 18], :), actual_poses([6, 12, 18], :)]; additional_test_data = input(81:100,:); additional_test_data_n = mapminmax('apply', additional_test_data, input_ps); pos_pred = sim(net, additional_test_data_n); % 预测位置 ori_pred = sim(net, additional_test_data_n); % 预测姿态 pos_error = pos_pred - output(1,:); % 位置误差 ori_error = ori_pred - output(1,:); % 姿态误差 mse_pos_additional = mean(pos_error.^2); % 位置均方误差 mse_ori_additional = mean(ori_error.^2); % 姿态均方误差 % 调整维度为 2 x 10 % 绘制预测结果和真实结果的对比图 figure; plot(output_test(1,:), 'bo-'); hold on; plot(output_test_pred(1,:)', 'r*-'); % 注意转置 legend('真实结果', '预测结果'); xlabel('样本编号'); ylabel('输出值'); title('预测结果和真实结果');additional_test_data = input(81:100,:); 位置 1 处的索引超出数组边界(不能超出 5)。帮我修改

最新推荐

recommend-type

OSEK标准_ISO 17356-2-2005_Part 2 OSEKVDX specifications for bindin

该标准最后一次审查和确认是在2020年。因此,该版本仍然是最新的。 摘要 ...它指定用户可编程的变量(error code错误代码、status types状态类型等),以确保OS、COM和NM的实现相互之间是一致的。
recommend-type

C#调用Halcon导出的disp_message代码报错 处理方法

一开始学习时走了很多弯路,希望你们小走弯路, C#调用Halcon导出的disp_message代码报错 处理方法 可以关注我的CSDN
recommend-type

NR5G网络拒绝码-5gmm_cause = 111 (Protocol error, unspecified).docx

从3GPP协议和UE端行为分析5G gmm cause #111的网络问题
recommend-type

解决出现Incorrect integer value: '' for column 'id' at row 1的问题

主要介绍了解决出现Incorrect integer value: '' for column 'id' at row 1的问题的相关资料,希望通过本文能帮助到大家,让大家遇到这样的问题及时的解决,需要的朋友可以参考下
recommend-type

分行业城镇非私营单位就业人员平均实际工资指数(2004-2011年).xls

数据来源:中国劳动统计NJ-2023版
recommend-type

RTL8188FU-Linux-v5.7.4.2-36687.20200602.tar(20765).gz

REALTEK 8188FTV 8188eus 8188etv linux驱动程序稳定版本, 支持AP,STA 以及AP+STA 共存模式。 稳定支持linux4.0以上内核。
recommend-type

管理建模和仿真的文件

管理Boualem Benatallah引用此版本:布阿利姆·贝纳塔拉。管理建模和仿真。约瑟夫-傅立叶大学-格勒诺布尔第一大学,1996年。法语。NNT:电话:00345357HAL ID:电话:00345357https://theses.hal.science/tel-003453572008年12月9日提交HAL是一个多学科的开放存取档案馆,用于存放和传播科学研究论文,无论它们是否被公开。论文可以来自法国或国外的教学和研究机构,也可以来自公共或私人研究中心。L’archive ouverte pluridisciplinaire
recommend-type

实现实时数据湖架构:Kafka与Hive集成

![实现实时数据湖架构:Kafka与Hive集成](https://img-blog.csdnimg.cn/img_convert/10eb2e6972b3b6086286fc64c0b3ee41.jpeg) # 1. 实时数据湖架构概述** 实时数据湖是一种现代数据管理架构,它允许企业以低延迟的方式收集、存储和处理大量数据。与传统数据仓库不同,实时数据湖不依赖于预先定义的模式,而是采用灵活的架构,可以处理各种数据类型和格式。这种架构为企业提供了以下优势: - **实时洞察:**实时数据湖允许企业访问最新的数据,从而做出更明智的决策。 - **数据民主化:**实时数据湖使各种利益相关者都可
recommend-type

输出删除n个数字,使得被删后的数字最小

对于这个问题,我可以提供一个基于贪心算法的解法。具体来说,我们可以首先遍历一遍数字序列,从左往右找到第一个比它右边的数字大的位置,然后删除这个位置的数字,并重置遍历起点为当前位置。重复这个过程,直到已经删除了n个数字或者数字序列已经被完全遍历。 代码实现如下: ``` def remove_digits(num, n): result = [] for i in range(len(num)): while n > 0 and result and result[-1] > num[i]: result.pop()
recommend-type

c++校园超市商品信息管理系统课程设计说明书(含源代码) (2).pdf

校园超市商品信息管理系统课程设计旨在帮助学生深入理解程序设计的基础知识,同时锻炼他们的实际操作能力。通过设计和实现一个校园超市商品信息管理系统,学生掌握了如何利用计算机科学与技术知识解决实际问题的能力。在课程设计过程中,学生需要对超市商品和销售员的关系进行有效管理,使系统功能更全面、实用,从而提高用户体验和便利性。 学生在课程设计过程中展现了积极的学习态度和纪律,没有缺勤情况,演示过程流畅且作品具有很强的使用价值。设计报告完整详细,展现了对问题的深入思考和解决能力。在答辩环节中,学生能够自信地回答问题,展示出扎实的专业知识和逻辑思维能力。教师对学生的表现予以肯定,认为学生在课程设计中表现出色,值得称赞。 整个课程设计过程包括平时成绩、报告成绩和演示与答辩成绩三个部分,其中平时表现占比20%,报告成绩占比40%,演示与答辩成绩占比40%。通过这三个部分的综合评定,最终为学生总成绩提供参考。总评分以百分制计算,全面评估学生在课程设计中的各项表现,最终为学生提供综合评价和反馈意见。 通过校园超市商品信息管理系统课程设计,学生不仅提升了对程序设计基础知识的理解与应用能力,同时也增强了团队协作和沟通能力。这一过程旨在培养学生综合运用技术解决问题的能力,为其未来的专业发展打下坚实基础。学生在进行校园超市商品信息管理系统课程设计过程中,不仅获得了理论知识的提升,同时也锻炼了实践能力和创新思维,为其未来的职业发展奠定了坚实基础。 校园超市商品信息管理系统课程设计的目的在于促进学生对程序设计基础知识的深入理解与掌握,同时培养学生解决实际问题的能力。通过对系统功能和用户需求的全面考量,学生设计了一个实用、高效的校园超市商品信息管理系统,为用户提供了更便捷、更高效的管理和使用体验。 综上所述,校园超市商品信息管理系统课程设计是一项旨在提升学生综合能力和实践技能的重要教学活动。通过此次设计,学生不仅深化了对程序设计基础知识的理解,还培养了解决实际问题的能力和团队合作精神。这一过程将为学生未来的专业发展提供坚实基础,使其在实际工作中能够胜任更多挑战。