21,404 reputation
246105
bio website sites.google.com/a/unca.edu/…
location Asheville, NC
age
visits member for 2 years, 10 months
seen 15 hours ago

I've been a professor of mathematics at The University of North Carolina - Asheville since 1997. I've been using Mathematica since I started graduate school in mathematics at Ohio State in 1989. At that time, we used version 1.1 (as I recall) to teach calculus in our Calculus and Mathematica classes. I've used it pretty much continuously in my teaching and research since then.

In addition to my posts on SE, you can find some of my papers, teaching notebooks and other Mathematica based oddities strewn throughout my website.

In recent years, I've also worked as a part-time consultant to Wolfram Research focusing on development of mathematical content for WolframAlpha.


Nov
7
comment Graphs Plotting Discontinuous
Much faster, in fact! I actually considered that but didn't try it as I figured it would be very slow as Eigenvalues is evaluated with each and every step. Evidently, the list Root objects take longer to evaluate than Eigenvalues, which might very well be evaluated numerically in this context. Looks worth a +1!
Nov
7
comment Graphs Plotting Discontinuous
But now, all the plots are the same color. Worse, the standard tricks involving Evaluate, With, or the Evaluated option all bring the discontinuities back, as Chop applied to non-numeric expressions just returns the expressions. I was only able to resolve this by generating the data and using ListPlot.
Oct
28
comment Accessing Reduce from DSolve
Seems so simple - thanks!
Oct
16
comment Getting errors when I try to evaluate code taken from Trott's Mathematica Guidebook for Graphics
Have a look at mathematica.stackexchange.com/questions/20912/…
Oct
5
comment Graphics3D not rendering Ball as a filled object
@m_goldberg Show[{DiscretizeRegion[Ball[],{{0,1},{0,1},{0,1}}],Graphics3D[Sphere[]]}] works fine for me. I really don't understand your object to the answer at all. Regardless, the assertion that it's not relevant seems patently false.
Oct
4
comment Graphics3D not rendering Ball as a filled object
@m_goldberg Well, you asked if it was a bug. I replied "this is a minor bug" with explanation as to why I consider it to be minor and suggested a workaround.
Oct
3
comment StreamPlot for Bifurcation Diagram
@Stephen I'm glad you found the code useful! It sounds like you might need to incorporate a SaveDefinitions option into your code, if you want the dynamic content to work when you open the notebook. It's hard to say for sure, though, without seeing your code.
Sep
27
comment Enumerating all connected graphs with 9 vertices
Should be faster if you use FindIsomorphism[g,g,All] on a Graph object. On my iPhone right now so I can't try it just now.
Sep
27
comment Fitting ellipse to 5 given points on the plane
@Jens My assumption is that the OP simply wants to add more points that are know to be on the same ellipse, rather than find a best fit.
Sep
27
comment Fitting ellipse to 5 given points on the plane
@user153012 If you'd like to plot more points in a list, say morePoints, simply add another Point primitive containing your list to the Epilog.
Sep
27
comment Enumerating all connected graphs with 9 vertices
@EdenHarder I believe the Graph6 representation of a graph depends on the ordering of the vertices and, as such, is not unique so there's no reason to expect "HhcWJEA" to be on that list. Presumably, one of the automorphisms of your graph leads to your g6 code.
Sep
27
comment Plotting Semi-hollow spheres
In light of the post of @belisarius, I wonder if the answers here contributed significantly to your cover image? If so, attribution (which I don't see, but might have missed in the article) would be appropriate.
Sep
27
comment Enumerating all connected graphs with 9 vertices
getConnG[7] in about 6 minutes.
Sep
27
comment Bifurcation diagrams for multiple equation systems
@belisarius I saw that question but was not quite able to figure a good way to approach it. At least, not given the kind of time I've got these days!
Sep
27
comment Enumerating all connected graphs with 9 vertices
I modified your code slightly so that getConnG[6] runs in 5 seconds as opposed to 30 seconds on my machine. The major point is that DeleteDuplicates has quadratic time complexity when using a user defined comparison function. Thus, breaking the list of graphs in smaller parts using the total number of edges helps a lot. Of course, DeleteDuplicates can run like $n\log(n)$, when the data is linearly ordered, but that's not generally possible with a user defined comparison function.
Sep
24
comment What's wrong in FunctionPeriod?
I don't think this is a duplicate, as the other question predates FunctionPeriod. Also, while FunctionPeriod builds on the Periodic context, there are differences. I guess I'd say it's a bug but I doubt that it's a very high priority bug.
Sep
23
comment Unable to compile to C
Works for me with 10.0.1 on Mac OSX. Did you recently update? What's your platform?
Sep
23
comment Combining many plots with Show produces wrong x-axis position and wrong filling
@rcollyer Yes, I think you're right. I guess my approach fixes the problem precisely because it forces the AxesOrgin to be the same throughout.
Sep
23
comment getting vertices in order from spanning tree
I get a sequence of errors of the form: Function::flpar: Parameter specification Append[vlist,#1] in Function[Append[vlist,#1],1] should be a symbol or a list of symbols. >> I guess this can be fixed using SetDelayed rather than Set.
Sep
23
comment Combining many plots with Show produces wrong x-axis position and wrong filling
The problem is that the filling is generated to fit within each individual plot range. So just set the PlotRange in each of the plots individually, rather than just in the Show command. That way, the filling will fill the whole common plot range.