Большой Форум
Новости: Читайте в августовсом номере БФ на главной: Дети стали врагами Путину и Хлорка, утюги и кипяток Путина
 
*
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?
22 Августа 2018, 00:51:35


Войти


Страниц: [1] 2   Вниз
  Печать  
Автор Тема: Первый трактор  (Прочитано 348 раз)
0 Пользователей и 1 Гость смотрят эту тему.
BJIaquMup
Модератор
Местный мудрец
*****

Рейтинг: +496/-1637
Offline Offline

Пол: Мужской
Russian Federation Russian Federation

Сообщений: 26486


Водопроводчик со справкой


WWW
« : 25 Июля 2018, 19:23:58 »

Вообще-то, эта тема - прямое продолжение темы "Ортоведение". Но поскольку уж режет глаз...

Вот скиншоты.





А вот сЦылки:
https://en.wikipedia.org/wiki/Feigenbaum_constants
https://ru.wikipedia.org/wiki/%D0%A3%D0%...0%B5%D0%BD%D0%B1%D0%B0%D1%83%D0%BC%D0%B0

Как гриЦЦа, "у меня все ходы записаны".
Пусть попробуют 6ляди отказаться, oxyumeльные учёные, доценты с кандидатами, щта там была тройка на первом тракторе.Вот скиншоты. А вот сЦылки
https://en.wikipedia.org/wiki/Feigenbaum_constants
https://ru.wikipedia.org/wiki/%D0%A3%D0%...0%B5%D0%BD%D0%B1%D0%B0%D1%83%D0%BC%D0%B0
Как гриЦЦа, "у меня все ходы записаны".
Пусть попробуют 6ляди отказаться, oxyumeльные учёные, доценты с кандидатами, щта там была тройка на первом тракторе.

Первый трактор (он же аттрактор) на

xn+1 = axn(1 - xn)

равен 3.

Якобы, 3.

Если будут юродствовать, щта это типа википедия и туда могут писать все сторожа и водопроводчики, то это
1. наглая ложь,
2. полно "гумажных" изданий, где таковая цифирь повторяется,
3. Википедия не з бухты-барахты берёт эту цифирь, не из кочегарок и не их блёйлерных. Она берёт из вполне себе уважаемых источников.
Так что нихрена у этих умников отмазаться не получится.
« Последнее редактирование: 06 Августа 2018, 19:09:15 от BJIaquMup » Записан
Большой Форум
« : 25 Июля 2018, 19:23:58 »

 Записан
BJIaquMup
Модератор
Местный мудрец
*****

Рейтинг: +496/-1637
Offline Offline

Пол: Мужской
Russian Federation Russian Federation

Сообщений: 26486


Водопроводчик со справкой


WWW
« Ответ #1 : 26 Июля 2018, 12:29:19 »

Весь прикол в том, что Первый трактор (он же аттрактор, она же точка бифуркации, то есть, место, где дорога раз-два-яица) на

xn+1 = axn(1 - xn)


НЕ равен 3. Он больше 3.
« Последнее редактирование: 06 Августа 2018, 19:09:48 от BJIaquMup » Записан
BJIaquMup
Модератор
Местный мудрец
*****

Рейтинг: +496/-1637
Offline Offline

Пол: Мужской
Russian Federation Russian Federation

Сообщений: 26486


Водопроводчик со справкой


WWW
« Ответ #2 : 27 Июля 2018, 12:03:36 »

И второй трактор тоже не соответствует заявленному значению
3.4994897...
Он больше. Проверено руками.
Надо полагать, что и все остальные трактора тоже не остаются в долгу. Ну, проверяйте, не лень если.

Вопрос о константе Фейгенбаума я пока не ставлю. Ибо, с этой константой вообще тёмный лес. Как они смогли получить это число с такой чудовищной точностью (аж до 30 значащих цифр)?

p.s.
Один чувак получил аж 300 (ТРИСТА) значащих цифр!  О, боже!
https://hypertextbook.com/chaos/universality/
« Последнее редактирование: 31 Июля 2018, 09:24:51 от BJIaquMup » Записан
BJIaquMup
Модератор
Местный мудрец
*****

Рейтинг: +496/-1637
Offline Offline

