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

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) % формула максимальной прибыли

plot(t,D,'m');

xlabel('Time');

ylabel('Profits-Expense=4istaya pribyl');

grid on;

figure(3)

plot(t,N,'y*');

xlabel('Time');

ylabel('N koli4estvo pokupatelei');

grid on;

%mod23.m

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

T = 0.8;

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

s1 = 20; %Издержки на 1 рекламную акцию

fora1=[0:5:150] ; %интенсивность рекламной компании

aa1=a1/50 ; %изменяется от 0 до 40/50=0.8

a2 = 2; %степень общения потенциальных покупателей

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

m=aa1/a2;

[t,N]= ode45(@mma1,[0 T],m,[],N0,aa1,a2);

P = p*(N-(aa1/a2));