D-STATCOM MATLAB Code using I-GWO with PVWT Profile - IEEE 69

clear all

clc

format long

SearchAgents_no=50; % Number of search agents

Num=input('Please Enter Number Of PV: ');

%% Initial Values for DG

lb(1:Num)=zeros(1,Num);

lb(Num+1:2*Num)=1;

lb(2*Num+1:3*Num)=0*ones(1,Num);

ub(1:Num)=3000*ones(1,Num);

ub(Num+1:2*Num)=69;

ub(2*Num+1:3*Num)=0*ones(1,Num);

dim=3*Num;

Max_iteration=Num*50; % Maximum numbef of iterations

[Best_score,Best_pos,GWO_cg_curve]=IGWO(SearchAgents_no,Max_iteration,lb,ub,dim);