Пол: Мужской
Russian Federation Russian Federation

Сообщений: 26486


Водопроводчик со справкой


WWW
« Ответ #3 : 02 Августа 2018, 17:15:51 »

Не разбирался с этим вопросом, однако вижу тут ссылку на калькулятор. С калькулятором, при его использовании в математике, нужно быть осторожным. Особенно, если речь идет о каких-то сходимостях для последовательностей. При таких расчетах нужно анализировать точность метода расчета. Это сделано? Без анализа точности расчета, его результат использовать нельзя.

Дак вы разберитесь.  Улыбка Никто не запрещает. Заодно пригвоздите меня к столбу позора.
Я использую калькулятор Вольфрамовской Математики. Точность там можно сделать любой. Это зависит только от оперативной памяти аппарата.
Для меня для самого это явилось полнейшей неожиданностью.
А какой анализ точности рассчёта надо делать?  Улыбка Вот вы и проанализируете. Сделаете такой анализ. И к столбу позора меня.
Записан
AndreyS
Местный мудрец
*****

Рейтинг: +12/-29
Offline Offline

Russian Federation Russian Federation

Сообщений: 667




Игнорировать
« Ответ #4 : 02 Августа 2018, 17:35:14 »

Дак вы разберитесь.  Улыбка
А оно мне надо? Эта тема мне не интересна. Я увидел упоминание, что вывод сделан на основе компьютерного расчета. Ну и сделал замечание, что без анализа точности математического расчета его результаты использовать нельзя. Можно это замечание учитывать, можно не учитывать.

Никто не запрещает. Заодно пригвоздите меня к столбу позора.
Я использую калькулятор Вольфрамовской Математики. Точность там можно сделать любой. Это зависит только от оперативной памяти аппарата.
Для меня для самого это явилось полнейшей неожиданностью.
А какой анализ точности рассчёта надо делать?  Улыбка Вот вы и проанализируете. Сделаете такой анализ. И к столбу позора меня.
Помимо точности одной операции расчета, есть еще понятие точности метода расчета. Разные методы расчета могут приводить к разной точности расчета. Я на это уже попадал, при защите диплома бакалавра. У меня там была приведена оценка точности использованного метода расчета, но оппонент (доктор физмат наук) показал что в оценке точности метода есть ошибка. Оказалось, что метод более точен чем я его оценил.
Записан
alexand
Членкор приматов
Местный мудрец
*****

Рейтинг: +536/-1828
Offline Offline

Пол: Мужской
Russian Federation Russian Federation

Сообщений: 38071



Email

Игнорировать
« Ответ #5 : 02 Августа 2018, 17:40:59 »

Володь,.а.чёб.те.не.заняться.вычислением.числа.пи.или.числа.е
до.тысячного.знака?
Всё.был.бы.при.деле.

Вот.как.можно.точно.разбить.окружность.на.360.равных.частей?
Вроде.вопрос.простой,.а.на.засыпку.

Или.как.разбить.сферу.на.целое.число.равных.телесных.углов?
Записан

Начатый роман "Ленин и вся гоп-компания":
         www.proza.ru/2015/11/01/1258
Об Эволюции человеческого общества:
         www.proza.ru/2012/08/13/1629
Философия Общая Картина Мироздания
         www.proza.ru/2017/03/31/1695
BJIaquMup
Модератор
Местный мудрец
*****

Рейтинг: +496/-1637
Offline Offline

Пол: Мужской
Russian Federation Russian Federation

Сообщений: 26486


Водопроводчик со справкой


WWW
« Ответ #6 : 02 Августа 2018, 17:48:16 »

Володь,.а.чёб.те.не.заняться.вычислением.числа.пи.или.числа.е
до.тысячного.знака?
Всё.был.бы.при.деле.

Вот.как.можно.точно.разбить.окружность.на.360.равных.частей?
Вроде.вопрос.простой,.а.на.засыпку.

Или.как.разбить.сферу.на.целое.число.равных.телесных.углов?
Вопрос не по теме.
Тема -- первый аттрактор выражения, заявленного в первом сообщении топика.
Предупреждение.
Если оффтоп будет продолжаться - посты будут отправляться в тему "Ведро".
Записан
BJIaquMup
Модератор
Местный мудрец
*****

