Перейти на страницу файла на Викискладе

Файл:2d birthday.png

Материал из Википедии — свободной энциклопедии
Перейти к навигации Перейти к поиску

Исходный файл(915 × 642 пкс, размер файла: 94 Кб, MIME-тип: image/png)

Краткое описание

Описание
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])$
Дата
Источник Собственная работа (personal work)
Автор Sten Kultakangas

Лицензирование

Public domain Я, владелец авторских прав на это произведение, передаю его в общественное достояние. Это разрешение действует по всему миру.
В некоторых странах это не может быть возможно юридически, в таком случае:
Я даю право кому угодно использовать данное произведение в любых целях без каких-либо условий, за исключением таких условий, которые требуются по закону.

Краткие подписи

Добавьте однострочное описание того, что собой представляет этот файл

Элементы, изображённые на этом файле

изображённый объект

image/png

642 пиксель

915 пиксель

История файла

Нажмите на дату/время, чтобы посмотреть файл, который был загружен в тот момент.

Дата/времяМиниатюраРазмерыУчастникПримечание
текущий23:14, 8 апреля 2017Миниатюра для версии от 23:14, 8 апреля 2017915 × 642 (94 Кб)Kultakangasfixed the title
23:01, 8 апреля 2017Миниатюра для версии от 23:01, 8 апреля 2017915 × 642 (88 Кб)Kultakangas{{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...

Следующая страница использует этот файл:

Глобальное использование файла

Данный файл используется в следующих вики:

Метаданные