Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Программы » Wolfram Mathematica | Математика

Модерирует : gyra, Maz

 Версия для печати • ПодписатьсяДобавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57

Открыть новую тему     Написать ответ в эту тему

xy



ХУдератор
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Wolfram Mathematica 14

Загрузка и поиск "лекарств"в "Варезнике"


 
Здесь обсуждаем вопросы языка Mathematica и программы, которая ИМХО лучше других выполняет свою задачу и, кроме, того очень точно соответствует своему названию, хотя там не забыли и про физиков и химиков и всех остальных:)

Всего записей: 10530 | Зарегистр. 28-05-2003 | Отправлено: 16:00 01-12-2003 | Исправлено: zAlAn711, 18:21 10-01-2024
sabio

Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
a1ekseo

Цитата:
возможно ли в Mathematica видеть весь ход решения задачи?

 
про это написано в FAQ

Всего записей: 2898 | Зарегистр. 21-05-2004 | Отправлено: 16:00 24-11-2008
Partner1



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
a1ekseo

Цитата:
возможно ли в Mathematica видеть весь ход решения задачи?

Те кто хорошо разбираются в программировании Mathematica, в принципе могут сами написать программу для вывода шагов решения. См. например для дифференцирования:
http://documents.wolfram.com/mathematica/Demos/Notebooks/Step-by-StepDifferentiation.html
(Тут применение правил преобразования (Rules), пока выражение не перестанет изменяться)

Всего записей: 273 | Зарегистр. 28-11-2007 | Отправлено: 09:10 25-11-2008 | Исправлено: Partner1, 09:13 25-11-2008
TomasVercetti

Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Скажите, пожалуйста, исходя из каких соображений нужно выбирать x0 в FindRoot[lhs==rhs, {x, x0}]  ? (Или подскажите, где про это написано?)

Всего записей: 319 | Зарегистр. 09-01-2006 | Отправлено: 13:11 25-11-2008
Griefin

Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Очевидно, исходя из соображений близости x0 к корню. Mathematica по умолчанию использует метод Ньютона, который довольно плохо сходится, если точка выбрана неудачно. Самой быстрой сходимостью обладает метод Брента (Method -> "Brent"), ему в качестве входных данных нужна не одна точка, а интервал, внутри которого должен быть корень: {x,x0,x1}. Поэтому всегда лучше использовать именно его. Кроме того, нужно помнить, что все численные методы построены в предположении о том, что корень внутри интервала всего один.

Всего записей: 759 | Зарегистр. 19-07-2003 | Отправлено: 23:00 25-11-2008 | Исправлено: Griefin, 23:03 25-11-2008
TomasVercetti

Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Спасибо! В моём случае численный счёт находит корни только если совсем рядом с ними либо стартовые точки, либо интервалы указаны...
 
Добавлено
Предположим, корень равен 50. Если я его ограничиваю (45,55), то математика находит его. А если (20,80) - то нет. Как я понимаю, в последнем случае метод идёт более крупным "шагом" и потому пропускает корень. А как его заставить идти более мелким "шагом"?

Всего записей: 319 | Зарегистр. 09-01-2006 | Отправлено: 00:17 27-11-2008 | Исправлено: TomasVercetti, 00:14 28-11-2008
infovarius

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Вышла 7-я версия. Добавлено: отображение линий тока и прочих штучек для векторных полей, параллелизация многих функций, много встроенных данных (например, человеческий геном) и обработчиков изображений. Как насчёт взломчика?

Всего записей: 5 | Зарегистр. 12-04-2007 | Отправлено: 12:38 28-11-2008
Griefin

Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
TomasVercetti
Метод Ньютона иногда промахивается, т.к. основан на вычислении производной. Используйте методы, основанные на постепенной локализации корня: бисекции, секущие, Брента (он точно есть в Mathematica 6). Написать функцию, которая постепенно разбивает большой интервал на несколько малых и делает там поиск корней -- довольно простое дело.