Рейтинг: +496/-1637
Offline Offline

Пол: Мужской
Russian Federation Russian Federation

Сообщений: 26486


Водопроводчик со справкой


WWW
« Ответ #7 : 02 Августа 2018, 17:50:29 »

Володь,.а.чёб.те.не.заняться.вычислением.числа.пи.или.числа.е
до.тысячного.знака?
Всё.был.бы.при.деле.
Кстати, это сделать легче лёгкого. В Математике 5.0
Я смогу даже на своём старом компьютере на один порядок больше. Говно вопрос.
Записан
alexand
Членкор приматов
Местный мудрец
*****

Рейтинг: +536/-1828
Offline Offline

Пол: Мужской
Russian Federation Russian Federation

Сообщений: 38071



Email

Игнорировать
« Ответ #8 : 02 Августа 2018, 17:53:40 »

Строгий.ты.Володя.

Если.не.можешь.на.простые.разминочные.вопросы.ответить,
какой.смысл.трясти.аттракторы?
Ровно.3.или.три.с.копейками,.или.с.тысячными.долями.копеек,
кака.практическая.разница?
Записан

Начатый роман "Ленин и вся гоп-компания":
         www.proza.ru/2015/11/01/1258
Об Эволюции человеческого общества:
         www.proza.ru/2012/08/13/1629
Философия Общая Картина Мироздания
         www.proza.ru/2017/03/31/1695
alexand
Членкор приматов
Местный мудрец
*****

Рейтинг: +536/-1828
Offline Offline

Пол: Мужской
Russian Federation Russian Federation

Сообщений: 38071



Email

Игнорировать
« Ответ #9 : 02 Августа 2018, 17:56:49 »

Кстати, это сделать легче лёгкого. В Математике 5.0
Я смогу даже на своём старом компьютере на один порядок больше.
А.еще.легче.взять.готовые.ответы.
Там.уже.вычислено.до.10.в.опупенной.назнадцатой.степени.

Ты.вручную,.вручную.попаши.
На.тракторе.любой.дурак.тебе.гектары.напашет.
Записан

Начатый роман "Ленин и вся гоп-компания":
         www.proza.ru/2015/11/01/1258
Об Эволюции человеческого общества:
         www.proza.ru/2012/08/13/1629
Философия Общая Картина Мироздания
         www.proza.ru/2017/03/31/1695
BJIaquMup
Модератор
Местный мудрец
*****

Рейтинг: +496/-1637
Offline Offline

Пол: Мужской
Russian Federation Russian Federation

Сообщений: 26486


Водопроводчик со справкой


WWW
« Ответ #10 : 02 Августа 2018, 18:00:20 »

Строгий.ты.Володя.

Если.не.можешь.на.простые.разминочные.вопросы.ответить,
какой.смысл.трясти.аттракторы?
Ровно.3.или.три.с.копейками,.или.с.тысячными.долями.копеек,
кака.практическая.разница?

Математика наука точная. Выделенное мной красным цветом говорит только о двух вещах.
1. Налицо наглый и толстый троллинг.
2. Ты вообще ничего не рубишь в математике.
Надеюсь, что вариант нумер 2.
Записан
BJIaquMup
Модератор
Местный мудрец
*****

Рейтинг: +496/-1637
Offline Offline

Пол: Мужской
Russian Federation Russian Federation

Сообщений: 26486


Водопроводчик со справкой


WWW
« Ответ #11 : 04 Августа 2018, 12:52:02 »

А оно мне надо? Эта тема мне не интересна. Я увидел упоминание, что вывод сделан на основе компьютерного расчета. Ну и сделал замечание, что без анализа точности математического расчета его результаты использовать нельзя. Можно это замечание учитывать, можно не учитывать.

Помимо точности одной операции расчета, есть еще понятие точности метода расчета. Разные методы расчета могут приводить к разной точности расчета. Я на это уже попадал, при защите диплома бакалавра. У меня там была приведена оценка точности использованного метода расчета, но оппонент (доктор физмат наук) показал что в оценке точности метода есть ошибка. Оказалось, что метод более точен чем я его оценил.
Извиняюсь, прозевал этот ответ.

