Let A(2;-2;3), B(4;-5;6) and (M(1;2;3) be three points. Write the equation of the plane (P) passing through two points A and B 

Problem: Write the equation internal bisector and external bisector of a triangle ABC with A(1,2,-7), B(3,-1,-1), C(-5,14,-3). This is my code.

restart;
> with(LinearAlgebra):
> A:=: B:=: C:=: M:=:

>v:=1/Norm(A-B,2)*(A - B) + 1/Norm(A-C,2)*(A - C): M=A + v*t;

>u:= 1/Norm(A-B,2)*(A - B) - 1/Norm(A-C,2)*(A - C): M=A + u*t;

in the commands M = A + v*t and M = A + u*t, please comment for me. Thank you.

Hello everybody,

I represented a polynomial P type:
P := a + b*x + c*x^2-d*y + e*y^2 + f*x*y
(where a, b, c, d, e, d, are real)

using fucntion pointplot3D
G1 := plot3d(P, x = 0 .. 5, y = -0,5 .. 1);
display(G1);

I represented this polynomial which look like a paraboloid.

I'm just wondering if I can animate continuously...

It's possible to define a field in Maple 15 with 2 kinds of indices, say type spacetime μ,ν,ρ... and one of the type integer, i,j,k varying from 1 to n?

I would like to define a field like A_μⁱ where:

A_μ¹=A_μ

A_μ²=B_μ 

and so on.  

Thank you Washington Inacio

The cost of some mathematical sites (estimated bizinformation.org):
 8.000.000 $ - wolfram.com
   372.456 $ - webmath.exponenta.ru (Russian Maple in education)
   292.301 $ - maplesoft.com

    82.342 $ - exponenta.ru
    61.278 $ - webmath.ru
    54.895 $ - math.ege
    43.302 $ - univ.kiev.ua (Kiev National University)

I expected

int(x^(-13/10), x):
eval(%,x=1000)-eval(%,x=1/1000);

but i get

int(x^(-13/10), x=1/1000..1000);

Write a procedure, primesum, whose input is a positive integer n and whose output is the sum of all primes p such that p is less than or equal to n. You may use th built-in procedure isprime.

Greetings,

I have purchased Maple 15 Student Edition 2 months ago. My problem is that when I click the button under the text "To obtain a complete annotated solution, click:" Maple crashes. This happens in the browse tasks window accessed through Tools>Tasks>Browse. In addition to this issue, the interactive commands does not seem to work. How can resolve these issues? I am running a 64-bit version of Maple 15 under Windows 7 Home Premium 64-bit.

Any help is appreciated.

MAPLE is not able to show me the output of nested loop. How can I get it?

for i from 0 to N do for j to 3 do

eqn[i] := sort(coeff(lhs(dequn[j]), epsilon, i)) = coeff(rhs(dequn[j]), epsilon, i)

end do

nested_loops.mwend do

Suppose I have a system of three coupled equations as:

eqn[1] := a*x+b*x^2+c*x^3

eqn[2] := a1*x+b*x^3

eqn[3] := a2*x^2+b2*x^3 = a*x^2

If I simply write

eqs :=( eqn[1], eqn[2], eqn[3])

the equations get coupled.

1. Can I do it using loop structure?

2. Secondly, after coupling suppose I want to collect coefficoent of x, x^2 and x^3 from three equations ang get the equation in form

eq[0]:=a=0,a1=0

evalhf: more than 500 locals

From where that restriction is? Is it workaroundable?

I was wondering if anyone knew of a solution to this: when you plot multiple curves on the same axis with Maple and specify the colors=["blue","red",.....] etc, the ordering is not preserved, Maple seems to just match whichever color to whichever function it pleases. This is v.annoying, surely there must be a way to get around this?

I am confused by the below results.

Why does LSSolve (given an arbitrary expected return) produce a higher risk
adjusted return than QPSolve which explicity is given an objective to maximize
risk adjusted returns? ie minimize Transpose(W).Cov.W-Transpose(W).ev
This to me seems very strange?!

Also, how do you specify in the objective function for LSSolve to maximize
risk adjusted returns? Now we have simply provide LSSolve with some user specified

Please help me  write a code for the following problem:

Write the equation of the plane which passes through the points A(-1, 3, -6) and B(2, 2, -10) and tangent to the sphere

(x-1)^2 + (y + 1)^2 + (z - 7)^2 = 9.

Thank you very much.

I want to get the zeroth order and first order perturbation equations of the following nonlinear coupled ODE.

restart; N := 1

alias(eta = e, theta = t)

eq[1] := 5*(diff(F(e), `$`(e, 3)))+(1+3/m)*F(e)*(diff(F(e), `$`(e, 2)))-(2+1/m)*(diff(F(e), e))^2-(4+2/m)*H(e)-(1-2/m)*e*(diff(H(e), e)) = 0

eq[2] := diff(H(e), e) = t(e)

eq[3] := 5*(diff(t(e), `$`(e, 2)))/Pr+(1+3/m)*F(e)*(diff(t(e), e))-5*(diff(F(e), e))*t(e)

eqs := eq[1], eq[2], eq[3]