18,557 reputation
13889
bio website sites.google.com/a/unca.edu/…
location Asheville, NC
age
visits member for 2 years, 6 months
seen 3 mins 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.


Aug
19
comment Sierpinski carpet with GraphData
@gpap There is one vote to close and I addressed my comment to that person. I have no idea who it is.
Aug
19
comment Sierpinski carpet with GraphData
To the close voter - this certainly is not a duplicate of the "Generating a Sierpinski carpet" question.
Aug
18
comment Draw the image of a complex region
@Artes Yes! I improved my voting behavior after being prodded by you. Thanks! (Not that it's outstanding or anything but, certainly, an improvement.)
Aug
18
comment Draw the image of a complex region
@Artes - Worse than even me! Though, I have improved.
Aug
15
comment Step-by-step definite integration
It might be worth noting that Mathematica computes many interesting definite integrals using techniques that do not involve finding an anti-derivative, which is one reason that WA does not provide steps for definite integration. One simple example is Integrate[Sin[Sin[x]],{x,0,2 Pi}].
Jun
30
comment Convert Mathematica formula to TeX (MathJax) with color
@HyperGroups I just tested the links and they work as far as I can tell. Why can't you download them? I think your second ExportString doesn't work because you don't have a well formed Cell. ExportString[Cell[Sqrt[3]],"TeX"] fails to produce useful TeX as well, so it's not the BoxRules. The notebooks contain code that deal with this situation.
Jun
27
comment Cissoid of Diocles not smooth plotted by ContourPlot
@cormullion Is grid not an $n$-dimensional concept for arbitrary, positive, integer $n$? As in GridGraph[{5}] or Grid[{{1,2,3,4,5}}].
Jun
27
comment Cissoid of Diocles not smooth plotted by ContourPlot
Try an odd number of PlotPoints. You might also try MaxRecursion->6 or so. Also, I wouldn't generally expect ContourPlot, which samples points on a 2D grid, to perform as well as Plot, which samples points on a 1D grid.
Jun
23
comment How can I put an image on a surface
This should probably do it.
Jun
20
comment Why is my rasterized graphic blank?
You should certainly indicate what version and OS you're working with for this type of question. The code works fine for me in version 9.0.0 on Mac OSX 10.7.4.
Jun
17
comment Handling Overflow
It would be nice to have more details about what you are doing. If you're iterating a polynomial, for example, there's a simple bound on the absolute value of the iterate, beyond which, you are guaranteed the orbit will diverge to Infinity. It's easy to incorporate this into a loop or a NestWhileList. One issue with Check is that the Overflow[] won't be detected until after it happens. That's way too late, if you're working with compiled code.
Jun
8
comment How to scrape the headlines from New York Times and Wall Street Journal?
@RodLm Yes, that is pretty awesome, isn't it. Mathematica's import/export is generally outstanding in two ways - the broad range of filetypes it works with and the way it consistently represents things in it's own language. You might also be interested in this question, which deals with importing HTML as XML.
Jun
5
comment Combining Graphics & ContourPlot using Show
@0x4A4D That was the first thing I thought of. On Mac OS, at least, the borders of the individual polygons show up as in this question, which is not so attractive.
Jun
4
comment Combining Graphics & ContourPlot using Show
You can see that the area is under the contour shading by setting ContourShading->None in the ContourPlot.
Jun
4
comment Large Number times Tiny Number
I'm curious, where do numbers like 1234567891234567889998.5 come from? I mean, is it a real application? Or is it specifically a test of precision?
Jun
2
comment Mathematica8 can compile this function but Mathematica 9 can't if I set CompilationTarget -> “C”
@OleksandrR. But Print, so far as I know, is not compilable. It certainly doesn't appear in the list Compile`CompilerFunctions[] and CompilePrint[cf1] reveals a callback to MainEvaluate.
Jun
2
comment Mathematica8 can compile this function but Mathematica 9 can't if I set CompilationTarget -> “C”
Although I haven't tried it, I'm certain that @halirutan is correct so, probably, V9 is doing a better job of flagging uncompilable functions In addition, I'd point out that I don't see any output coming from your function. Perhaps, you should replace Do with Table and remove the semi-colon from the final statement inside the loop.
May
31
comment Find limit of Interpolated function
Uhmm... NLimit?
May
31
comment Find limit of Interpolated function
Limit is a purely algebraic tool. You could try NLimit from the NumericalCalculus package. I concur with J.M., however, that your specific example would be best approached with f'.
May
26
comment Common tangent to a curve
@cosmicraga Yes, based on the picture.