Значит, тут я оказался на месте твоего оппонента. Улыбка
У меня ведь не возникало сомнения, что это тройка. Сомнение возникло только тогда, когда мне что-то потребовалось уточнить именно в этой формуле.
Смею заметить, что Математика имени Вольфрама не вычисляет этот график в чистом виде на единице. Ей подавай малое приращение к 1. Ну, обычно 1+10-10 на всё про всё хватает. И при таком посыле действительно всё сходится на трояке.
Вопрос возник, когда я ввёл 10-15. Вольфрам начисто отказался работать. Он послал меня на иух прямым текстом. Не показал никакого графика.
Тогда я перешел на числовое (с графического). А в числовом же там можно до фиг знает какой точности, какую может позволить память аппарата.
Вот тогда-то у меня глаза на ё6 полезли. Там же нетрудно вычислить максимум. Каково же было моё удивление, когда этот максимум пополз вправо! ЗА ТРОЙКУ!
Я включил на 600 значащих цифр инициальную мощность, и 1000 итераций. В результате получил чудовищное значение этого первого аттрактора.
Записан
BJIaquMup
Модератор
Местный мудрец
*****

Рейтинг: +496/-1637
Offline Offline

Пол: Мужской
Russian Federation Russian Federation

Сообщений: 26486


Водопроводчик со справкой


WWW
« Ответ #12 : 07 Августа 2018, 17:21:25 »

Hy, поделюсь уж и здесь своею прогой.  смешно
Один иух...

Код:
a = 1.000000000000000000000000100000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
00000000000000000000;
j1 = 3.09000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000;
j8 = 3.11000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000;
zx = 20;
kvo = 1000;
J = j1;(* Это координата 'x' *)
dd = (j8 - j1)/zx;
For[j = 1, j < zx + 1,
    x = 1;
    For[i = 1, i < kvo + 1,
        y = N[J*x*(a - x), 600];
        x = y;
        i++]s;
    Print[J, "      ", y];
    J = J + dd;
    j++];



Результат:
Максимум наблюдается в районе J = 3.102...
Этот максимум имеет значение 0.7654483489855786...
Записан
Petrovich_Tot
Местный мудрец
*****

Рейтинг: +93/-147
Offline Offline

Russian Federation Russian Federation

Сообщений: 2571




Игнорировать
« Ответ #13 : 09 Августа 2018, 07:30:32 »

Hy, поделюсь уж и здесь своею прогой.  смешно
Один иух...

Код:
a = 1.000000000000000000000000100000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
00000000000000000000;
j1 = 3.09000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000;
j8 = 3.11000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000000000000000000000000000000000000000000000000000000000000\
000000000000000000000;
zx = 20;
kvo = 1000;
J = j1;(* Это координата 'x' *)
dd = (j8 - j1)/zx;
For[j = 1, j < zx + 1,
    x = 1;
    For[i = 1, i < kvo + 1,
        y = N[J*x*(a - x), 600];
        x = y;
        i++]s;
    Print[J, "      ", y];
    J = J + dd;
    j++];



Результат:
Максимум наблюдается в районе J = 3.102...
Этот максимум имеет значение 0.7654483489855786...
Для чего писать такие длинные числа? Есть короткая запись, например, 1`100 это единица со 100 нулями.
 
Записан
BJIaquMup
Модератор
Местный мудрец
*****

Рейтинг: +496/-1637
Offline Offline

Пол: Мужской
Russian Federation Russian Federation

Сообщений: 26486


Водопроводчик со справкой


WWW
« Ответ #14 : 09 Августа 2018, 07:38:14 »

Для чего писать такие длинные числа? Есть короткая запись, например, 1`100 это единица со 100 нулями.
 
Я в курсе, Петрович, что можно записать 10^100 и будет 1 со 100 нулями. Но как записать число 0.12345678901234567890 и ещё приплюсовать 100 нулей? N[] требует записи всех этих нулей, иначе не работает.
Ты лучше скажи, сама-то программа верная? Может я чего напутал?
Записан
Petrovich_Tot
Местный мудрец
*****

