# The Gunslinger and the Tower

(More fun with Midjourney!)

# “Caves”

I had a small puzzle RPG idea: you have to explore and find something, except that the “worlds” themselves would be easy to specify and shareable etc.

Nothing very original, but still fun to make.

I need another week or so to make it an MVP, but not going to get it for quite some time.

Anyway, the current WIP is at cavequest.org

# Of moons and planets

Something fascinating from an “amateur analysis” of the moon’s orbit — the sort of thing I’m sure a lot of people wish they did but never do.

In other words, the Sun exerts more than twice as much gravitational force on the Moon as the Earth does. Asimov argued that this means the Moon is really orbiting the Sun, with some perturbation by the Earth, and that’s why the Moon’s path looks like a slightly wobbly circle around the Sun.

We might look upon the Moon, then, as neither a true satellite of the Earth, nor captured one, but as a planet, in its own right, moving about the Sun, in careful step with the Earth. To be sure, from within the Earth-Moon system, the simplest way of picturing the situation is to have the Moon revolve about the Earth; but if you were to draw a picture of the orbits of the Earth and Moon about the Sun, exactly to scale, you would see that the Moon’s orbit is everywhere concave toward the Sun. It is always “falling” toward the Sun.

P.S. the link to the Asimov book is here.

# Golden Sections

I was inspired by this short Randall Carlson episode to re-construct the diagram in Wolfram Mathematica.

It is a geometric construction of “the golden mean”, and then viewing it as a ratio, as the basis for a triangle, and as the basis for a pair of circles.

Here is a screenshot of that intermediate step:

For extra fun, there is a comparison of this ratio with a few interesting real-world … objects.

Here is a screenshot of that part:

But the real takeaway is how fluid it is to tinker with all this.

As I grow older, I really appreciate the “amateur joy” of all this 🙂

Here is the notebook published to the cloud, free to access publicly.

# Circle Art

Some simple, quick, random (yet, it should be pointed out in this age of Dall-E, deliberate and human-made) art featuring colored circles:

``````circles :=
Table[{RandomColor[],
Disk[{RandomInteger[{-15, 15}], RandomInteger[{-15, 15}]},
RandomInteger[{2, 7}]]}, 20]

backgroundDim := 19

background :=
Rectangle[{-backgroundDim, -backgroundDim}, {backgroundDim,
backgroundDim}]
Graphics[{RGBColor[0.0117647, 0.313725, 0.588235], background, Red,
circles}]

title = StringJoin["Random Art# ", ToString[RandomInteger[10^10]]]``````

# Plotting diamonds

More Wolfram Mathematica fun, when my daughter wanted to make a “diamond shape” in “hot pink”.

Here’s the “source of truth”:

And here’s the rendering in Mathematica:

# Geometrick T-shirts

I had a T-shirt with a certain pattern that was fading out. I didn’t know at the time that this had a name, and later learned it was a geometrical pattern that had certain interesting connections. I won’t link to that here, but you can find it by searching for “Metatron’s cube” online.

Re-creating this geometrical pattern became a fun exercise within Wolfram Mathematica (which is such a useful and under-rated tool, btw, I can’t recommend it enough for anyone with the slightest interest in doodling, tinkering, learning, simulating …).

Nothing fancy, just a bunch of circles, points, lines, triangles. Good old-fashioned geometry.

I was able to experiment with a few different designs until I settled on one I liked. Mathematica allowed me to export what I had as a regular PNG file.

I still had to do some post-processing — to be honest, I’m sure there are tools within Mathematica for this, but I just used a photo-editing tool on my laptop to remove all the black and make the background transparent.

I had to pick a website to use for this, since there are so many options today. I went with something that I knew from many years ago, Zazzle, though again, I’m sure there’s something better right now.

Here is the finished product: https://www.zazzle.com/metatron_t_shirt-235618796112684422

Here’s an example of rendering it within Wolfram Mathematica:

# Polar Primes

This “five minutes of Wolfram Language” exercise can be surprisingly therapeutic 🙂

I had come across something interesting today:

However, I then wanted to try it out on my own.

These days, the commonly available frameworks/libraries make it too hard to just up-and-sketch-something.

… which is where WolframLanguage comes in.

I was able to make a simple notebook for this in five minutes:

https://www.wolframcloud.com/obj/agam.brahmawolfram/Published/Polar%20Primes.nb

… and have the satisfaction of seeing that yes, it is indeed true.

Seeing things on your own, making things on your own, is a really nice feeling.

# Wolfram Language “dashboards”

Playing around with Mathematica for a few minutes.

Or rather, using it to play around.

I’m trying to figure out the “least B.S.” portions of “web3/defi/whatever”. So far, a limited goal is to follow along a couple of “stable, publicly used and usable” blockchains, and I picked Tezos and Cardano for this.

I built some probing views for each, as cloud notebooks:

Very elementary stuff, but it took a few minutes, and really shows how Wolfram (Mathematica) is a really great “computational explorer” right now.

P.S. eyeballing the two, at a very subjective, no-flame-war, just-this-instance level, Tezos seems to be stably handling about 2x transaction throughput compared to Cardano.