Christopher2222

MaplePrimes Activity


These are answers submitted by Christopher2222

@mapleatha 

Maybe something like

S1 := map(allvalues,sol);
remove(has, S1, I)

 

 

example of remove

a:=[1,2,3,6,7,8,9,12,24,45,56,23]

remove(`>`,a,10)
                               [1,2,3,6,7,8,9]

 

 

Maybe just use op?

op(f)[2]*``op(f)[1]

                

simplify(``sort(expand(f), s, ascending))

**edit added**  seems we can do away with the ,s,ascending part of the code and just write

simplify(``sort(expand(f)))
                                   

alternately using rhs will work as well

rhs(sol[1])
                         1

map(rhs,sol)
                     {1,2,3}

map(rhs,sol)[1]
                          1

 

 

 

 

 

Use listplot after performing the DCT from the SignalProcessing package.  Remember the DCT won't work with a stereo signal so use ToMono to convert your signal.

Seems to be the only way to 0 is to expand first

Generally sometime from March to May and only once has it been released in February.  It will be Maple 2018

Here's a start.  First the noisy clown jpg
clown-noise.zip
Saving the picture to the c:/ drive

Borrowing some help from _Maxim_ in another question.  But I haven't gone further than I have since I haven't figured out how to mask and continue, anyone?


 

 

with(ImageTools):

with(DiscreteTransforms):

a := Read("c:/clown-noise.jpg")

a := Vector(4, {(1) = ` 1..128 x 1..128 `*Array, (2) = `Data Type: `*float[8], (3) = `Storage: `*rectangular, (4) = `Order: `*C_order})

(1)

ImageTools:-Embed(a)

b := `~`[ln](Array(abs(DiscreteTransforms:-FourierTransform(a)), datatype = float[8], order = C_order));

b := Vector(4, {(1) = ` 1..128 x 1..128 `*Array, (2) = `Data Type: `*float[8], (3) = `Storage: `*rectangular, (4) = `Order: `*C_order})

(2)

c := FitIntensity(ArrayTools:-CircularShift(b, 128*(1/2), 128*(1/2))):

Embed(Scale(c, 2))``


 

Download NoisyClown.mw

3. None of the methods listed on the evalf/Int page can handle this integral:

evalf(Int(1/((1-1/4*t^2)*sqrt(1-t^2)*sqrt(1-4*t^2)), t = 0 .. 3/2));

Although it can be done by splitting the integration range into 0..1/2, 1/2..1, 1..3/2.

None of the methods listed on the evalf/Int page can handle this computation:

Splitting is not required, if you change Int to int there is an answer returned  1.587000405-1.261993177*I

try expand then simplify

You forgot to include the variables after local, just add them after local

local T,Tinv,Dg:

also don't forget the semicolon or colon afterwards.

A colon after end proc:  will prevent Maple from mirroring the procedure in an output.

Another alternate

``(A).``(B)=A.B

If you use answer people can vote up (5 points) for your answer if they like it.  Or if you have a good enough question and people like it or favorite it, each is another 5 points.  Using reply to answer, won't allow anyone to vote up your answer.

I'm not sure but it could be font related.  I noticed the language is Danish?  Maybe downloading the Danish font, I don't know.  I loaded your file into Word and Notepad but it was blank - it could be because I don't have the Danish font, maybe someone else could check it out. 

First 6 7 8 9 10 11 12 Last Page 8 of 48