Рейтинг: +93/-147
Offline Offline

Russian Federation Russian Federation

Сообщений: 2571




Игнорировать
« Ответ #15 : 09 Августа 2018, 07:41:54 »

Я не зaнаю, что ты там вычисляешь, но приведу вариант программы вычислений с фиксированной точностью:
Код:
a = 1.0000000000000000000000001`600;
j1 = 3.09`600;
j8 = 3.11`600;
zx = 20;
kvo = 1000;
J = j1;(*Это координата'x'*)Block[{$MaxPrecision =
   600, $MinPrecision = 600}, dd = (j8 - j1)/zx;
 For[j = 1, j < zx + 1, x = 1;
  For[i = 1, i < kvo + 1, y = N[J*x*(a - x), 600];
    x = y;
    i++] s;
  Print[J, "      ", y];
  J = J + dd;
  j++];]
Записан
BJIaquMup
Модератор
Местный мудрец
*****

Рейтинг: +496/-1637
Offline Offline

Пол: Мужской
Russian Federation Russian Federation

Сообщений: 26486


Водопроводчик со справкой


WWW
« Ответ #16 : 09 Августа 2018, 08:22:20 »

Я не зaнаю, что ты там вычисляешь, но приведу вариант программы вычислений с фиксированной точностью:
Код:
a = 1.0000000000000000000000001`600;
j1 = 3.09`600;
j8 = 3.11`600;
zx = 20;
kvo = 1000;
J = j1;(*Это координата'x'*)Block[{$MaxPrecision =
   600, $MinPrecision = 600}, dd = (j8 - j1)/zx;
 For[j = 1, j < zx + 1, x = 1;
  For[i = 1, i < kvo + 1, y = N[J*x*(a - x), 600];
    x = y;
    i++] s;
  Print[J, "      ", y];
  J = J + dd;
  j++];]

Спасибо!
Вычисляет мгновенно. Результат не изменился. Максимум этой указанной чётной тысячной итерации примерно находится в районе числа \(J\approx 3.102\)
А следующая, нечётная тыщу первая итерация будет до этого числа строго совпадать, а после 3.102 резко ё6нет вверх. То есть, там не максимум и не минимум, а излом графика.
Записан
BJIaquMup
Модератор
Местный мудрец
*****

Рейтинг: +496/-1637
Offline Offline

Пол: Мужской
Russian Federation Russian Federation

Сообщений: 26486


Водопроводчик со справкой


WWW
« Ответ #17 : 09 Августа 2018, 08:51:41 »

Спасибо, Петрович! Чем дальше играюсь с этой прогой, тем бОльший шиздец.  смешно смешно Ништяк
Вообще чёрт-те что...  О, боже!
Записан
BJIaquMup
Модератор
Местный мудрец
*****

Рейтинг: +496/-1637
Offline Offline

Пол: Мужской
Russian Federation Russian Federation

Сообщений: 26486


Водопроводчик со справкой


WWW
« Ответ #18 : 09 Августа 2018, 09:30:02 »

Увеличение количества итераций в 10 раз ничего не дало. Максимум не желает стремиться к тройке.  недоумение

У меня имеюЦЦа смутные подозрения... щта...  Репа
Записан
Petrovich_Tot
Местный мудрец
*****

Рейтинг: +93/-147
Offline Offline

Russian Federation Russian Federation

Сообщений: 2571




Игнорировать
« Ответ #19 : 09 Августа 2018, 09:55:01 »

Увеличение количества итераций в 10 раз ничего не дало. Максимум не желает стремиться к тройке.  недоумение

У меня имеюЦЦа смутные подозрения... щта...  Репа
Я посмотрю на форумах Математики как они там эти константы вычисляли. 
Записан
Большой Форум
   

 Записан
Страниц: [1] 2   Вверх
  Печать  
 
Перейти в:  

Powered by MySQL Powered by PHP Powered by SMF | SMF © 2006, Simple Machines | TinyPortal v0.9.8 © Bloc

bolshoyforum.org
Valid XHTML 1.0! Valid CSS! Dilber MC Theme by HarzeM
Страница сгенерирована за 0.345 секунд. Запросов: 33.
Rambler's Top100 Rambler's Top100