close all
clear all

Rload = 7.5;

N = 0:6000;
Vrect = 1.35*40*N/1000;

N_SPEC = [0 150 300 670 1330 4500 6790];
POWER_SPEC = [20 20 75 250 900 6120 11800];

ScaleMin = 0.4;
ScaleMax = 1.2;

POWER_SPEC = POWER_SPEC'*[ScaleMin ScaleMax 1];

figure
plot(N,(Vrect.^2)/7.5,N_SPEC,POWER_SPEC)
legend('Vrect','Min Scale (0.4)','Max Scale (1.2)','Scale = 1','Location','NorthWest');