Файл:Conway's constant.svg
Перейти до навігації
Перейти до пошуку
Розмір цього попереднього перегляду PNG для вихідного SVG-файлу: 600 × 600 пікселів. Інші роздільності: 240 × 240 пікселів | 480 × 480 пікселів | 768 × 768 пікселів | 1024 × 1024 пікселів | 2048 × 2048 пікселів | 694 × 694 пікселів.
Повна роздільність (SVG-файл, номінально 694 × 694 пікселів, розмір файлу: 35 КБ)
Опис файлу
| Опис |
English: The lines show the growth of the numbers of digits in the look-and-say sequences with starting points 23 (red), 1 (blue), 13 (violet), 312 (green). These lines (when represented in a logarithmic scale) tend to straight lines whose slopes coincide with Conway's constant. |
| Час створення | |
| Джерело |
Plotted in Maple and converted to SVG format in Inkscape, using the following Maple code: > with(plots); > f := proc (n) options operator, arrow; `mod`(n, 10) end proc; > g := proc (n) options operator, arrow; `mod`(floor((1/10)*n), 10) end proc; > h := proc (n) if 1 <= evalf(log10(n)) then if f(n) = g(n) then return 1+h(floor((1/10)*n)) else return 1 end if else return 1 end if end proc; > k := proc (n) if 0 < n then return f(n)+10*h(n)+10^(floor(log10(f(n)+10*h(n)))+1)*k(floor(n/10^h(n))) else return 0 end if end proc; > sequence := proc (N) local i; for i to 19 do N[i+1] := [][i][2])] end do end proc; > sequencedigits := proc (N) local i; for i to 20 do N[i][2] := floor(log10(N[i][2])) end do end proc; > AA := vector(20); AA[1] := [1, 23]; sequence(AA); sequencedigits(AA); a := logplot(AA, color = red); > BB := vector(20); BB[1] := [1, 1]; sequence(BB); sequencedigits(BB); b := logplot(BB, color = blue); > CC := vector(20); CC[1] := [1, 13]; sequence(CC); sequencedigits(CC); c := logplot(CC, color = violet); > DD := vector(20); DD[1] := [1, 312]; sequence(DD); sequencedigits(DD); d := logplot(DD, color = green); > display(a, b, c, d, view = [1 .. 20, 1 .. 10000]); |
| Автор | Sandrobt |
Ліцензування
Я, власник авторських прав на цей твір, добровільно публікую його на умовах таких ліцензій:
Цей файл ліцензований на умовах ліцензії Creative Commons Attribution-Share Alike 3.0 Unported
- Ви можете вільно:
- ділитися – копіювати, поширювати і передавати твір
- модифікувати – переробляти твір
- При дотриманні таких умов:
- зазначення авторства – Ви повинні вказати авторство, надати посилання на ліцензію і вказати, чи якісь зміни було внесено до оригінального твору. Ви можете зробити це в будь-який розсудливий спосіб, але так, щоб він жодним чином не натякав на те, наче ліцензіар підтримує Вас чи Ваш спосіб використання твору.
- поширення на тих же умовах – Якщо ви змінюєте, перетворюєте або створюєте іншу похідну роботу на основі цього твору, ви можете поширювати отриманий у результаті твір тільки на умовах такої ж або сумісної ліцензії.
|
Дозволяється копіювати, розповсюджувати та/або модифікувати цей документ на умовах ліцензії GNU FDL версії 1.2 або більш пізньої, виданої Фондом вільного програмного забезпечення, без незмінних розділів, без текстів, які розміщені на першій та останній обкладинці. Копія ліцензії знаходиться у розділі GNU Free Documentation License. |
Ви можете обрати ліцензію на ваш розсуд.
Історія файлу
Клацніть на дату/час, щоб переглянути, як тоді виглядав файл.
| Дата/час | Мініатюра | Розмір об'єкта | Користувач | Коментар | |
|---|---|---|---|---|---|
| поточний | 01:04, 6 лютого 2011 | | 694 × 694 (35 КБ) | wikimediacommons>Beao | Transparent. |
Використання файлу
Така сторінка використовує цей файл:
