2023 in Base 37

[mfleming]

Another approach, using Albert's base conversion function and indexing, we could have

Code:


      base←⊥⍣¯1
      digits←'0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'

      37 base 2023
1 17 25
      digits[1+37 base 2023]
1HP

Extending the range of digits and encapsulating the operation as a function gives

Code:


      +digits←digits,'abcdefghijklmnopqrstuvwxyz'
0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz
      digits[1+62 base 257175174]
HP50g

      tochar←{digits[1+⍺ base ⍵]}
      37 tochar 2023
1HP
      62 tochar 257175174
HP50g

Now just need the reverse conversion to see a season's greeting!

~Mark

[edit] Oops! Function base corrected per Albert [/edit]