%=================================================
%===== The Linearly Increasing Sine Function =====
%=================================================

clear
clc

Amplitude = 12;
Frequency = 2.4;
Phase = 0;
Duration = 5;
SamplingRate = 100;
AngularFrequency = 2*pi*Frequency;
Time = 0:1/SamplingRate:Duration;

LISineFunction = Amplitude.*Time.*sin(AngularFrequency.*Time + Phase);

figure(1);
plot(Time,LISineFunction);
title('The Linearly Increasing Sine Function');
xlabel('Time (Sec)');
ylabel('Amplitude (V)');
grid on