1 years, 29 days

## How do I solve this problem ? Why the gr...

Maple 2022

MAPLE.mw

 >
 > with(plots):
 > with(plottools):
 > with(DEtools):
 > N:=S(t)+C(t)+In(t);
 (1)
 > eqn1 := diff(S(t), t) = (b-mu*S(t)-beta*C(t)*S(t)+gamma*In(t)*S(t)-mu*C(t)-theta*S(t)), S(0) = ic1;
 (2)
 > eqn2:= diff(C(t),t) = rho*(beta*C(t)*S(t)+gamma*In(t)*S(t))-mu*C(t)-alpha*C(t),C(0) = ic2;
 (3)
 > eqn3 := diff(In(t), t) = (1 - rho)*(beta*C(t)*S(t) + gamma*In(t)*S(t)) - mu*In(t) - pi*In(t) + alpha*C(t), In(0) = ic3;
 (4)
 > b := 0.117852;
 (5)
 > mu := 0.035378;
 (6)
 > g := 0.11;
 (7)
 > rho := 0.05;
 (8)
 >
 > beta := 0.02;
 (9)
 > theta := 0.066;
 (10)
 > pi:=0.9;
 (11)

 > alpha:=0.5;
 (12)
 > ic1 := 2390000;
 (13)
 > ic2:=528;
 (14)
 > ic3:=753;
 (15)
 > dsol := dsolve([eqn1, eqn2, eqn3], numeric);
 (16)
 > odeplot(dsol,[[t,In(t),color=red],[t,C(t),color=yellow],[t,S(t),color=blue]],t=0..100,view=[0..0.001,0..2000000]);
 >

## How do i solve this problem?(Error, (in ...

Maple 2022

restart;
with(plots);
with(plottools);
with(DEtools);
N := S(t) + In(t) + C(t);
N := S(t) + In(t) + C(t)

eqn1 := diff*(S(t), t) = lambda - (lambda + sigma)*S(t) - (beta + Zeta)*S(t)*In(t) - beta[1]*S(t)*C(t), S(0) = ic1;
eqn1 := diff (S(t), t) = lambda - (lambda + sigma) S(t)

- (beta + Zeta) S(t) In(t) - beta[1] S(t) C(t), S(0) = ic1

eqn2 := diff*(In(t), t) = beta*S(t)*In(t) - (lambda + gamma)*In(t), In(0) = ic2;
eqn2 :=

diff (In(t), t) = beta S(t) In(t) - (lambda + gamma) In(t),

In(0) = ic2

eqn3 := diff*(C(t), t) = Zeta*In(t) + Zeta*In(t)^2 - (rho + lambda)*C(t) - Zeta*C(t)*In(t), C(0) = ic3;
2
eqn3 := diff (C(t), t) = Zeta In(t) + Zeta In(t)

- (rho + lambda) C(t) - Zeta C(t) In(t), C(0) = ic3

lambda := 0.117852;
lambda := 0.117852

mu := 0.035378;
mu := 0.035378

beta := 0.11;
beta := 0.11

beta__1 := 0.05;
beta__1 := 0.05

g := 1;
rho := 0.1;
rho := 0.1

zeta := 0.02;
zeta := 0.02

sigma := 0.066;
sigma := 0.066

ic1 := 2390000;
ic2 := 753;
ic4 := 358500;
ic1 := 2390000

ic2 := 753

ic4 := 358500

dsol := dsolve([eqn1, eqn2, eqn3], numeric);
Error, (in dsolve/numeric/process_input) system must be entered as a set/list of expressions/equations

 Page 1 of 1
﻿