File:2d birthday.png

Original file(915 × 642 pixels, file size: 94 KB, MIME type: image/png)

Captions

Captions

Add a one-line explanation of what this file represents

Summary edit

Description
English: plot generated using the following maxima commands:

array (check, 99, 99); for m:1 thru 100 do for n:1 thru 100 do check[m-1,n-1] : 0 $

array (result, 99, 99); for m:1 thru 100 do ( for n:1 thru 100 do ( if (check[m-1,n-1] = 0) then ( tmp : 1-1/365**(m+n)*sum(sum(stirling2(m,i)*stirling2(n,j)*product(365-k,k,0,i+j-1),j,1,n),i,1,m), result[m-1,n-1] : tmp, result[n-1,m-1] : tmp, check[m-1,n-1] : 1, check[n-1,m-1] : 1, if (mod(n, 10) = 0 or mod(m, 10) = 0) then display(n,m) )))$


plot3d (result[floor(x)-1,floor(y)-1], [x,1,100],[y,1,100], [zlabel,""], [mesh_lines_color,false], [elevation,0], [azimuth,0], color_bar, [grid,99,99], [ztics,false], [color_bar_tics,1])$
Date
Source Own work (personal work)
Author Sten Kultakangas

Licensing edit

Public domain I, the copyright holder of this work, release this work into the public domain. This applies worldwide.
In some countries this may not be legally possible; if so:
I grant anyone the right to use this work for any purpose, without any conditions, unless such conditions are required by law.

File history

Click on a date/time to view the file as it appeared at that time.

Date/TimeThumbnailDimensionsUserComment
current23:14, 8 April 2017Thumbnail for version as of 23:14, 8 April 2017915 × 642 (94 KB)Kultakangas (talk | contribs)fixed the title
23:01, 8 April 2017Thumbnail for version as of 23:01, 8 April 2017915 × 642 (88 KB)Kultakangas (talk | contribs){{Information |Description ={{en|1=plot generated using the following maxima commands: array (check, 99, 99); for m:1 thru 100 do for n:1 thru 100 do check[m-1,n-1] : 0 $ array (result, 99, 99); for m:1 thru 100 do ( for n:1 thru 100 do ( if (chec...

There are no pages that use this file.

File usage on other wikis

The following other wikis use this file:

Metadata