风力发电机功率曲线统计MATLAB代码实现

风力发电机功率曲线统计MATLAB代码实现function[windspeed_avractive_power_devwindspeed_fin_avractive_power_fin_avrCP]=Powercurve_cal_v03(filename1,filename2,filename3,filename4)%读取excel的xlsx文件%B列为功率C列为风速data1=xlsread(filename1,1,'B2:C52000');data2=xlsread(filename2,1,'B2:C52000');data3=xlsread(filename3,1,'B2:C52000');data4=xlsread(filename4,1,'B2:C52000');%将四个Excel表合成一个表格data=[data1;data2;data3;data4];%对数据进行筛选风速3m/s功率10kw的数据不要n=length(data(:,2));forj=1:1:nifdata(j,2)=3&&data(j,1)=10data_opt(j,1)=data(j,2);data_opt(j,2)=data(j,1);endend%对风速和功率进行排序并返回索引[windspeed,ind]=sort(data_opt(:,1));%求0.5m/s的时间间隔的平均风速和相对应的平均功率,标准差m=length(ind);k=0;u=0;h=0;windspeed_sum=0;active_power_sum=0;windspeed_avr=0;active_power_avr=0;active_power_error_sum=0;windspeed_fin_sum=0;active_power_fin_sum=0;P=1.062;A=pi*(88/2)^2;forwindspeed_num=3:0.5:19.5fori=1:1:m%初步计算平均风速和平均功率active_power(i)=data_opt(ind(i),2);ifwindspeed(i)=windspeed_num&&windspeed(i)windspeed_num+0.5k=k+1;windspeed_sum=windspeed_sum+windspeed(i);active_power_sum=active_power_sum+active_power(i);endq=(windspeed_num-3)/0.5+1;windspeed_avr(q)=windspeed_sum/k;active_power_avr(q)=active_power_sum/k;%计算标准差ifwindspeed(i)=windspeed_num&&windspeed(i)windspeed_num+0.5h=h+1;active_power_error(i)=(active_power(i)-active_power_avr(q))^2;active_power_error_sum=active_power_error_sum+active_power_error(i);endactive_power_dev(q)=sqrt(active_power_error_sum/h);%剔除散点和平均功率差的绝对值与标准差比值大于4的点，并计算最终的平均风速/功率曲线/发电机功率系数ifwindspeed(i)=windspeed_num&&windspeed(i)windspeed_num+0.5e=abs(active_power(i)-active_power_avr(q))/active_power_dev(q);ife=4u=u+1;windspeed_fin_sum=windspeed_fin_sum+windspeed(i);active_power_fin_sum=active_power_fin_sum+active_power(i);endendwindspeed_fin_avr(q)=windspeed_fin_sum/u;active_power_fin_avr(q)=active_power_fin_sum/u;%计算发电机功率系数CP(q)=1000*active_power_fin_avr(q)/(0.5*P*A*(windspeed_fin_avr(q)^3));endwindspeed_sum=0;active_power_sum=0;active_power_error_sum=0;windspeed_fin_sum=0;active_power_fin_sum=0;k=0;h=0;u=0;end%画出初步平均风速和平均功率的曲线figureplot(windspeed_avr,active_power_avr,'r.-');set(gca,'xtick',0:1:20)set(gca,'ytick',0:100:1600)gridonxlabel('windspeed_avrm/s')ylabel('active_power_avr(kW)')title('powercurve')%画出标准差的曲线figureplot(windspeed_avr,active_power_dev,'g.-');%bar((2*windspeed_num+0.5)/2,active_power_dev);set(gca,'xtick',0:1:20)set(gca,'ytick',0:20:200)gridonxlabel('windspeed_avrm/s')ylabel('active_power_dev')title('powerstandarddeviation')%画出最终的平均风速和平均功率曲线figureplot(windspeed_fin_avr,active_power_fin_avr,'k.-');set(gca,'xtick',0:1:20)set(gca,'ytick',0:100:1600)gridonxlabel('windspeed_fin_avrm/s')ylabel('active_power_fin_avr(kW)')title('finalpowercurve')%画出最终的发电机功率系数figureplot(windspeed_fin_avr,CP,'m.-');set(gca,'xtick',0:1:20)set(gca,'ytick',0:0.1:0.6)gridonxlabel('windspeed_fin_avrm/s')ylabel('active_power_dev')title('CP系数')%画出采集的散点图figureplot(data(:,2),data(:,1),'.');set(gca,'xtick',0:1:22)set(gca,'ytick',0:100:1600)gridonxlabel('windspeedm/s')ylabel('active_power')title('powerpoint')