subplot(411), plot(time, Irms), grid on, xlabel('time [sec]'), ylabel('Irms [Amp]')
subplot(412), plot(time, P), grid on, xlabel('time [sec]'), ylabel('Daya [Watt]')
subplot(413), plot(time, Temp), grid on, xlabel('time [sec]'), ylabel('Suhu [C]')
subplot(414), plot(time, R), grid on, xlabel('time [sec]'), ylabel('Resistor [Ohm]')