645 reputation
2731
bio website
location Seattle, WA
age 70
visits member for 2 years, 8 months
seen 14 mins ago

Contact: rudytoody.AT.comcast.DOT.net

I retired in 2006 and bought Mathematica and a stack of math books with the goal to teach myself to become a world-class mathematician. I am on pace to achieve that goal sometime shortly after the next Ice Age.

I consider myself a Mathematical Mutt (no papers) who occasionally ventures off the back porch to play in the yard with the big dogs.

I donate regularly to the The OEIS Foundation.

When I look at the patterns, I can hear the wheels turning. When I look at the math, I find out the hamsters have died.


Oct
29
comment Can degenerating Nicomachus' triangle down to $0$ area by using `Graph` be done?
@RahulNarain, That looks like a viable approach. Thanks.
Oct
28
comment Can degenerating Nicomachus' triangle down to $0$ area by using `Graph` be done?
@belisarius, I have posted the image. It's close to what we should get.
Oct
28
comment Can degenerating Nicomachus' triangle down to $0$ area by using `Graph` be done?
@belisarius, When triangle 1-2-3 is graphed we get a triangle with uniform edges. If we make the edges equal to the differences, the triangle loses its shape and becomes a straight line 1-2-3 with an edge back from 3-1.
Oct
24
comment How can we get this infinite prism lattice to look more like `PolyhedronData[{“Prism”, 3}]`?
Exactly what I need. Thanks.
Oct
1
comment Around the Clock
24-hour clock? xkcd.com/now Just overlay the minute and second hands.
Aug
13
comment How to make a stereogram in Mathematica? (2)
I see pyramid on left, pyramid hole on right. I don't see a triangle.
Jun
17
comment Using a variable for two different purposes
+1, another fine answer. I'll play with it for a few days before I accept anything.
Jun
16
comment Using a variable for two different purposes
A003814 == (j = Table[n, {n, 1, 10}]) works!
Jun
16
comment Using a variable for two different purposes
I tried it and it's getting closer. It finds the OEIS page. I'm still playing with it.
Jun
16
comment Using a variable for two different purposes
Assignment (=) doesn't work. This does work A003814 == Table[n, {n, 1, 10}] except the hyperlink keeps the entire string so doesn't find anything. So the StringJoin should truncate at 7 characters.
Jun
16
comment Using a variable for two different purposes
+1, looks promising.
May
21
comment Solve within a range?
@ssolver, for example: (your dependency here) && at the beginning of the statement. good luck!
May
21
comment Solve within a range?
@ssolver, perhaps you need Clear[x,y,z,kp]. Copy the first statement and remove Full and evaluate and you should get my edit result.
May
21
comment Solve within a range?
@ssolver, I took your statement and added the conditions from the 'Where' and did the Reduce[FullSimplify which gave us the next box. The part to the right of kp== is what I plotted.
May
20
comment What summations can Mathematica do?
ϵ/(nn - 1) (n - 1)^2 this could have zero divide
May
20
comment What summations can Mathematica do?
+1 for second question.
May
19
comment How could I generate words starting with P,h,D?
From the old joke: Piled Higher, Deeper
May
19
comment Using a variable for two different purposes
@Akater, try oeis.org/wiki/User:Enrique_P%C3%A9rez_Herrero/…
Apr
17
comment Why the complicated pattern in this 3D plot?
@Kuba, perfect! Make it an answer and I'll sign off.
Feb
15
comment Conditionally replace rows in lists
@kguler, I was tormented by a simple replacement problem until I found your answer. The _? was the key. b /. _?(1 < # &) :> 0 Thanks for the help.