Курсовая работа: Модель рекламной кампании

SumD;

P_m=0.25*p*aa2*((a1/aa2+N0)^2) ;% формула максимальной прибыли

plot(aa2,P_m,'rp');

plot(aa2,D,'gh');

xlabel('a2');

ylabel('P m,D,SumD');

legend('P m','Dohod')

plot(aa2,SumD,'c*');

grid on;

end

%modp.m

clear,clf,clc,hold on,grid on;

global a1 a2;

T_max = 10;

N0 = 6; %число потенциальных покупателей (тыс.чел)

p = 20; %Прибыль от одной продажи

s = 5; %Издержки на одну рекламную акцию

[t,N]= ode45(@p,[0 T_max ],0,[],N0);

P = p*N;

S = s*(sin(2*t)+0.5*t); %a1=log(t+1)

figure(1)

plot(t,P,'g');

plot(t,S,'r');

xlabel('Time');

ylabel('Profits, Expense');

legend('Profits','Expense');

figure(2)

D=P-S;

P_m=0.25*p*a2*((a1/a2+N0)^2) % формула максимальной прибыли