Skip to main content

Questions tagged [recreational-mathematics]

The tag has no usage guidance.

Filter by
Sorted by
Tagged with
0 votes
0 answers
79 views

Mathematical Equations Puzzle: Perfect Sixes

pI have given the following problem to my students Write some code that solves the perfect sixes problem for all numbers it works for! The perfect sixes problem asks you to solve some equations: \...
Athanasios Paraskevopoulos's user avatar
3 votes
2 answers
276 views

Can Mathematica resume the data that has been completely closed/quit?

Imagine that I run these four simple plots on a PC and then close and quit Mathematica, say the notebook file name is NOTE1 ...
math2021's user avatar
  • 749
5 votes
2 answers
134 views

Find Minimal covering sets for $n\times n\times n$ grid (covering means each grid point has a axis line in common with set)

Let $G_n$ be a $n\times n\times n$ lattice, so $G_n=$Join@@Join@@Array[{##}&,{10,10,10}]. Given a set of lattice points $U$, we say it 'covers' another set $V$ ...
Adam's user avatar
  • 3,956
10 votes
5 answers
1k views

How can I efficiently calculate exact probability distributions for D&D dice like "4d8"?

I play a lot of tabletop role-playing games, and I have been interested recently in modeling the various game mechanics involving dice. As I see it, a single throw of an eight-sided die can be modeled ...
nben's user avatar
  • 2,158
3 votes
2 answers
962 views

How can a verbal reasoning question be solved with Mathematica?

Could a "verbal reasoning" problem like the following be solved with Mathematica? What comes next in the series. KD XP NG VN QJ TL TM Correct answer is <...
Manu Chadha's user avatar
1 vote
1 answer
342 views

How to plot the "trapping region" in Henon Map?

I am writing a paper that makes use of the Henon map. I have managed to plot the Henon map but now require plotting the "trapping region" shown in the image. Do I require to plot it as a ...
Awnon Bhowmik's user avatar
2 votes
1 answer
178 views

Calculate the Leyland number index of a given Leyland (x,y) pair

A Leyland number L(x,y) is x^y + y^x where x>=y>1. OEIS A076980 prepends L(2,1) as its first term. The first ten Leyland number (x,y) pairs ordered by magnitude are (2,1), (2,2), (3,2), (4,2), (...
Hans Havermann's user avatar
8 votes
3 answers
629 views

Ignoring fractions can lead to correct answer

There is a curious example in Posamentier's book "Magnificent Mistakes in Mathematics" (p. 72): $(7+3/7)*(4-3/13)= 7*4=28$, where cancelling the fractions leads to correct result. If we ...
Darko G's user avatar
  • 141
0 votes
2 answers
74 views

A function of a list of, say, 100 cities, and we want the FURTHEST point in the Continental US

I haven't given up on this problem but not being fluent in the Mathematica Wolfram Language, mainly because I don't know the commands. Tia
Veritas Lux's user avatar
2 votes
1 answer
86 views

Compact BaseForm Alternative that Extends to Bases > 36

I recently created a document listing the terms of OEIS sequence A256112 in BaseForm. Term #164 and #165 at the end of the document are the two solutions in base 35....
Hans Havermann's user avatar
4 votes
1 answer
168 views

Calculating Rubiks $ 2 \times 2 \times 2 $ Permutation using Cycles

The help page of PermutationGroup shows a neat example on calculating the permutations of a $3\times 3\times 3$: ...
Tino 's user avatar
  • 219
1 vote
2 answers
127 views

Generate a sequence of primes giving position and value of a digit in its digit-decomposed version

The prime sequence starts: ...
Hans Havermann's user avatar
1 vote
0 answers
119 views

Need help plotting on Mathematica simple piecewise wave function from quantum physics (Quantum Physics, Griffiths, 2.7) [closed]

On Mathematica need to plot an initial wave function defined as... Psi(x,0) = Ax when 0 <= x <= a/2 Psi(x,0) = A(a - x) when a/2 <= x <= a Here is my attempted code... ...
Jules Manson's user avatar
  • 2,467
2 votes
2 answers
130 views

Creating a large database of all palindromic numbers

OEIS A002113, palindromes in base 10, shows a number of Mathematica constructs. I have used: ...
Hans Havermann's user avatar
14 votes
3 answers
599 views

Importing a grid of numbers from an image (sudoku like)

Can anyone see a way to import a grid of numbers from http://www.mit.edu/~puzzle/2019/puzzle/lantern_festival.html into Mathematica? TextRecognize doesn't seem ...
Yaroslav Bulatov's user avatar
0 votes
0 answers
87 views

Recreational Math: Plots of "Roman Numerals"

I have been trying to solve a recreational math problem using Mathematica. Specifically, I am trying to plot the vanishing set $V_k := \{(x,y): F(x,y,k)=0\}$ for the family of functions \begin{...
user676464327's user avatar
9 votes
1 answer
416 views

Antipodal Land Area Calculation

Mathematica 12 does antipodal graphics! See here for my treatment of antipodal New Zealand. Most of the Earth's above-sea-level land will have ocean at its antipode. Is there a way to calculate what ...
Hans Havermann's user avatar
2 votes
1 answer
802 views

How to calculate linear conflicts on a board?

Thanks to your help to solve previous problems, I have been able to advance in the learning of mathematica. It seems that this project to make a solver for the 8-puzzle has surpassed my abilities in ...
bullitohappy's user avatar
  • 1,289
5 votes
2 answers
244 views

Simplify the use of Table together with FoldList

I am trying to recreate the following table,where you have the question mark. to do it occupy the following commands, but I would like to help me improve my code to make it more practical especially ...
bullitohappy's user avatar
  • 1,289
1 vote
0 answers
127 views

Will my procedure be correct?

I am facing a problem when trying to solve the exercise of page 210 of the book GRAPHICS with MATHEMATICA, FRACTALS, JULIA SETS, PATTERNS and NATURAL FORMS of the authors CHONAT GETZ and JANET ...
bullitohappy's user avatar
  • 1,289
1 vote
1 answer
86 views

Problem with wrapping a basic function

I'm working my way through Mathematica Challenges and tripped myself up on the first question. I have a basic piece of code which works, but am having trouble formatting it to be a proper written ...
BBirdsell's user avatar
  • 1,196
3 votes
1 answer
187 views

Generating prime factorizations from an integer's digits by inserting * and ^ into the digit sequence

Problem Given a positive integer, output all possible valid prime-factorization "statements" thereof created by inserting zero or more multiplication (*) symbols and zero or more power (^) symbols ...
Hans Havermann's user avatar
0 votes
2 answers
238 views

Puzzle 2: Sum-Till Forty (Something Funny)

I am learning Mathematica because I love it. I also love solving puzzles so I think it would be a nice way to learn Mathematica through puzzles. This is the second puzzle in a series I intend to solve....
Jawad_Mansoor's user avatar
5 votes
1 answer
636 views

Algorithm for Egyptian fractions, want to optimize the maximum denominator size

Any rational number can be expanded into a finite sum of unit fractions with distinct denominators, called Egyptian fractions. There is no 'optimal' algorithm in terms of denominator size or number ...
Yuriy S's user avatar
  • 675
0 votes
1 answer
114 views

How to figure out an equation from a plot?

I am trying to figure out the equations y=f(x) of the red dashed lines in this log-linear graph where the x values were plotted on a logarithmic scale while the y values were kept linear. I tried to ...
Pure Function's user avatar
5 votes
2 answers
168 views

Making a gift from the given set of points

I have a set of points ...
vito's user avatar
  • 8,958
9 votes
2 answers
551 views

Rotations of a number

If we start with a number like 1234 and produce the following sum 1234 + 123 + 12 + 1 = 1370. If we are given the 1370 can I retrieve the 1234? A similar question was migrated over to the Math.SE ...
bobbym's user avatar
  • 2,638
4 votes
3 answers
134 views

Function for converting to base b, taking derivative with respect to b and evaluating at b

I am relatively new to Mathematica and I would like to program a function taking 2 variables in and giving 1 output. I think the best way to describe the function is like so: Given a base 10 number x ...
mtheorylord's user avatar
7 votes
3 answers
292 views

Can Mathematica help me win my on-line game?

I've become addicted to the Forge of Empires web browser game. Presently, the game has a special event going on, which is in commemoration of the 2016 EUFA Soccer Championship. The event has a set ...
bobthechemist's user avatar
15 votes
3 answers
2k views

Can anyone explain this weird Plot3D error?

This is more of a fun question because I see the source of the error, but cannot explain what Plot3D is doing. Can you figure it out? ...
lynvie's user avatar
  • 476
8 votes
3 answers
891 views

Better answer to Santa's riddle about sum of a number's divisors?

I was hoping to find an elegant solution to this riddle, using only a line or two of Mathematica: Santa Claus was telling one of his elves: "If I multiply the age of three of my reindeer, I get ...
Apo's user avatar
  • 115
3 votes
4 answers
674 views

Solving puzzles with Mathematica

I would like to be able to solve logic puzzles such as the one described here using Mathematica. I have copied & pasted the listed example below to save on jumping about with hyperlinks: The ...
martin's user avatar
  • 8,678
14 votes
8 answers
5k views

How to make a resizable chess board?

For some reason I need to create a chess board. I can create a chess board by following command: ...
forumcash's user avatar
  • 557