20,946 reputation
244101
bio website sites.google.com/a/unca.edu/…
location Asheville, NC
age
visits member for 2 years, 8 months
seen yesterday

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.


Jul
24
comment How to solve an integral equation by iteration method?
No biggie - you'll probably be an expert one day!
Jul
23
comment How to solve an integral equation by iteration method?
Please don't roll back my roll back! Honestly, it makes no sense for two reasons. Your original question refers to quite a specific operator so changing the operator wastes the efforts of those who answered the question. Secondly, this question has been closed so no one can answer it now anyway. If you have another question, simply open a new question.
Jul
23
comment Cellular Automata Neighborhood as Node connections
@Schwarz The Mod[Total[Table[value[gen - 1, v], {v, adjacentVertices[u]}]], 2, 1] business sets the new value to either 1 or 2, depending on whether the sum of the adjacent nodes is even or odd.
Jul
23
comment How to solve an integral equation by iteration method?
I've rolled back your question to it's original version, as I think your change of dimension is significant enough to warrant a new question. Feel free to open such a new question! Furthermore, no one can really answer this one, as it's closed anyway! (Not that I agree with the closure.)
Jul
23
comment How to solve an integral equation by iteration method?
@JavadKazemi I think the same basic idea should work, though it would be nice to have a specific example in mind.
Jul
22
comment How to solve an integral equation by iteration method?
I win - by 10 seconds! :)
Jul
22
comment HoldForm doesn't hold form
@MikeHoneychurch I've updated my answer to address the first example as well.
Jul
22
comment HoldForm doesn't hold form
I agree that you should consider contacting support. I'm not convinced that this is not by design, however. I've always found ThisForm[ThatForm[expr]] to be a bit awkward.
Jul
22
comment HoldForm doesn't hold form
@Jens Does the edit help? I guess that you've got to selectively apply Inactive to Set but not to InputForm. So Inactivate is a bit too coarse.
Jul
21
comment Mathematica unable to solve equation numerically while Wolfram|Alpha can
Try Solve[2 x == Sinh[x], x, Reals]. This is a common question - here's a similar example.
Jul
21
comment Strange message appearing when using Wolfram Alpha in Mathematica
I recommend that you restart Mathematica and see if this behavior persists.
Jul
18
comment Game of Life in 3D
@eldo And thank you. It is definitely more life like, now. :)
Jul
18
comment Generate Random 3D Network using GraphPlot3D and loop
@Schwarz You should upvote this, if you found it useful. I did.
Jul
17
comment How do I plot points on a sphere using spherical coordinates?
Could you share your points?
Jul
16
comment Fitting the Plot by fourier Series of either sine or cosine
Can you provide all the data?
Jul
16
comment Is this a bug in FunctionDomain (V.10)?
I don't think your Maple comparison is quite fair. You've explicitly asked Maple to solve an inequality, rather than asked for the domain of a function. That doesn't account for more complicated examples, as I've placed in my answer.
Jul
15
comment What information is sent to Wolfram Research when loading or working with Mathematica?
Well, I vote to reopen.
Jul
14
comment Rough mesh lines in partially opaque 3D plots
I don't have a windows machine handy to try this at the moment but you might try rasterization. Something like Rasterize[pic,RasterSize->1000,ImageSize->500]. The result is non-rotatable but, in my experience, yields a very nice image which is quite suitable as a standalone image or for export.
Jul
14
comment How to find valleys of data using new function in V10 PeakDetect
Apply it to $-f$?
Jul
10
comment How do I solve a PDE with a strange boundary condition?
Thanks - mystery man!