Податотека:Digits in largest prime found as a function of time.svg

Содржината на страницата не е поддржана на други јазици.
Од Википедија — слободната енциклопедија

Изворна податотека(SVG податотека, номинално 540 × 408 пиксели, големина: 59 КБ)

Врска до Ризницата Ова е податотека од Ризницата на Викимедија и може да се користи на други проекти. Подолу е наведена содржината на нејзината описна страница.
Заедничката ризница е складиште на слободно-лиценцирани слики и снимки. И Вие можете да помогнете.

Опис

Опис
English: Plot of the number of digits in largest known prime by year, since the electronic computer. Note that the vertical scale is logarithmic. The green line is the exponential curve of best fit that was followed roughly until 1999; the red curve is a linear fit, more accurate after 1999. Run the source code below to get actual
Русский: График зависимости числа цифр в наибольшем известном простом числе по годам с момента появления первого компьютера. Вертикальная шкала логарифмическая. Зеленая линия - экспоненциальная кривая наилучшего приближения, которой примерно следовал рост числа цифр до 1999 года; красная кривая - это линейная аппроксимация, более точное приближение после 1999 г.
Датум
Извор сопствено дело
Автор Nicoguaro
Други верзии
SVG разработка
InfoField
 
SVG-кодот е исправен.
 
Оваа векторска слика е изработена со Matplotlib
Изворен код
InfoField

Python code

"""
import numpy as np
import matplotlib.pyplot as plt
from scipy.optimize import curve_fit
from matplotlib import rcParams

rcParams['font.size'] = 14

# Data
data = np.array([[
            1952,     1952,     1957,     1961,     1961,     1963,
            1963,     1971,     1978,     1979,     1979,     1982,
            1983,     1985,     1989,     1992,     1994,     1996,
            1996,     1997,     1998,     1999,     2001,     2003,
            2004,     2005,     2005,     2006,     2008,     2013,
            2016,     2018,     2018],
       [     157,      687,      969,     1281,     1332,     2917,
            3376,     6002,     6533,     6987,    13395,    25962,
           39751,    65050,    65087,   227832,   258716,   378632,
          420921,   895932,   909526,  2098960,  4053946,  6320430,
         7235733,  7816230,  9152052,  9808358, 12978189, 17425170,
        22338618, 23249425, 24862048]])
year = data[0, :]
primes = data[1, :]

year_of_lin_growth = 1998

plt.plot(year, primes, color="#377eb8", marker=".", drawstyle='steps-post')
plt.yscale('log')
# Fit function
def lin_fun(x, a, b):
    return a*x + b

def exp_fun(x, a, b):
    return np.exp(a*x + b)
    
## Plot the older part which follows exponential growth of digits with time
popt, pcov = curve_fit(lin_fun, year[year <= year_of_lin_growth], np.log(primes[year <= year_of_lin_growth]))
x_vals = np.linspace(np.min(year), year_of_lin_growth, 20)
y_vals = exp_fun(x_vals, *popt)
plt.plot(x_vals, y_vals, color="#1ae41c", linestyle="dashed", label='digit number doubling every {:.1f} y'.format(np.log(2)/popt[0]))
print('Exponential fit (green curve): y = exp({:.4f} * t  +  {:.4f})'.format(*popt))



year_of_lin_growth = 1998
## Plot the newer part which follows linear growth of digits with time
popt, pcov = curve_fit(lin_fun, year[year >= year_of_lin_growth], primes[year >= year_of_lin_growth])
x_vals = np.linspace(year_of_lin_growth, np.max(year), 100)
y_vals = lin_fun(x_vals, *popt)
plt.plot(x_vals, y_vals, color="#e41a1c", linestyle="dashed", label='digit number growing by $10^6$ every {:.2f} y'.format(1e6/popt[0]))
print('Linear fit (red curve): y = {:.4g} * t  +  {:.4g}'.format(*popt))

# Plot details
plt.legend(prop={'size':10})
plt.xlabel("Year")
plt.ylabel("Number of digits in largest known prime")
plt.savefig("Digits_in_largest_found_prime_as_a_function_of_time.svg", bbox_inches="tight")
plt.show()

Лиценцирање

Јас, праводржецот на ова дело, со ова го објавувам истото под следнава лиценца:
w:mk:Криејтив комонс
наведи извор
Оваа податотека е под лиценцата Криејтив комонс Наведи извор 4.0 Меѓународна.
Можете:
  • да споделите – да го умножувате, распространувате и емитувате делото
  • да преработувате – да преработувате
Под следните услови:
  • наведи извор – Ќе мора да дадете прикладен припис, да ставите врска до лиценцата и да укажете дали има направено промени. Ова може да биде направено на било кој разумен начин, но без да оддава впечаток дека лиценцодавецот стои зад Вас и Вашата употреба.

Описи

Опишете во еден ред што претставува податотекава

Предмети прикажани на податотекава

прикажува

Историја на податотеката

Стиснете на датум/време за да ја видите податотеката како изгледала тогаш.

Датум/времеМинијатураДимензииКорисникКоментар
тековна14:09, 22 август 2020Минијатура на верзијата од 14:09, 22 август 2020540 × 408 (59 КБ)Gap9551fixed error in linear rate (red line fit) in legend
13:46, 22 август 2020Минијатура на верзијата од 13:46, 22 август 2020540 × 408 (59 КБ)Gap9551Reverted to version as of 11:22, 22 August 2020 (UTC) file appears fine now
13:39, 22 август 2020Минијатура на верзијата од 13:39, 22 август 2020540 × 408 (59 КБ)Gap9551another attempt to upload file with 4.3 yr doubling time. the previous upload did not overwrite the existing file.
13:22, 22 август 2020Минијатура на верзијата од 13:22, 22 август 2020540 × 408 (59 КБ)Gap9551doubling time fixed in legend
15:17, 24 јуни 2020Минијатура на верзијата од 15:17, 24 јуни 2020540 × 409 (56 КБ)FDominecUpdated datasets to 2020; added exponential and linear portions of the curve fit.
22:30, 13 септември 2016Минијатура на верзијата од 22:30, 13 септември 2016659 × 504 (63 КБ)NicoguaroUser created page with UploadWizard

Податотекава се користи во следнава страница:

Глобална употреба на податотеката

Оваа податотека ја користат и следниве викија:

Метаподатоци