clc
close all
clear all

Un = 220;
In = 28.8;
nn = 1500;
nmax = 3000;
Pn = 5500;
Rp = 0.2;

eps = [ 0.1 0.2 0.3 0.4 ];
U1 = [ 210 210 210 210 ];
U3 = [ 20 45 70 85 ];
I1 = [ 2.5 6 11 14 ];
I2 = [ 16 25 30 30 ];
I3 = [ 4 8 13 16 ];
n = [ 60 150 275 440 ];

w = n * pi / 30
wn = nn * pi / 30;

cfi = ( Un - In * Rp ) / wn
M = cfi * I3;
Podi = M .* w;

etaI = Podi ./ ( U1 .* I1 )
etaR = ( U3 .* I3 + 1.3 * I3 .* I3 * Rp ) ./ ( U1 .* I2 )