## How to draw this graph?...

A system of algebraic equation

in terms of x, y, z

how draw 3 different circles to show the range of possible values for x, y and z respectively?

it may not be a circle

It may be 3 bounded area graph to show the range of x , y , z respectively

updated

like the graph in many examples in

algebraic and geometric ideas in the theory of discrete optimization

bound area have color

## is it possible to change ODE to PDE?...

is it possible to change ODE to PDE?

the ODE has diff(a(t),t) and diff(b(t),t)

how to convert to diff(t, a), diff(t, b) ?

## how to buildsym in this case?...

with(DEtools, buildsym, equinv, symtest):
ans := dsolve([eq2,eq3,eq4], Lie);
Error, (in dsolve) too many arguments; some or all of the following are wrong: [{a(t), b(t), c(t)}, Lie]

ans := dsolve([eq2+eq3+eq4 = exp(t)], Lie);
Error, (in PDEtools/sdsolve) too many arguments; some or all of the following are wrong: [{a(t), b(t), c(t)}, Lie]

ans := dsolve([eq2,eq3,eq4]);
sym2 := buildsym(ans);
Error, (in buildsym) invalid input: `ODEtools/buildsym` expects its 1st argument, sol, to be of type {algebraic, algebraic = algebraic}, but received [{c(t) = ...}, {b(t) = ...}, {a(t) = ...)}]

PDEtools[declare](a(t), b(t), c(t), prime = t):
symgen(eq2+eq3+eq4=0);
a(t) will now be displayed as a
b(t) will now be displayed as b
c(t) will now be displayed as c
derivatives with respect to t of functions of one variable will now be
displayed with 'symgen(....)'

update
if it can not do for 3 function a(t),b(t),c(t) system of differential equations
then

i change to use
eq2 := subs(b(t)=a(t),subs(c(t)=a(t),eq2));
eq3 := subs(b(t)=a(t),subs(c(t)=a(t),eq3));
eq4 := subs(b(t)=a(t),subs(c(t)=a(t),eq4));

with(DEtools, buildsym, equinv, symtest):
ans := dsolve(eq2 = 0, Lie);
buildsym(ans[1], a(t));
buildsym(ans[2], a(t));
buildsym(ans[3], a(t));

there are 3 answers, can i use one of it to recover the equation eq2 or  eq3 or eq4?

ans := dsolve(eq3=0, Lie);
buildsym(ans[1], a(t));
sym2 := buildsym(ans[2], a(t));
buildsym(ans[3], a(t));

sym := [_xi=rhs(sym2[2]),_eta=rhs(sym2[1])];
ODE := equinv(sym, a(t));
eq3 - ODE;
sym := [_xi=rhs(sym2[1]),_eta=rhs(sym2[2])];
ODE := equinv(sym, a(t));
eq3 - ODE;
but ODE is not equal to original eq3
ans := dsolve(eq4=0, Lie);
buildsym(ans[1], a(t));
buildsym(ans[2], a(t));

ans := dsolve(eq2+eq3+eq4=0, Lie);
sym := buildsym(ans[1], a(t));
ODE := equinv(sym, a(t));
eq2+eq3+eq4 - ODE;
sym := buildsym(ans[2], a(t));
ODE := equinv(sym, a(t));
eq2+eq3+eq4 - ODE;
sym := buildsym(ans[3], a(t));
ODE := equinv(sym, a(t));
simplify(eq2+eq3+eq4 - - ODE);

can not recover the original result

## how to calculate probability of matrix in this cas...

i count the number among group
but when the list a large such as over 1000 records, the count will be over 30,000
use which denominator to find probability?
is there any functions in maple for this case?

with(LinearAlgebra):
correlationlist1 := [[1,2,3],[1,3,5]....]:
PAB := Matrix(50):
for ii from 1 to nops(correlationlist) do
for jj from 1 to nops(correlationlist[ii]) do
for kk from 1 to nops(correlationlist) do
for qq from 1 to nops(correlationlist[kk]) do
if ii <> kk then
#print("scan=",correlationlist2[kk],"kk=",kk,"qq=",qq,"row=",correlationlist[ii][jj],"column=",correlationlist[kk][qq]):
PAB[correlationlist[ii][jj],correlationlist[kk][qq]] := PAB[correlationlist[ii][jj],correlationlist[kk][qq]] + 1: # group to group relations
end if:
od:
od:
od:
od:

## How to use statistics correlate function with a li...

If there is a list

[[1,2],[2,2],[3,3]...

how to use correlate function?

assume [1,2] and [2,1] count as 2

when find correlation between 1and 2

if [1,2] and [2,1] are different

first position as key

means 1 relate with 2 count as 1 case for 1 only

[2,1] count as 1 case for 2 only

## How to convert string integer into integer?...

How to convert "123" into integer 123

i use sprintf %d still can not convert to integer

## Do maple have a Boolean simplify?...

If input a group of outputs which are binary numbers

can it simplify to give a logic that can output these outputs

## How to output a statistic of a list of items...

If input ["1","1","2","2","2","77"]

output a graph such as

1 has 2 times

2 has 3 times

77 has 1 time

## How to change a string of binary numbers into a ch...

"01000001" is A

how convert string of binary into a characters?

and

how to convert this string into 65 too?

## How to write a general table for get value with a ...

Primetable :=table[(2=b,3=c)]

so far, hard code in above code

is there a generic code for general

according alphabet order 5=d,7=e etc

## How to get the first minimum factor of an integer?...

Op(1,ifactor(12))

is 2^2

it has power

how to get 2 only

## Can maple change string into maple command...

If I pass "a := x + y;"

as a string

can it turn to command?

if so, can it export this feature into c# or python?

## how to count the number of decimal places if input...

how to count the number of decimal places if input a decimal number

## how to calculate implication logic result directly...

i use

A -> B

B -> C

would like to find A -> C directly from A -> B and B -> C

but logic table show that AND(A->B, B->C) is not equal to A -> C

and (A->B) -> (B->C) is not equal to A -> C too

which logic operations can do this?

because do not want to use result to verify and because i do not know the result in the beginning