Scot Gould

Scot Gould

732 Reputation

14 Badges

11 years, 149 days
Claremont McKenna, Pitzer, Scripps College
Professor of Physics
Upland, California, United States
Dr. Scot Gould is a professor of physics in the W.M. Keck Science Department of 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 questions asked by Scot Gould

Hopefully, this is a question relating to Mathematica, which I find virtually unreadable, and the Statistics package, which I am minimally familiar with, that someone can answer quickly.

Hence, could someone translate the following Mathematica code into Maple code? (The MmaTranslator failed at the 2nd line.)

func[x_] := 1/(1 + Sinh[2*x]*(Log[x])^2);

Distrib[x_, average_, var_] :=   PDF[NormalDistribution[average, var], 1.1*x - 0.1];
n = 10;
RV = RandomVariate[TruncatedDistribution[{0.8, 3}, NormalDistribution[1, 0.399]], n];
Int = 1/n Total[func[RV]/Distrib[RV, 1, 0.399]]*Integrate[Distrib[x, 1, 0.399], {x, 0.8, 3}]

One can use the "|" character to combine vectors to create a matrix. Is there a slick way to separate a matrix into a list of column vectors besides using the LinearAlgebra:-Column procedure? 

If one writes:

y := x+1

x+1

(1)

 

Then, one can display y = x+1 using this notation

 

'y' = y

y = x+1

(2)

 

However, regardless of the type of punctuation I use with the Explore procedure (or even the IntertForm package), the value for y is calculated. (See examples below.)  My question is:

 

How can I get Explore to write it out as in line (2) with x evaluated?

 

Examples:

(The first is a jpg of what is shown since MaplePrimes cannot show the Explore output.)

 

 

Explore('y' = y, x = 0 .. 5, echoexpression = false)

Explore(y = y, x = 0 .. 5, echoexpression = false)

Explore(InertForm:-Display(y) = y, x = 0 .. 5, echoexpression = false)

Download Explore_with_Inert_Form_of_display.mw

This is not a critical situation. A solution was developed. However, I am interested in trying to understand and explain to a colleague why their function failed to plot. The colleague often works on problems involving large factorial values.

failed_plot.mw

1 2 3 4 5 6 7 Page 2 of 8