- Файл
- История файлов
- Использование файла
- Глобальное использование файлов
- Метаданные
Размер этого PNG-превью для исходного SVG-файла: 600 × 600 пикселей . Другие разрешения: 240 × 240 пикселей | 480 × 480 пикселей | 768 × 768 пикселей | 1024 × 1024 пикселей | 2048 × 2048 пикселей | 1000 × 1000 пикселей .
Исходный файл (SVG - файл, номинально 1000 × 1000 пикселей, размер файла: 1,45 MB)
Резюме
ОписаниеКролик Юля с spine.svg | Английский: Кролик Юля с позвоночником |
Дата | |
Источник | Наша работа |
Автор | Адам маевски |
Другие версии |
|
Лицензирование
Я, владелец авторских прав на это произведение, публикую его под следующей лицензией:
| Этот файл находится под лицензией Creative Commons Attribution-Share Alike 4.0 International . | |
https://creativecommons.org/licenses/by-sa/4.0 CC BY-SA 4.0 Лицензия Creative Commons Attribution-Share Alike 4.0 правдаправда |
Максимальный код CAS src
/ * командный файл для Maxima CASмаксимальная партия ( "r.mac" ) * / начало: elapsed_run_time () ;убить ( все ) ; remvalue ( все ) ; / * -------------------------- определения из функций ------------------- ----------- * / f ( z, c ) : = z * z + c ; / * Комплексное квадратичное отображение * / finverseplus ( z, c ) : = sqrt ( zc ) $ finverseminus ( z, c ) : = - sqrt ( zc ) $ / * * / П ( р, г, с ) : = , если р = 0 , то г ElseIf р = 1 , то F ( Z, C ) остальное е ( п ( р-1, г, с ) , с ) $/ * Стандартный многочлен F_p \, который корни являются периодические Z-точки из периода р и его делителей * / Р ( р, г, гр ) : = п ( р, г, с ) - г $/ * Функция для вычислительных уменьшается полином G_p \, который корни являются периодические Z-точки из периода р без его делителей * / Г [р, г, с]: = блок ( [F: делителей ( р ) , т: 1], / * т является временным переменным = продуктом из Gn для ( делителей из р ) других , чем р * / F: удаление ( P, F ) , / * удаление р из списка из делителей * / , если р = 1 , то возвращает ( р ( р , z, c )) , для i in f do t: t * G [i, z, c], g: F ( p, z, c ) / t, return ( ratsimp ( g )) ) $GiveRoots ( g ) : = block ( [cc], cc: bfallroots ( expand ( % i * g ) = 0 ) , cc: map ( rhs, cc ) , / * удалить строку «c =» * / cc: map ( 'float, cc ) , return ( cc ) ) $ / * Endcons в сложную точку в списке в в формате для вытягивания пакета * / endconsD ( точка, список ) : = endcons ( [realpart ( точка ) , imagpart ( точка ) ], список ) $ consD ( точка, список ) : = минусы ( [realpart ( точка ) , imagpart ( точка ) ], список ) $GiveForwardOrbit ( z0, с, Imax ) : = / * вычисляет ( без убегания теста ) вперед орбиты в точке z0 и сохраняет его в в список для жеребьевки пакета * / блок ( [г, орбита, темп], г: z0, / * первая точка = критическая точка z: 0 + 0 *% i * / орбита: [[realpart ( z ) , imagpart ( z ) ]], для i: 1 через шаг 1 iMax do ( z: expand ( f ( z, c )) , orbit: endcons ( [realpart ( z ) , imagpart ( z ) ], orbit )) , возврат ( орбита ) ) $ / * Дает точки по обратной орбите из г = репеллер * / GiveBackwardOrbit ( с, репеллер, zxMin, zxMax, zyMin, zyMax, iXmax, iYmax ) : = блок ( hit_limit: 4, / * пропорционально к количеству из деталей и время на чертеже * / PixelWidth: ( zxMax-zxMin ) / iXmax, PixelHeight: ( zyMax-zyMin ) / iYmax, / * 2D массив из хитов пикселей . Хит > 0 означает , что точка была в орбите * / массив ( Hits, Fixnum, iXmax, iYmax ) , / * нет хитов для начала * / / * выбрать отпугиватель г = репеллер , как в исходной точке * / стек: [репеллер], / * сохранить репеллер в стеке * / / * сохранить первый пункт в список из пикселей * / x_y: [репеллер], / * обратные итерации из репеллера * / петли, / * поп = принять одну точку из в стек * / Z: последний ( стек ) , стека: удаление ( г, стека ) , / * обратная итерация - первая прообраза ( root ) * / z: finverseplus ( z, c ) , / * перевод из мира в координату экрана * / iX: fix (( realpart ( z ) -zxMin ) / PixelWidth ) , iY: fix (( imagpart ( z ) -zyMin ) / PixelHeight ) , hit: Hits [iX, iY], если hit then ( Hits [iX, iY]: hit + 1, stack: endcons ( z, s галс ) , / * толчок = добавь г в в конце из списка стека * / если хит = 0 , то x_y: endcons ( г, x_y ) ) , / * обратная итерация - второй прообразом ( корень ) * / г: -z, / * перевод из мира в координату экрана , покрытие в целое число * / iX: fix (( realpart ( z ) -zxMin ) / PixelWidth ) , iY: fix (( imagpart ( z ) -zyMin ) / PixelHeight ) , hit: Hits [iX , IY], если нажать клавишу затем ( Hits [гЙ, IY]: хит + 1, стек: endcons ( г, стек ) , / * толчок = добавить г в в конце из списка стека , чтобы продолжить итерацию * / если хит = 0 , то x_y: endcons ( г, x_y ) ) , если это ( не emptyp ( стек )) затем идут ( петли ) , возврат ( x_y ) / * список из пикселей в в виде [z1, z2] * / ) $ / * ----------------------------------- * / Psi_n ( r, t, z_last, Max_R ) : = / * * / блок ( [Imax: 200, iMax2: 0], / * ----- вперед итерация из 2 -й точек : z_last и ж -------------- * / массив ( вперед, Imax-1 ) , / * вперед орбита из z_last для сравнения * / вперед [0]: z_last, я: 0, в то время как кабины ( вперед [I] ) и я < ( Imax-2 ) у ( / * вперед итерации из г в FC плоскости и , кроме него , чтобы вперед массив * / вперед [+ 1]: вперед [я] * вперед [я] + с, / * г * г + с * / / * вперед итерации из ш в плоскости f0 : w ( n + 1 ) : = wn ^ 2 * / r: r * 2, / * квадратный радиус = R ^ 2 = 2 ^ ( 2 * r ), потому что R = 2 ^ r * / t: mod ( 2 * t, 1 ) , / * * / iMax2: iMax2 + 1, i: i + 1 ) , / * вычисляем последнюю точку w ; она равна точке z * / R: 2 ^ r, / * w : R * exp ( 2 *% pi *% i * t ) , z: w, * / array ( backward, iMax-1 ) , backward [iMax2]: rectform ( ev ( R * exp ( 2 *% pi *%) i * t ))) , / * использовать последний w в качестве отправной точки для обратной итерации до нового z * / / * ----- точка обратной итерации z = w в плоскости fc ---------- ---- * / для i: iMax2 шаг от -1 до 1 do ( temp: float ( rectform ( sqrt ( backw ard [i] -c ))) , / * sqrt ( zc ) * / scalar_product: realpart ( temp ) * realpart ( forward [i-1] ) + imagpart ( temp ) * imagpart ( forward [i-1] ) , if ( 0> scalar_product ) then temp: -temp, / * выбрать прообраз * / назад [i-1]: temp ) , return ( backward [0] ) ) $ GiveRay ( t , c ) : = block ( [r], / * диапазон для рисования R = 2 ^ r ; когда r стремится к 0, R стремится к 1 * / rMin: 1E-10, / * 1E-4 ; rMin> 0; если rMin = 0, то программа имеет бесконечный цикл !!!!! * / rMax: 2, осторожно: 0,9330329915368074, / * r: r * осторожно ; это дает меньший r * / / * верхний предел для итерации * / R_max: 300, / * * / ZZ: [], / * массив для г точек зрения луча в FC плоскости * / / * некоторые ш-точек зрения внешнего луча в f0 плоскости * / г: Rmax, в то время как 2 ^ г сделать г : 2 * r, / * находим точку w на луче около бесконечности ( R> = R_max ) в плоскости f0 * / R: 2 ^ r, w: rectform ( ev ( R * exp ( 2 *% pi *% i * t ))) , z: w, / * почти бесконечность z = w * / zz: cons ( z, zz ) , если только r do ( / * новый меньший R * / r: r * осторожно, R: 2 ^ r , / * * / w: rectform ( ev ( R * exp ( 2 *% pi *% i * t ))) , / * * / last_z: z, z: Psi_n ( r, t, last_z, R_max ) , / * z = Psi_n ( w ) * / zz: cons ( z, zz ) ) , return ( zz ) ) $ / * Преобразует комплексное число г = х * у *% я , чтобы в списке в виде дро формате: [х, у] * / д ( г ) : = [поплавка ( realpart ( г )) , поплавок ( imagpart ( г )) ] $ToPoints ( myList ) : = points ( map ( d, myList )) $/ * Дают Draw список из одной точки * / ToPoint ( г ) : = точки ( [г ( г ) ] ) $GiveSpine ( zc, Alfa, c, iMax ) : = блок ( [s, center, cut], / * Первый центр из компонента, только один !!! * / center: zc, s: [center], / * Первая пара из срезанных точек * / S: минусы ( Alfa, с ) , вырезать : -альф, S: endcons ( вырезать, с ) , для я: 1 через IMAX шаг 1 дел ( / * Пара из компонента «ы центры * / центр: finverseminus ( центр, гр ) , S: минусы ( центр, ев ) , центр : - центр, S: endcons ( центр, ев ) , / * Пара из срезанных точек * / вырезать : finverseminus ( вырезать, гр ) , S: минусы ( вырезать, S ) , вырезать : - вырезать, S: endcons ( вырезать, S ) ) , / * преобразовать в формат рисования и вернуть список * / s: ToPoints ( s ) ) $компилировать ( все ) $ / * ----------------------- главная ------------------------ ---------------------------- * /период: 3 $ / * Внешний угол в поворотах * / / * разрешения является пропорционально к количеству от деталей и времени на чертеже * / iX_max: 1000 $ iY_max: 1000 $ / * определить г-плоскость ( динамическая ) * / ZxMin: -2,0 $ ZxMax: 2.0 $ ZyMin: -2.0 $ ZyMax: 2.0 $ / * Дают с в значение * / с: +0,74486176661974 *% я-+0,12256116687665 $ / * центр в период 3 компонента * / / * вычисление фиксированных точек * / Beta: float ( rectform (( 1 + sqrt ( 1-4 * c )) / 2 )) $ / * вычисление бета-версии с фиксированной точкой отталкивания * / alfa: float ( rectform (( 1-sqrt ( 1-4 * c )) / 2 )) $ / * другая фиксированная точка * / / * Вычислить назад орбита из отталкивающей фиксированной точки * / х: GiveBackwardOrbit ( с, бета, ZxMin, ZxMax, ZyMin, ZyMax, iX_max, iY_max ) $ / * вычисление точек лучей и сохранение в список zz * / eRayZero: GiveRay ( 0/1 , c ) $ eRay1o2: GiveRay ( 1/2 , c ) $ позвоночник: GiveSpine ( 0 , alfa, c, 4 ) $ / * Время из вычислений * / время: исправление ( elapsed_run_time () -start ) $ / * Сделать это , используя раздаточный пакет по * / load ( рисовать ) $ Путь: «~ / максимумы / партии / джулия / Позвоночник / кролик /» $ / * если пустой , то файл находится в виде дома реж * / / * Если графический файл является пустой ( = 0 байт ) , то запустите Draw2D команду еще раз * / draw2d ( terminal = 'svg, file_name = sconcat ( path, "rabbitSpine_" ) , user_preamble = "установить размер квадрата; установить ключ вверху справа" , title = concat ( "Динамическая плоскость для fc (z) = z * z +" , строка ( c )) , размеры = [iX_max, iY_max], yrange = [ZyMin, ZyMax], xrange = [ZxMin, ZyMax], xlabel = "Z.re" , ylabel = "Z.im" , point_type = fill_circle, points_joined = true, point_size = 0.2 , color = red, points_joined = false, color = black, key = "обратная орбита z = beta" , points ( map ( realpart, xy ) , map ( imagpart, xy )) , points_joined = true, point_size = 0.2 , color = red, key = "external ray 0" , ToPoints ( eRayZero ) , key = "внешний луч 1/2" , цвет = пурпурный, ToPoints ( eRay1o2 ) , points_joined = true, point_size = 0,8 , цвет = серый, ключ = "spine" , spine, points_joined = false, color = black, point_size = 1.4 , key = "критическая точка z = 0,0" , ToPoint ( 0,0 ) , color = red, point_size = 1.4 , key = "отталкивающая фиксированная точка z = beta" , ToPoint ( бета ) , color = magenta, key = "минус бета" , ToPoint ( -Beta ) , color = yellow, key = "привлечение фиксированной точки z = alfa" , ToPoint ( alfa ) ) $
Элементы, изображенные в этом файле
изображает
creator<\/a>"}},"text\/plain":{"en":{"":"creator"}}},"{\"value\":{\"entity-type\":\"property\",\"numeric-id\":2093,\"id\":\"P2093\"},\"type\":\"wikibase-entityid\"}":{"text\/html":{"en":{"":"author name string<\/a>"}},"text\/plain":{"en":{"":"author name string"}}},"{\"value\":\"Adam majewski\",\"type\":\"string\"}":{"text\/html":{"en":{"P2093":"Adam majewski","P4174":"Adam majewski<\/a>"}},"text\/plain":{"en":{"P2093":"Adam majewski","P4174":"Adam majewski"}}},"{\"value\":{\"entity-type\":\"property\",\"numeric-id\":2699,\"id\":\"P2699\"},\"type\":\"wikibase-entityid\"}":{"text\/html":{"en":{"":"URL<\/a>"}},"text\/plain":{"en":{"":"URL"}}},"{\"value\":\"https:\\\/\\\/commons.wikimedia.org\\\/wiki\\\/user:Adam_majewski\",\"type\":\"string\"}":{"text\/html":{"en":{"P2699":"https:\/\/commons.wikimedia.org\/wiki\/user:Adam_majewski<\/a>"}},"text\/plain":{"en":{"P2699":"https:\/\/commons.wikimedia.org\/wiki\/user:Adam_majewski"}}},"{\"value\":{\"entity-type\":\"property\",\"numeric-id\":4174,\"id\":\"P4174\"},\"type\":\"wikibase-entityid\"}":{"text\/html":{"en":{"":"Wikimedia username<\/a>"}},"text\/plain":{"en":{"":"Wikimedia username"}}}}" class="wbmi-entityview-statementsGroup wbmi-entityview-statementsGroup-P170 oo-ui-layout oo-ui-panelLayout oo-ui-panelLayout-framed">
создатель
некоторая ценность
строка имени автора : Адам маевски
URL : https://commons.wikimedia.org/wiki/user:Adam_majewski
Имя пользователя в Викимедиа : Адам маевски
copyright status<\/a>"}},"text\/plain":{"en":{"":"copyright status"}}},"{\"value\":{\"entity-type\":\"item\",\"numeric-id\":50423863,\"id\":\"Q50423863\"},\"type\":\"wikibase-entityid\"}":{"text\/html":{"en":{"P6216":"copyrighted<\/a>"}},"text\/plain":{"en":{"P6216":"copyrighted"}}}}" class="wbmi-entityview-statementsGroup wbmi-entityview-statementsGroup-P6216 oo-ui-layout oo-ui-panelLayout oo-ui-panelLayout-framed">
статус авторского права
защищенный авторским правом
copyright license<\/a>"}},"text\/plain":{"en":{"":"copyright license"}}},"{\"value\":{\"entity-type\":\"item\",\"numeric-id\":18199165,\"id\":\"Q18199165\"},\"type\":\"wikibase-entityid\"}":{"text\/html":{"en":{"P275":"Creative Commons Attribution-ShareAlike 4.0 International<\/a>"}},"text\/plain":{"en":{"P275":"Creative Commons Attribution-ShareAlike 4.0 International"}}}}" class="wbmi-entityview-statementsGroup wbmi-entityview-statementsGroup-P275 oo-ui-layout oo-ui-panelLayout oo-ui-panelLayout-framed">
лицензия на авторское право
Creative Commons Attribution-ShareAlike 4.0 International
inception<\/a>"}},"text\/plain":{"en":{"":"inception"}}},"{\"value\":{\"time\":\"+2019-01-06T00:00:00Z\",\"timezone\":0,\"before\":0,\"after\":0,\"precision\":11,\"calendarmodel\":\"http:\\\/\\\/www.wikidata.org\\\/entity\\\/Q1985727\"},\"type\":\"time\"}":{"text\/html":{"en":{"P571":"6 January 2019"}},"text\/plain":{"en":{"P571":"6 January 2019"}}}}" class="wbmi-entityview-statementsGroup wbmi-entityview-statementsGroup-P571 oo-ui-layout oo-ui-panelLayout oo-ui-panelLayout-framed">
зарождение
6 января 2019 г.
source of file<\/a>"}},"text\/plain":{"en":{"":"source of file"}}},"{\"value\":{\"entity-type\":\"item\",\"numeric-id\":66458942,\"id\":\"Q66458942\"},\"type\":\"wikibase-entityid\"}":{"text\/html":{"en":{"P7482":"original creation by uploader<\/a>"}},"text\/plain":{"en":{"P7482":"original creation by uploader"}}}}" class="wbmi-entityview-statementsGroup wbmi-entityview-statementsGroup-P7482 oo-ui-layout oo-ui-panelLayout oo-ui-panelLayout-framed">
источник файла
оригинальное творение загрузившего
История файлов
Щелкните дату / время, чтобы просмотреть файл в том виде, в котором он выглядел в то время.
Дата / время | Эскиз | Габаритные размеры | Пользователь | Комментарий | |
---|---|---|---|---|---|
Текущий | 10:38, 6 января 2019 | 1000 × 1000 (1,45 МБ) | Адам маевски | Страница, созданная пользователем с помощью UploadWizard |
Использование файла
Следующие страницы английской Википедии используют этот файл (страницы других проектов не указаны):
Глобальное использование файлов
Следующие другие вики используют этот файл:
- Использование на ar.wikipedia.org
- رنب دوادي
- Использование на en.wikibooks.org
- Фракталы / Итерации в комплексной плоскости / def cqp
Метаданные
Этот файл содержит дополнительную информацию, вероятно, добавленную с цифровой камеры или сканера, которые использовались для ее создания или оцифровки.
Если файл был изменен по сравнению с исходным состоянием, некоторые детали могут не полностью отражать измененный файл.
Краткое название | Gnuplot |
---|---|
Название изображения | Произведено GNUPLOT 5.3 patchlevel 0 |
Ширина | 1000 |
Высота | 1000 |