close all
clear all

Alk = 110/2.2;  %Whr/lb
LeadAcid = 40/2.2;  %Whr/kg 
LithPri = 300/2.2;   %Whr/kg
LithSec = 130/2.2;  %Whr/kg

months = .1:.01:6;
wks = (52/12)*months;
days = 7*wks;
hrs = 24*days;

Alk_Power = Alk./hrs; 
LeadAcidPower = LeadAcid./hrs;
LithSecPower = LithSec./hrs;
LithPriPower = LithPri./hrs;

figure('Position', [55 100 1175 844],'PaperOrientation','landscape','PaperPosition',[0 0 11 8.5])
set(gca,'FontSize',18);
plot(months,Alk_Power,months,LeadAcidPower,months,LithSecPower)