Scot Gould

Scot Gould

1044 Reputation

15 Badges

12 years, 225 days
Claremont McKenna, Pitzer, Scripps College
Professor of Physics
Upland, California, United States
Dr. Scot Gould is a professor of physics at Claremont McKenna, Pitzer, and Scripps Colleges - members of The Claremont Colleges in California. He was involved in the early development of the atomic force microscope. His research has included numerous studies and experiments using scanning probe microscopes, particularly those involving natural fibers such as spider silk. More recently, he was involved in developing and sustaining AISS. This full-year multi-unit, non-traditional, interdisciplinary undergraduate science education course integrated topics from biology, chemistry, physics, mathematics, and computer science. His current interest is integrating computational topics into the physics curriculum. He teaches the use of Maple's computer algebraic and numerical systems to assist students in modeling and visualizing physical and biological systems. His Dirac-notation-based quantum mechanics course is taught solely through Maple.

MaplePrimes Activity


These are answers submitted by Scot Gould

I have not found a simple way to change the colors within Maple.

However, there is a way you can hack a set of different colors onto the screen. Mine is a set of coffee cream colors. Note:
1) You can't set individual colors. Rather, you load a set of predefined window colors.
2) This hack has only been tested on an MS Windows environment.
3) I sincerely doubt it is endorsed by Maplesoft. 
4) It does not always work. The worst outcome is that you end up with the standard set of colors.

To hack a set of new colors for the environment:
0) Close all Windows of Maple.
1) Locate the user preference file for Maple. This file is called maple.ini, but it is not the "initialization file". https://www.maplesoft.com/support/help/Maple/view.aspx?path=worksheet/reference/preferencesfile
2) Copy the file from the directory, which may be hidden, onto the desktop. 
3) Edit the file using a text editor. 
4) Find the term "GUITheme". (If not present, see instructions below.)
5) Change the name of the skin to a different skin name. (See list below.) My personal preference is Coffee Creme as in:
GUITheme = org.pushingpixels.radiance.theming.api.skin.CremeCoffeeSkin
6) Save the file on the desktop.
7) Copy the file back to the directory.
8) Open Maple. You should see a different skin color than the business blue.

--------------

4) If the term "GUITheme" is not located, after the line "AutoSaveEnabled=true", add, on a new line, the phrase:
GUITheme = org.pushingpixels.radiance.theming.api.skin.
return to 5
--------------
Some popular skins, not all have been tested, and some I do know fail. (* work for me.)

  • Business
  • Business Blue
  • Business Black Steel*
  • Creme
  • Creme Coffee*
  • Emerald Dusk*
  • Field of Wheat
  • Magellan
  • Mariner
  • Mist Aqua
  • Mist Silver
  • Moderate
  • Office Blue 2007
  • Office Silver 2007
  • Office Black 2007
  • Raven
  • Sahara
  • Sentinel
  • Sunset
  • Twilight

To add a skin, write the name and include the word Skin, such as:

GUITheme = org.pushingpixels.radiance.theming.api.skin.EmeraldDuskSkin

See the document for information about the useful procedure evalc. I like it because it presents the complex expression in the format of a + i b.

test_SG.mw

Double-click on the title bar at the top to maximize the window. That usually works. 

Or [in 2D Input mode] use a space: c*x as in

 

problem := diff(c*x/(1+x), x)

c/(1+x)-c*x/(1+x)^2

(1)

simplify(problem)

c/(1+x)^2

(2)

NULL

Download diff_example.mw

LinearAlgebra:-Equal(mtest, LinearAlgebra:-ZeroMatrix(3))

Delay the evaluation of the modp procedure in the product using 'modp' in FB. Then, FB := 2. 

BugTestSimple_delayed.mw

You cannot because this is a 3rd-order differential equation, and you are provided with only two equations of
conditions. You require another for a single equation and not a family of equations.  
However, you can explore potential curves.

restart; sols := dsolve({diff(u(x), x, x, x)-u(x) = x+2, (D(u))(0) = 2, ((D@@2)(u))(0) = 2})

u(x) = -2-x+(1/2)*(5+c__2)*exp(x)+c__2*exp(-(1/2)*x)*cos((1/2)*3^(1/2)*x)+(1/3)*3^(1/2)*exp(-(1/2)*x)*sin((1/2)*3^(1/2)*x)

(1)

u := MakeFunction(rhs(sols), x, c__2)

proc (x, _C2) options operator, arrow; -2-x+(1/2)*(5+_C2)*exp(x)+_C2*exp(-(1/2)*x)*cos((1/2)*3^(1/2)*x)+(1/3)*3^(1/2)*exp(-(1/2)*x)*sin((1/2)*3^(1/2)*x) end proc

(2)

Explore(plot(u(x, C), x = 0 .. 10), parameters = [C = -5.0 .. 5.0], adaptview = false)

 

``

Download 3rd_order_ode.mw

Go to https://www.gould.prof/learning-maple, and at the bottom of the webpage are a video and PDF examples of generating Mandelbrot sets.

I would use a combination of @dharr 's solution and your presentation. dharr's shows the value of Maple, and yours shows how one can think about the solutions that Maple returns. 

restart; interface(imaginaryunit = I); with(plots)

Start with how the equation is formulated

eqn := x^N = R

 

where

N := 8; R := 64


Solve:

sols := simplify([solve(eqn)])

[2^(3/4), -2^(3/4), I*2^(3/4), -I*2^(3/4), (1+I)*2^(1/4), (-1-I)*2^(1/4), (1-I)*2^(1/4), (-1+I)*2^(1/4)]

(1)

 

Now show that it is equivalent to solving this problem the way you approached it.

radSols := simplify([seq(R^(1/N)*exp((I*(2*Pi/N))*n), n = 0 .. N-1)])

[2^(3/4), (1+I)*2^(1/4), I*2^(3/4), (-1+I)*2^(1/4), -2^(3/4), (-1-I)*2^(1/4), -I*2^(3/4), (1-I)*2^(1/4)]

(2)


Finally, plot on the complex plane both solutions

solve_plot := complexplot(sols, style = point, legend = "Maple solution", symbol = solidcircle, symbolsize = 40, color = "xkcd:Red"); vector_plots := `~`[arrow]([seq(`<,>`(Re(radSols[n]), Im(radSols[n])), n = 1 .. N)], width = 0.4e-1, legend = "vector solution"); L := ceil(R^(1/N)); display(solve_plot, vector_plots, view = [-L .. L, -L .. L], scaling = constrained, size = [500, 500])

 

NULL


 

Download Complex_Plane_Solutions.mw

Simple solution: double-click on the title bar, and the app fills the screen, causing the missing buttons to appear. 

LOL! This problem appeared today in my class after I changed the display size.

Double-click on the tabs to change the state of the ribbon. 

@nm

1) Hit the Alt button
2) hit the I button (for insert)
3) hit the S button (for section)
4) hit <enter>

To answer your question on how to insert a constraint, I recommend inserting a piecewise operation into the inner summation. 

constraint_piecewise.mw

ic2 says to take the derivative of u(x, 0) with respect to t, not take the derivative of the function and evaluate at t =0.

For ic3,

u__t is a name and is not u.

Webinar = web-based seminar.

A seminar is an event where speakers present content. 

You will receive a link to show up on your favorite device for viewing video at the time of the webinar. Click on it just before the event starts. 

The event will likely be recorded and uploaded to the Maplesoft YouTube account, but not until later. You are one of the lucky few who have been invited to see the new Maple features just before Maple 2025 is released.  

Try it! Have fun!

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