机器学习之MATLAB代码--随机森林(一)
创始人
2025-01-16 07:38:10
0

代码:

%% 初始化数据 clc clear close all %%  导入数据 data = xlsread('数据集.xlsx','Sheet1','A1:F100');%导入数据库  %%  划分训练集和测试集 TE= randperm(100);%将数据打乱,重新排序;  PN = data(TE(1: 80), 1: 5)';%划分训练集输入 TN = data(TE(1: 80), 6)';%划分训练集输出  PM = data(TE(81: end), 1: 5)';%划分测试集输入 TM = data(TE(81: end), 6)';%划分测试集输出  %%  数据归一化 [pn, ps_input] = mapminmax(PN, 0, 1);%归一化到(0,1) pn=pn'; pm = mapminmax('apply', PM, ps_input);%引用结构体,保持归一化方法一致; pm=pm'; [tn, ps_output] = mapminmax(TN, 0, 1); tn=tn';  %%  模型参数设置及训练模型 trees = 100; % 决策树数目 leaf  = 5; % 最小叶子数 OOBPrediction = 'on';  % 打开误差图 OOBPredictorImportance = 'on'; % 计算特征重要性 Method = 'regression';  % 选择回归或分类 net = TreeBagger(trees, pn, tn, 'OOBPredictorImportance', OOBPredictorImportance,...       'Method', Method, 'OOBPrediction', OOBPrediction, 'minleaf', leaf); importance = net.OOBPermutedPredictorDeltaError;  % 重要性  %%  仿真测试 pyuce = predict(net, pm );  %%  数据反归一化 Pyuce = mapminmax('reverse', pyuce, ps_output); Pyuce =Pyuce';  %%  绘图 figure %画图真实值与预测值对比图 plot(TM,'bo-') hold on plot(Pyuce,'r*-') hold on legend('真实值','预测值') xlabel('预测样本') ylabel('预测结果') grid  on  figure % 绘制特征重要性图 bar(importance) legend('各因素重要性') xlabel('特征') ylabel('重要性')  %%  相关指标计算 error=Pyuce-TM; [~,len]=size(TM); R2=1-sum((TM-Pyuce).^2)/sum((mean(TM)-TM).^2);%相关性系数 MSE=error*error'/len;%均方误差 RMSE=MSE^(1/2);%均方根误差 disp(['测试集数据的MSE为:', num2str(MSE)]) disp(['测试集数据的MBE为:', num2str(RMSE)]) disp(['测试集数据的R2为:', num2str(R2)])     

数据部分截图

在这里插入图片描述

结果:
在这里插入图片描述
在这里插入图片描述
在这里插入图片描述
如有需要数据和代码压缩包请在评论区发邮箱留言,一般一天之内会发送,记得关注和点赞哦!!

相关内容

热门资讯

透视辅助!AAPOkER软件透... 透视辅助!AAPOkER软件透明挂,aapoker后台都是真的是有挂(详细辅助教程)1、系统规律教程...
aapoker挂(aa扑克辅助... aapoker挂(aa扑克辅助)aapoker德州线上扑克辅助工具(辅助挂)真是是真的有挂(详细有外...
9分钟实锤!科乐麻将有挂吗,众... 9分钟实锤!科乐麻将有挂吗,众合推扑克竟然有挂,黑科技教程(有挂软件)1、科乐麻将有挂吗机器人多个强...
wepoke辅助有挂!aapo... wepoke辅助有挂!aapokEr好像真的是有挂,微扑克辅助器(详细辅助器教程);一、wepoke...
分享认知!德扑ai辅助教程,德... 您好,这款游戏可以开挂的,确实是有挂的,需要了解加微【757446909】很多玩家在这款游戏中打牌都...
aapoker外卦挂(线上德州... aapoker外卦挂(线上德州aapoker)德州aa poker有外卦挂吗(透明挂)本来真的有挂(...
wpk透明挂!We辅poker... 一、wpk透明挂简介了解软件请加微:136704302wpk透明挂是一款在线扑克游戏平台,玩家可以在...
9分钟辅助挂!渝都亲友圈有挂吗... 9分钟辅助挂!渝都亲友圈有挂吗,约局吧切实真的有挂,解说技巧(有挂教程)1、渝都亲友圈有挂吗透视辅助...
技术分享!德扑之星辅助挂,德扑... 技术分享!德扑之星辅助挂,德扑计算软件原来是有挂(详细自定义房间教程)1、金币登录送、破产送、升级送...
aapoker发牌机制(aap... aapoker发牌机制(aapoker透明挂)aapoker透明挂多久被封(辅助挂)本来是真的有挂(...