Alpha Дмитрия Волова

[BJIaquMup]

Код: [Выделить]

B = 0.8660263`50;
one = B;
pg = 0.000599`50;
c = 0.000000000000000000000000001`50;
two = c;
x1 = 1.3668222`50;
x2 = 1.3668225`50;
xx = (x1 + x2)/2 - 1/2;
Print[xx, "   xx"];
Print[xx - pg, "   xx - pg"];
y2 = 0.8662`30;
y1 = 0.8659`30;
Print[(y1 + y2)/2];
BJIaquMup1 = Compile[{{J, _Real}}, ({J, #} &) /@ Union[
Drop[NestList[J*(one + #)*(one - #) &, two, 7000], 5000]]];
mm = Flatten[Table[BJIaquMup1[J], {J, x1, x2, 1.0*10^(-9)}], 1];
ListPlot[mm, PlotStyle -> {AbsolutePointSize[.01], RGBColor[0, 0.5,
          0.7]}, Frame -> True, FrameStyle -> GrayLevel[0.5], Axes ->
      False, ImageSize -> {500, 500}, PlotRange -> {y1, y2}];
Исследую варицию числа 0.866...
Который как раз и даёт Альфу.
Число 0,866... Получается из псевдопараболы  J(o+x)(o-x)
Через бифуркационную диаграмму методом a la D.Volov.

Число 0.866 как o=0.866., y=0.866 & x=1.3668...

[BJIaquMup]

Код: [Выделить]

B = 0.86698326``50;
one = B;
c = 0.000000000000000000000000001`50;
two = c;
x1 = 0.664;
xx = 2/3;
x2 = 0.669;
y2 = 0.33371`50;
y1 = 0.33369`50;
BJIaquMup1 = Compile[{{J, _Real}}, ({J, #} &) /@ Union[
Drop[NestList[J*(one + #)*(one - #) &, two, 2], 2]]];
mm = Flatten[Table[BJIaquMup1[J], {J, x1, x2, 1.0*10^(-4)}], 1];
ListPlot[mm, PlotStyle -> {PointSize[.01], RGBColor[0, 0, 0.4]}, Frame ->
        True, FrameStyle -> GrayLevel[0.5], Axes -> False, ImageSize -> {
                  500, 500}, PlotRange -> {y1, y2}];
Ho Haдо не забывать и про этот, первый вариант, числа 0,866...

Вместе они оба заставляют чесать репу.
 
И бороду, у кого она есть.
 

[BJIaquMup]

Итак, сморим эти две версии числа 0,866

Исходная формула одна и та же
J*(one + #)*(one - #)

# == x.

1. Дуга
one = 0.86698326`50;
По иксу гоним к 2/3.
По игреку гоним к 1/3.

2. Метла
one = 0.8660263`50;
По игреку гоним к one = 0.866...
По иксу гоним к  x - 1/2 - pg

pg = 0.000599...
Это число я называю Гocnoдин ПЖ.
Это разность между \( \pi \) cтандартным и "Пи" из формулы d-кварка. (x^(x^A))

[BJIaquMup]

А вот здесь скопирую свою старую таблицу №1.

Таблица №1.

Соответствует системе Рикера и графику в виде пузыря.

\[ x_{n+1} = J*x^B_n*(e^{-x_n} + a) \]

B	a	Взаимодействие
0	0.13533528323661269...	Cтарт Всего
0.1093567...	0.1093567...	Кварк-глюонное
1/2	0.05472333241...
2/3	0.04169008...
1	0.02489353...
3/2	0.012078951...
2.0549255...	0.00567501964...	Электро-магнитное
1/(0.1093567)	3.4687...*10^(-6)	Слабое
1/(0.012078951)	1.793...*10^(-39)	Гравитационное

Таблица №2.

Соответствует системе Планка и графику в виде бантика.

\[ x_{n+1} =\frac{J}{x^B_n*(e^{-x_n} + a)} \]

B	a	Взаимодействие
0.10986753...	3	??
2	0.13533528323661269...	Старт Всего
2.1093567...	0.1093567...	Кварк-глюонное
2 + 1/2	0.054723332415931...
2 + 2/3	0.04169008...	S - число
3	0.02489353417...
4 - 0.13533528323661269...	0.00732021168453...	Электро-магнитное
1/(0.1093569955709)	1.311585...*10^(-5)	Слабое
82.788629896730854944	1.3571...*10^(-38)	Гравитационное

Это формула Д.Волова, которая выдаёт "пузырь". Таблица №1. Который максимально уменьшаем до его исчезновения. Такова забавная форма бифуркации.
Прошу обратить внимание на число, выделенное зелёным цветом.

Это число кварк-глюонного взаимодействия. Когда a = B.
Так что Альфа не есть главное и Альфой = 1/137, не ограничивается всё.

Я к тому, что есть ещё кварки. Да, они имеют массу и масса эта вычислена экспериментально. Правда, масса кварков называется "токовой". Но как бы там ни было, как бы она не называлась.
Далее будет о кварках. 
В основе конечно же гипотеза. Вычисление масс лептонов не нейтральных (не нейтрино).

P.S.
82.78862989673085494 -- это есть из Таблицы 1, где  B = 0.012

[BJIaquMup]

Смотрим d-кварк

Формула:
x^(x^A)

A = 0.1093567...

Токовая масса. Эксперимент:
4.8 MeV

Мой вариант:
4.55273 MeV

Код: [Выделить]

s = 0.04125643197`50;
ew = 30.3662000000000000000;
ev = 0.51099891000000;
b = 0.007297352566417`50;
a = 0.1093567`50;
ae = 0.00115965218076`30;
A = 1 + a;
x := N[((1 + x0) + s)^(1/(1 - y0)), 30];
qu := x^(x^A);
Plot[qu, {x, 0, 1}, PlotStyle -> {
    PointSize[.9], Hue[.93]}, Frame -> True, FrameStyle -> GrayLevel[0.0],
 Axes -> False, ImageSize -> {500, 500}, PlotRange -> {0, 1}];
res = FindMinimum[qu, {x, 0.1, 0.7}];
x0 = x /. Last[res];
y0 = First[res];
Print[x0, "   ", y0];
k1 = qu/ew;
Print[k1*ev, " MeV"];
Print["4.8 MeV  Experiment"];

Смотрим Таблицу №1
A = 0.1093567 == Кварк-глюонная постоянная. Она определена, как 0.1
Но точно (относительно точно) её никто не предъявил. Ограничились невнятным числом 0.1

[BJIaquMup]

P.S.
Есть S и для другого варианта тройки ептонов.

s = 0.0415473362267507`50;

4.58089 MeV

Результат мало отличается.

См. "Гипотезу".

[BJIaquMup]

Код: [Выделить]

s = 0.04125643197;
ew = 30.3662000000000000000;
ev = 0.51099891000000;
b = 0.007297352566417;
a = 0.1093567`50;
A = 1 + 3/4*a;
x := N[((1 + x0) + s)^(1/(1 - y0)), 30];
qu := x^(x^(A^x));
Plot[qu, {x, 0, 1}, PlotStyle -> {PointSize[.9], Hue[.93]}, Frame -> True,
    FrameStyle -> GrayLevel[0.0], Axes -> False,
            ImageSize -> {500, 500}, PlotRange -> {0, 1}];
res = FindMinimum[qu, {x, 0.1, 0.7}];
x0 = x /. Last[res];
y0 = First[res];
Print[x0, "   ", y0];
k1 = qu/ew;
Print[k1*ev, " MeV"];
Print["2.3 +- 0.5 MeV Experiment"];

А это u-кварк

Формула:
x^(x^(A^x))

A = 0.1093567...

Токовая масса. Эксперимент:
2.3 +- 0.5 MeV

Мой вариант:
2.30522 MeV

[BJIaquMup]

Код: [Выделить]

s = 0.04125643197`50;
ew = 30.3662000000000000000;
ev = 0.51099891000000;
b = 0.007297352566417;
a = 0.1093567`50;
A = 1 + 2/5*a;
x := N[((1 + x0) + s)^(1/(1 - y0)), 30];
qu := x^(x^(x^(x^(A^x))));
Plot[qu, {x, 0, 1}, PlotStyle -> {
PointSize[.9], Hue[.93]}, Frame -> True,
    FrameStyle -> GrayLevel[0.0], Axes -> False, ImageSize -> {500,
       500}, PlotRange -> {0, 1}];
res = FindMinimum[qu, {x, 0.1, 0.7}];
x0 = x /. Last[res];
y0 = First[res];
Print[x0, "   ", y0];
k1 = qu/ew;
Print[k1*ev*(1/1000), " GeV"];
Print["1.275 GeV Experiment"];

А это очарованный карк.

Формула:
x^(x^(x^(x^(A^x))))

A = 0.1093567...

Токовая масса. Эксперимент:
1.275 +- 0.5 GeV

Мой вариант:
1.28844 GeV

[BJIaquMup]

Код: [Выделить]

s = 0.04125643197`50;
ew = 30.3662000000000000000;
ev = 0.51099891000000;
ae = 0.00115965218076`30;
b = 0.007297352566417;
a = 0.1093567`50;
ae = 0.00115965218076`30;
A = 1 + ae*a;
x := N[((1 + x0) + s)^(1/(1 - y0)), 30];
qu := x^(x^(x^(x^A)));
Plot[qu, {x, 0, 1}, PlotStyle -> {PointSize[.9],
    Hue[.93]}, Frame -> True, FrameStyle -> GrayLevel[
    0.0], Axes -> False, ImageSize -> {500, 500}, PlotRange -> {0, 1}];
res = FindMinimum[qu, {x, 0.1, 0.7}];
x0 = x /. Last[res];
y0 = First[res];
Print[x0, "   ", y0];
k1 = qu/ew;
Print[k1*ev, " MeV"];
Print["95 +-5 MeV Experiment"];

A это s-кварк , странный кварк.

Формула:
x^(x^(x^(x^A)))

A = 0.1093567...

Токовая масса. Эксперимент:
95 +-5 MeV

Мой вариант:
89.4104 MeV

[BJIaquMup]

Поскольку здесь речь идёт об Альфе,
то ради смеха я добавлю Ютуб о барионах.

https://www.youtube.com/watch?v=WINPLl6zXys&t=85s
Ради смеха.
Там у меня в самом начале, ещё когда я припёрся сюда на БФ, у меня в кармане были только вариации с N = 1+ alpha.
И я, что удивительно, получал массу протона и нейтрона. 

Но дальнейшие массы проблемных барионов (типа CCC & SCC) по массам явно зашкаливали.
Там были вообще сумасбродные массы типа 10 в 100 степени. Щто не вязалось вообще ни с чем.

[BJIaquMup]

И вот теперь забавно.

u-quarck == 2,3 MeV
d-quarck == 4,8 MeV

А протон, который содержит 2  u-кварка и d-кварк
вдруг имеет массу 938 МэВ
2.3 + 2.3 +4.8  = 938

Интересная математика... 

Яйцеголовые физики парируют тем, щто массу дают невидимые глюоны.
Ну, им, типа, нада верить... 
CASTRO, например.
Ещё и добавляют какую-то "конституэнтную массу". Которая типа 1/3 протона.
Это так не костыли.
А у Блядомира -- костыли.  У oxyeвшего нумеролога.   

[BJIaquMup]

Щас глянул и oxyeл тому количеству, которое смотрит именно эту тему, которую я поддерживаю.

Дима Волов заметил какую фиговину с логистическим преобразованием имени Ферхюльста. Это всё оказалось более, чем интересным или забавным. Даже боюсь, щто не хуже, чем многочисленные спепенные.
Ему удалось сосоставить это дело с 1/137, с Альфой.
Правда, я немного уточнил это дело и всё слегка ушло от экспериментальной Альфы. Но не так далеко.
И его метод не только не пострадал, но ещё и усилился.
Я даже засомневался в верности цитаты великого Эйнштейна. 
Но только ненадолго.   

А так, метод чудный. Особенно он хорошо прошелся по двум типам лептонов. Которые оба оказались верны. 

Но сейчас меня всё же интересует ширина распада векторных бозонов.
Блин, почему так?     
Ну это же невозможно!!! 

[BJIaquMup]

И, кажись, нашел, чё искал. 
Вопрос сформулирован в теме "Гипотеза".
Но ещё неточно. Пока сомнительно.

[BJIaquMup]

Код: [Выделить]

a = N[GoldenRatio, 50];
B = 1.18833277`50;
one = B;
t109 = 0.1093567`50;
Print["1/a = ", 1/a];
x1 = 2.8017;
x2 = 2.808;
c = 0.0000000001;
y2 = one + c;
y1 = one - c;
BJIaquMup1 = Compile[{{J, _Real}}, ({J, #} &) /@ Union[Drop[NestList[J/(#^B*N[
Exp[-#] + a]) &, one, 2], 0]]];
mm = Flatten[Table[BJIaquMup1[J], {J, x1, x2, 1.0*10^(-5)}], 1];
ListPlot[mm, PlotStyle -> {PointSize[.01], Hue[.90]}, Frame -> True,
      FrameStyle -> GrayLevel[0.5], Axes -> False, ImageSize -> {500, 500}, \
PlotRange -> {y1, y2}];

Hacколько всё же идея Дмитрия Волова оказалась полезной. Здесь связь нейтринного числа 0.188 с Золотым сечением.