Wolfram Function Repository

Instant-use add-on functions for the Wolfram Language

Function Repository Resource:

 CistercianNumberEncode

Source Notebook

Encode a number according to the system devised by Cistercian monks

Contributed by: Sander Huisman

ResourceFunction["CistercianNumberEncode"][n]

encodes the number n to the Cisterian number system.

Details and Options

Only works for integer numbers from 0 to 9999.
The output of ResourceFunction["CistercianNumberEncode"] is a Graphics object.

Examples

Basic Examples (1) 

Encode the number 1987 to the Cistercian number system:

In[1]:=
ResourceFunction["CistercianNumberEncode"][1987]
Out[1]=

Scope (4) 

Show the digits 0–9:

In[2]:=
ResourceFunction["CistercianNumberEncode"] /@ Range[0, 9]
Out[2]=

Show the digits 0–90 in steps of 10:

In[3]:=
ResourceFunction["CistercianNumberEncode"] /@ Range[0, 90, 10]
Out[3]=

Show the digits 0–900 in steps of 100:

In[4]:=
ResourceFunction["CistercianNumberEncode"] /@ Range[0, 900, 100]
Out[4]=

Show the digits 0–9000 in steps of 1000:

In[5]:=
ResourceFunction["CistercianNumberEncode"] /@ Range[0, 9000, 1000]
Out[5]=

Possible Issues (3) 

Negative numbers can not be encoded:

In[6]:=
ResourceFunction["CistercianNumberEncode"][-10]

Numbers larger than 9999 can not be encoded:

In[7]:=
ResourceFunction["CistercianNumberEncode"][12345]

Only whole numbers can be encoded:

In[8]:=
ResourceFunction["CistercianNumberEncode"][13.37]
Out[8]=

Neat Examples (2) 

Encode the current year:

In[9]:=
Column[{#, ResourceFunction["CistercianNumberEncode"][#]}, Center] &[ First[DateList[]]]
Out[9]=

Show a random collection of numbers:

In[10]:=
Table[ResourceFunction["CistercianNumberEncode"][ RandomInteger[{0, 9999}]], {5}, {10}] // Grid
Out[10]=

Publisher

SHuisman

Version History

  • 1.0.0 – 02 December 2020

Source Metadata

  • Citation:
    • King, D.A. (2001). The Ciphers of the Monks: A Forgotten Number-notation of the Middle Ages. F. Steiner. ISBN 9783515076401.

Related Resources

License Information