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

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

a1 = 0.9; %интенсивность рекламной компании

% a2 - степень общения потенциальных покупателей, не учитываем, поскольку

% рассматриваем простую модель

[t,N]= ode45(@f,[0 T],0,[],N0,a1);

P = p*N;

S = s*a1*t;

figure(1)

plot(t,P,'g');

plot(t,S,'r');

xlabel('Time');

ylabel('Profits, Expense');

legend('Profits','Expense');

figure(2)

D=P-S;

plot(t,D,'m');

xlabel('Time');

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

grid on;

%mod2.m

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

T = 0.8;

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

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

a1 = 0.9; %интенсивность рекламной компании

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

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

m=a1/a2;

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