Всего записей: 759 | Зарегистр. 19-07-2003 | Отправлено: 04:09 29-11-2008
Widok



Moderator-Следопыт
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
infovarius
варезный вопрос


----------
Тень превращается в фантазии, таящиеся в глубине вашей души.
Пока идёшь ты среди теней, да не будет зла с тобой.

Всего записей: 24190 | Зарегистр. 07-04-2002 | Отправлено: 12:26 01-12-2008
popkov

Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
TomasVercetti

Цитата:
Скажите, пожалуйста, исходя из каких соображений нужно выбирать x0 в FindRoot[lhs==rhs, {x, x0}]  ? (Или подскажите, где про это написано?)

Задавая подобные вопросы, следует очертить саму проблему минимизации. В разных случаях эффективными оказываются различные алгоритмы. Ответьте на следующие вопросы:
1) Доступен ли аналитический вид производной минимизируемой функции?
2) Это случайно не задача минимизации суммы квадратов отклонений функции от экспериментальных точек (тогда если на 1-й вопрос ответ положительный, лучшего метода, чем алгоритм Левенберга-Марквардта, просто не существует!).
3) Монотонная функция или есть много локальных минимумов?
4) Если функция дискретная или имеет особые точки, обязательно надо это принять во внимание!
и т.д.
Метода, который подходил бы для всех задач минимизации, попросту не существует!

Всего записей: 1834 | Зарегистр. 22-03-2003 | Отправлено: 22:06 07-12-2008
dipsy

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Подскажите, как  нормально делать экспорт нотбуков математики на русском языке?
 (латех, пдф или еще что..)
Кто скажет также, почему при экспорте в латех юникод записывается странным образом..?
пример:\unicode{043f}\unicode{0440}\unicode{0438}\unicode{0432}\unicode{0435}\unicode{0442}

Всего записей: 1 | Зарегистр. 21-03-2006 | Отправлено: 00:10 10-12-2008
Partner1



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
TomasVercetti

Цитата:
Скажите, пожалуйста, исходя из каких соображений нужно выбирать x0 в FindRoot[lhs==rhs, {x, x0}]  ? (Или подскажите, где про это написано?)

Для нахождения "хорошего" приближения к решению в одномерном случае удобно нарисовать график функции как показано ниже:
Plot[{lhs,rhs}, {x,a,b}]
В двумерном случае (пример)
ContourPlot[{Sin[x + y] == 1/3 + x, x + 2 y == 0}, {x, -4, 4}, {y,-5,5}]
Сразу "на глаз" видны начальные  значения:
FindRoot[{Sin[x + y] == 1/3 + x, x + 2 y == 0}, {{x, -0,5}, {y, 0.5}}]
 
Добавлено:
dipsy
PDF из любой программы, где есть печать удобно делать программой PdfFactory Pro
ну или FinePrint:
http://forum.ru-board.com/topic.cgi?forum=35&topic=1402#1

Всего записей: 273 | Зарегистр. 28-11-2007 | Отправлено: 09:31 10-12-2008
TomasVercetti

Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Griefin, popkov, Partner1 - спасибо за советы!
Для поиска корней на интервале использую метод секущих. Функции на заданном интервале хорошие. Сейчас по картинкам и ориетируюсь (правда из книжки - спасибо за ContourPlot : )
 
Всем спасибо - всё решилось

Всего записей: 319 | Зарегистр. 09-01-2006 | Отправлено: 20:54 10-12-2008 | Исправлено: TomasVercetti, 18:56 14-12-2008
AMD_ATHLON



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Здраствуйте инетресует такой вопрос, есть ли в математике метод неопределенных коэффициентов и как его использовать? и есть ли функция прообразования комплексого числа из экспонинциальной формы записи в тригонометрическую? Есть функция, от которой я нахожу обратное преобразование лапласа, так вот мне нужно ответ просто записать там не в экспонентах., а чтобы косинусы были (s^2 + 5*s + 9)/((s^2 + 9)*(s^2 + 2*s + 5)) вот такой пример и спользовал эту функцию InverseLaplaceTransform

