Home > Mathematica > Tupper-ware

Tupper-ware

I particularly enjoyed a Numberphile video on the”everything formula”. Well here is a version of my tupper number:
10863073715080204906841374744817870686017991652471808478614429324955090671
29438251181615100031499425215408982583164877324535761283139840521296005040
31360524655562687211280130028399893118045121796015094250844818624778631078
72981939769966210871228064281785763761146932169138082985217088594080562295
37546337291561618284716976212986394441886696136661981542340085562415246492
12721838470511199078533181750124932100952254283927665003938152391834859900
76871547601110832975908601693268743079629420352988718065924114415309278644
9332931313946066944  

Here is my first attempt at coding (unfortunately wordpress does not correctly process my code tag, hence the image):  
tupper
tupf produces the array plot and tupn the number. The above number was produced using tupn[Style["u b p d q n",20]]…not perfect but fun.

Advertisements
Categories: Mathematica
  1. No comments yet.
  1. July 11, 2015 at 2:42 pm

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s

%d bloggers like this: