kambiz1199

150 Reputation

5 Badges

5 years, 229 days

MaplePrimes Activity


These are questions asked by kambiz1199

i get wrong solution in maximize. i have to get a approximate 0.18 but i get 0.1

restart;
with(Optimization);
app := proc (x) options operator, arrow; 0.14546e-1*sin(3.141592654*x)+(-1)*0.50512e-2*sin(6.283185308*x)+0.19918e-2*sin(9.424777962*x) end proc;
ex := proc (x) options operator, arrow; evalf(-AiryAi(2^(2/3)*x)*(5*3^(5/6)-9*AiryBi(2^(2/3))*GAMMA(2/3))/(8*AiryAi(2^(2/3))*3^(5/6)-8*AiryBi(2^(2/3))*3^(1/3))-AiryBi(2^(2/3)*x)*(9*AiryAi(2^(2/3))*GAMMA(2/3)-5*3^(1/3))/(8*AiryAi(2^(2/3))*3^(5/6)-8*AiryBi(2^(2/3))*3^(1/3))+(1/4)*x^3+3/8) end proc;
plot([100*abs(app(x)-ex(x))], x = 0 .. 1)
Maximize(100*(abs(app(x)-ex(x))), x = 0 .. 1);
 

hi . i want to get d^2 z[1] and d^2z[2] but this method give only dz[1] and dz[2] ....

 

restart;
q1 := 9045*(diff(z[1](t), t$2))+863728.*z[1](t) = -1963*sin(20*t);
q2 := 3454*(diff(z[2](t), t$2))+2^6*z[2](t) = -286*sin(20*t);
icy := seq([z[i](0) = 0, (D(z[i]))(0) = 0], i = 1 .. 2, 1);
so := dsolve({q1, q2, seq(icy[i][], i = 1 .. 2)}, numeric, method = classical[abmoulton], corrections = 2);
so(1);
[t = 1., z[1](t) = 0.114730517257337e-2, diff(z[1](t), t) = 0.192255592847066e-1, z[2](t) = -0.186463122818374e-3, diff(z[2](t), t) = 0.320601041204689e-2]

hi . i want to solve couple differential  equation with ode analyzer  but i get error

i want to plot y[1] and y[2]. 
for example for this two equation 
diff(y[1](x), x$2)+3*(diff(y[1](x), x$1))+2*y[1](x)+2*y[2](x) = 3, diff(y[2](x), x$2)+diff(y[2](x), x$1)+2*y[2](x)+2*y[1](x) = 8;

 

 

how can i solve this equation with Two unknown terms

hi . i want to solve this pde. but don't get a solution

restart;
pde := diff(c(x, t), t) = d*(diff(c(x, t), x$2));
ibs := c(0, t) = (c[1]+c[2])*(1/2), c(-infinity, t) = c[1], c(infinity, t) = c[2];
pdsolve([pde, ibs]);
 

4 5 6 7 8 9 10 Page 6 of 11