Всего записей: 819 | Зарегистр. 04-11-2006 | Отправлено: 00:49 24-12-2008
popkov

Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
AMD_ATHLON
Цитата:
есть ли функция прообразования комплексого числа из экспонинциальной формы записи в тригонометрическую?
Поиск в справке быстро приводит к функции ExpToTrig[]. Хотя аргументы тригонометрических функций, выводимые ей, оказываются комплекными в твоём случае. Однако последующее применение FullSimplify[] позволяет избавиться от комплексных аргументов:
 
In[1]:=InverseLaplaceTransform[(s^2 + 5*s + 9)/((s^2 + 9)*(s^2 + 2*s + 5)),  
   s, t] // ExpToTrig // FullSimplify

 
Out[1]=(1/52)*(-20*Cos[3*t] + (20*Cos[2*t] - 9*Sin[2*t])/E^t + 30*Sin[3*t])
(Mathematica 7.0.0)
 
Добавлено:
Цитата:
Здраствуйте инетресует

Цитата:
прообразования комплексого

Цитата:
экспонинциальной
Режет слух. Иногда полезно бывает воспользоваться программой проверки орфоргафии - благо, их сейчас много, и они умеют встраиваться в браузеры...
 

Добавлено:
 
dipsy
Цитата:
Кто скажет также, почему при экспорте в латех юникод записывается странным образом..?  
У Mathematica с не-ASCII-символами всегда были проблемы, и исправлять их они не спешат. Для качественного экпорта ноутбуков с такими символами (кроме символов шрифтов Mathematica) единственный выход - печать на виртуальный принтер (Acrobat Distiller для PDF - это классика, надёжнее ничего нет; для печати в EMF в системах NT не выше Windows XP SP2 идеально подходит PrintMirror, хотя и Mathematica в EMF экспортирует кириллицу нормально; однако EMF не является portable-форматом, и на Windows-компах с отсутствующими исходными шрифтами эти отсутствующие шрифты будут сбрасываться на первый по алфавиту шрифт в списке - Arial!).

Всего записей: 1834 | Зарегистр. 22-03-2003 | Отправлено: 01:04 24-12-2008 | Исправлено: popkov, 02:00 24-12-2008
AMD_ATHLON



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
popkov
 
Спасибо огромное.

Всего записей: 819 | Зарегистр. 04-11-2006 | Отправлено: 15:53 24-12-2008
Igorr

Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Подскажите, пожалуйста, где можно посмотреть алгоритм/код процедуры/подпрограммы, рассчитывающей гипергеометрическую функция 2F2?
Интересует любой вариант языка программирования, не только для Mathematica.
 
Добавлено:
интересует, конечно, не прямое суммирование

Всего записей: 2003 | Зарегистр. 01-05-2002 | Отправлено: 22:53 28-12-2008
Griefin

Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Функции вида pFq уже реализованы, см. HypergeometricPFQ.

Всего записей: 759 | Зарегистр. 19-07-2003 | Отправлено: 00:18 29-12-2008
Igorr

Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Цитата:
см. HypergeometricPFQ

где?

Всего записей: 2003 | Зарегистр. 01-05-2002 | Отправлено: 01:46 29-12-2008
Griefin

Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
В Справке к Mathematica.

Всего записей: 759 | Зарегистр. 19-07-2003 | Отправлено: 02:57 29-12-2008
Igorr

Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Цитата:
В Справке к Mathematica

Я там не нашел
Цитата:
алгоритм/код процедуры/подпрограммы

Где конкретно?

Всего записей: 2003 | Зарегистр. 01-05-2002 | Отправлено: 03:12 29-12-2008
Открыть новую тему     Написать ответ в эту тему

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57

Компьютерный форум Ru.Board » Компьютеры » Программы » Wolfram Mathematica | Математика


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru