Вычисление Возраста Вселенной В R

Как вы узнали возраст Вселенной? В 1929 году американский астроном ЭДвин Хаббл обнаружил, что галактики удаляются друг от друга.
Разделив расстояние между ними на скорость удаления, можно вычислить, как давно они находились в одной точке.
Это приблизительная оценка возраста Вселенной.
График зависимости скорости от расстояния в оригинальной работе Хаббла

Физик Лоуренс Краусс сказал это о Хаббле в одной из своих лекций: «Как видите, он был хорошим ученым, потому что провел прямую линию через множество точек».
(см.
«Появление Вселенной» )

Вычисление возраста Вселенной в R

Исходные данные

Давай попробуем почувствуйте себя настоящими учёными, проведя прямую линию через набор точек .

Сначала давайте загрузим данные Freedman et al. (2001) по расстоянию (Расстояние, Мпк) до 36 сверхновые типа Ia , а также скорость удаления (Velocity, км/с) этих сверхновых, полученную с помощью космического телескопа Хаббл.

Данные доступны в пакете

   

 lava

 library(lava)
 data(hubble)  
 str(hubble)

 ## 'data.frame':    36 obs. of  3 variables:
 $ v    : num  9065 12012 15055 16687 9801 .


 $ D    : num  135 159 199 239 117 .


 $ sigma: num  2.3 3.1 2.8 2.8 3.4 2.9 3.1 2.2 3.4 2.7 .

- attr(*, "labels")= chr "Velocity (km/s)" "Distance (Mpc)" "sigma"

Создание диаграммы Хаббла с использованием базовой графики в R

 plot(hubble$D, hubble$v, axes = FALSE, pch = 20, col = "blue",

Теги: #астрономия #Популярная наука #r #Хаббл #линейная регрессия #возраст Вселенной

Последнее изменение: 2024-10-19 21:10:22

Вместе с данным постом часто просматривают:

Вычисление Возраста Вселенной В R