Christopher2222

4855 Reputation

22 Badges

10 years, 215 days

MaplePrimes Activity


These are answers submitted by Christopher2222

Your output is 2DOutput so go through the Format menu at styles and choose 2DOutput and Modify.

I recommend getting rid of Debian, not Maple but seriously, it's more of a debian font issue than a problem with maple.

@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

1 2 3 4 5 6 7 Last Page 3 of 43