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

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в 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
Griefin

Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Сравнение результатов 5-й и 6-й версий на современном железе (процессор Intel Core 2 Quad). По очкам Mathematica 6.0.2 выигрывает, особенно в решении линейных систем и умножении матриц. Но в элементарных функциях и численном интегрировании все равно уступает.
http://img337.imageshack.us/my.php?image=math6vs5ci4.png

Всего записей: 759 | Зарегистр. 19-07-2003 | Отправлено: 06:41 05-05-2008 | Исправлено: Griefin, 19:45 05-05-2008
popkov

Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Griefin
Спасибо за ценную инфу! Значит, они ещё и функцию Expand[] более тормознутой сделали в 6-ке. Хотя изменилось в ней только то, что она стала Listable. Похоже, они так топорно вносили изменения, что эта функция стала требовать почти на 30% больше времени.
Интересно, взятие обратной матрицы и нахождение корней полиномов тоже стало медленнее?

Всего записей: 1833 | Зарегистр. 22-03-2003 | Отправлено: 08:13 05-05-2008
hirurgoid

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
чувачки, есть необходимость построить 3х мерную диаграмму рассеяния (scatter plot), по трём разным признакам...причем нужно как минимум две (а в идеале 6) разные группы данных как-то отличать (цвет, маркер)...Математика поможет?..это первое, что я нашел в гугле по поиску "three dimensional plotting"
сорри, если оффтоп

Всего записей: 8 | Зарегистр. 11-08-2006 | Отправлено: 09:28 05-05-2008
popkov

Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
hirurgoid
На первый раз простительно, но "чувачки" здесь не лучшее обращение, если хочешь получить ответ. Mathematica поможет, но тебе лучше воспользоваться специализорованной программой типа Origin 8.

Всего записей: 1833 | Зарегистр. 22-03-2003 | Отправлено: 13:21 05-05-2008
popkov

Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Да уж, ну и люди работают в Wolfram Research! Похоже, некоторые отделы по лени скоро смогут побить рекорды разработчиков EndNote!
В течение всей истории версий Mathematica не работает нормально экпорт в .pdf русскоязычного (или любого другого Unicode) текста. На сообщение об этом в группе новостей один из разработчиков дал "обнадёживающий" ответ:

Цитата:
These are known limitations in Mathematica's PDF export capabilities.  
Rob
Wolfram Research  

Хорошо хоть какой-то ответ, но неужели за столько лет нельзя было справиться с юникодом? Уже давно существует полно свободных программ генерации pdf, с открытым кодом, которые это умеют! И всё, что они могут написать - что это "известное ограничение" Mathematica! Позор!
 
 

UPDATE: кстати, после того, как я написал сообщение аналогичного содержания (но в отличие от этого вполне корректное и спокойное, без малейших оскорблений: сказал, что слышать только "it is known" в ответ на сообщения о многолетних багах меня разочаровывают в WR) в ту группу новостей, меня там попросту забанили (а сообщение не пропустили). Вот и думай после этого, что за люди там работают и какую они ведут политику... и куда она их уводит...

Всего записей: 1833 | Зарегистр. 22-03-2003 | Отправлено: 08:37 08-05-2008 | Исправлено: popkov, 13:05 14-05-2008
hirurgoid

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
за дельный совет popkov'у (таксономический статус выбрать на свое усмотрение мега респект!..Origin8 прекрасно справился с 3д скаттером, так что я даже на радостях купил студенческую лицензию
еще раз спасибо!

Всего записей: 8 | Зарегистр. 11-08-2006 | Отправлено: 08:00 11-05-2008
KChernov



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Подскажите хорошую книгу по 6-ке.
А то хелп встроенный какой-то недоделанный (например мало примеров)

Всего записей: 2471 | Зарегистр. 20-04-2004 | Отправлено: 10:57 14-05-2008
popkov

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

Цитата:
Подскажите хорошую книгу по 6-ке.  
А то хелп встроенный какой-то недоделанный (например мало примеров)  

Ты, наверное, с 5-кой не работал: там примеров раз в 40 меньше!
А хорошие, вроде как, книги (с примерами) - это, вероятно, в первую очередь работы M.Trott'а. Некоторые доступны на нашем трекере. и на torrents.ru.

Всего записей: 1833 | Зарегистр. 22-03-2003 | Отправлено: 12:40 14-05-2008
KChernov



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

Цитата:
Ты, наверное, с 5-кой не работал: там примеров раз в 40 меньше!  

Ну значит они работают в правильном направлении
 

Цитата:
А хорошие, вроде как, книги (с примерами) - это, вероятно, в первую очередь работы M.Trott'а.

Спасибо, посмотрю
 
Вот попробовал сделать пример из хелпа(tutorial/AnExampleDefiningYourOwnIntegrationFunction) - не получается:

Код:
integrate[y_+z_,x_]:=integrate[y,x]+integrate[z,x]
integrate[c_y_,x_]:=c integrate[y,x]/;FreeQ[c,x]
integrate[c_,x_]:=cx/;FreeQ[c,x]
integrate[x_^n_.,x_]:=x^(n+1)/(n+1)/;FreeQ[n,x]&&n!=-1
integrate[1/(a_.x_+b_.),x_]:=Log[ax+b]/a/;FreeQ[{a,b},x]
integrate[Exp[a_.x_+b_.],x_]:=Exp[ax+b]/a/;FreeQ[{a,b},x]
integrate[a x + b x^2 + 3, x]

То есть почему-то срабатывает только первое правило
Или я как-то не так делаю?

Всего записей: 2471 | Зарегистр. 20-04-2004 | Отправлено: 15:26 15-05-2008
popkov

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

Цитата:
Или я как-то не так делаю?

Подсказать ответ не могу, но сравнительно недавно в соответствующей группе новостей проскакивал вопрос про обучение Integrate. Рекомендую также выполнить поиск в отфильтрованном архиве этой группы (MathGroup Archive), хранящемся на сайте Wolfram Research (вообще, через справочную систему можно сразу задать поиск по всем сайтам Wolfram, включая архив этой группы - кнопка "Try your search on all Wolfram sites").
 
Добавлено:

Цитата:
Ну значит они работают в правильном направлении  

В отношении документации - да. Но одно то, что поиск в ней сделан на Жабе - уже явный признак деградации команды разработчиков! Подумать только, самая крутая и универсальная система компьютерной алгебры, в ядро которой уже давно встроены алгоритмы поиска, в т.ч. с использованием регулярных выражений, - и использует для поиска в своей документации громоздкую неповоротливую Жабу, которая отжирает в 2 (!) раза больше памяти, чем ядро программы во время активной работы! Жаба глючит и вызывает тем самым глюки ядра - потому что работает с ним в паре, жутко тормозит на слабых машинах (хотя ядро куда более сложные задачи выполняет быстро и без тормозов)! Меньше всего я ожидал увидеть в составе следующей версии - этого монстра, хотя дурные предчувствия были... После летающей 5-ки переход на 6-ку оказался безрадостным. Единственное оправдание - действительно круто расширенная, но всё ещё далеко не полная документация, и исправление жутко тупого "бага с пробелом" 5-ки, который и в версии 5.2 не исправили. Этот баг и вызывал у меня настоящие дурные предчувствия (не только он)... Его они исправили, но появление Жабы - это само по себе баг весом в две тонны...

Всего записей: 1833 | Зарегистр. 22-03-2003 | Отправлено: 22:06 15-05-2008
mumbojumbo

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

Цитата:
Код:integrate[y_+z_,x_]:=integrate[y,x]+integrate[z,x]  
integrate[c_y_,x_]:=c integrate[y,x]/;FreeQ[c,x]  
integrate[c_,x_]:=cx/;FreeQ[c,x]  
integrate[x_^n_.,x_]:=x^(n+1)/(n+1)/;FreeQ[n,x]&&n!=-1  
integrate[1/(a_.x_+b_.),x_]:=Log[ax+b]/a/;FreeQ[{a,b},x]  
integrate[Exp[a_.x_+b_.],x_]:=Exp[ax+b]/a/;FreeQ[{a,b},x]  
integrate[a x + b x^2 + 3, x]  
 
То есть почему-то срабатывает только первое правило  
Или я как-то не так делаю?

 
Нужно быть внимательнее с синтаксисом, так во втором правиле между c_ и y_ должен стоять пробел или знак умножения (*), аналогичные ошибки и в остальных правилах.

Всего записей: 345 | Зарегистр. 02-03-2004 | Отправлено: 05:06 16-05-2008
KChernov



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

Цитата:
и использует для поиска в своей документации громоздкую неповоротливую Жабу

То то я удивлялся, а чего это она так тормозит
 
mumbojumbo

Цитата:
Нужно быть внимательнее с синтаксисом, так во втором правиле между c_ и y_ должен стоять пробел или знак умножения (*), аналогичные ошибки и в остальных правилах.

Спасибо, попробую, мб действительно в этом и дело
Только вот это я скопировал из их хелпа - так что это еще один его минус

Всего записей: 2471 | Зарегистр. 20-04-2004 | Отправлено: 13:55 16-05-2008
vb2008

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

Цитата:
поиск в ней сделан на Жабе  

 
Аффтар жжот!
 

Цитата:
использует для поиска в своей документации громоздкую неповоротливую Жабу, которая отжирает в 2 (!) раза больше памяти, чем ядро программы во время активной работы!

 
Аффтар, пеши есчо!!
 
(З.Ы.  
 
Разработчику Жабы: Аффтар, выпей йаду! В Бабруйск, жывотное!)
 
 
 

Всего записей: 38 | Зарегистр. 28-03-2008 | Отправлено: 20:36 16-05-2008
DinaRest

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Подскажите мне пожалуйста, как импортировать русский текст?

Всего записей: 2 | Зарегистр. 18-05-2008 | Отправлено: 23:05 18-05-2008
popkov

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

Цитата:
Подскажите мне пожалуйста, как импортировать русский текст?

По умолчанию команда Import[] распознаёт только ASCII и юникод (см. справку, ref/format/Text). Сохрани в кодировке Юникод (UTF-8) или (лучше) просто укажи точную кодировку файла:
Import["C:\1.txt", CharacterEncoding -> $SystemCharacterEncoding]
 
А зачем, если не секрет?

Всего записей: 1833 | Зарегистр. 22-03-2003 | Отправлено: 07:07 19-05-2008
KChernov



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Можно ли (и как лучше) решить следующие вопросы:
1. Решатели не определяют переменные, которые в них заданы.
То есть после команды типа
Код:
a=5
Solve[a+b==10,b]
хоть и выдается что-то типа
Код:
{{b=5}}
, но переменная b продолжает быть неинициализированна
Конечно можно каждый раз делать переприсваивание, но мб есть более удобный способ (галочка, команда или опция)?
2. Как правильно вставлять в Ноутбук текст? У меня не получается сразу вставлять так, чтобы субж не попробовал его выполнить То есть если потом уже вставить - нормально, а вот если сразу...
Alt+1-7 не помогает.
 
Спасибо за внимание

Всего записей: 2471 | Зарегистр. 20-04-2004 | Отправлено: 16:45 19-05-2008
DinaRest

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

Цитата:
А зачем, если не секрет?

Надо для решения задачи... огромное спасибо за помощь, а то я уже сама придумала, как перевести эти иероглифы в русский текст!!!!

Всего записей: 2 | Зарегистр. 18-05-2008 | Отправлено: 20:06 19-05-2008
popkov

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

Цитата:
но переменная b продолжает быть неинициализированна  

Так и задумано, всё правильно. Переменная b является локальной переменной для Solve.

Цитата:
Конечно можно каждый раз делать переприсваивание, но мб есть более удобный способ (галочка, команда или опция)?  

Насколько я знаю, нет - и не может быть, поскольку результат, выдаваемый Solve[] и Reduce[], может содержать условия, и вообще иметь сложную структуру. Solve[] выдаёт ответ в форме правил замены, для Reduce[] есть специальная команда, которая заставляет его делать то же. Чтобы воспользоваться результатом, надо использовать полученные правила:
bGlobal=b/.Solve[a+b==1,b]
Можно присвоить и b, но тогда повторное выполнение Solve будет приводить к ошибке, т.к. b уже будет иметь конкретное значение:
b=(b/.Solve[a+b==1,b])
 

Цитата:
Как правильно вставлять в Ноутбук текст? У меня не получается сразу вставлять так, чтобы субж не попробовал его выполнить  То есть если потом уже вставить - нормально, а вот если сразу...  

Не сталкивался с такой проблемой, опиши подробнее.

Всего записей: 1833 | Зарегистр. 22-03-2003 | Отправлено: 00:40 20-05-2008 | Исправлено: popkov, 00:50 20-05-2008
Griefin

Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Известно ли уважаемым пользователям, что в Mathematica крайне тормозная реализация функции Plot? Например, если вручную сделать таблицу точек, а затем нарисовать ее используя ListPlot, то получится в десятки раз быстрее, чем просто с Plot.

Всего записей: 759 | Зарегистр. 19-07-2003 | Отправлено: 20:26 20-05-2008
popkov

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

Цитата:
Известно ли уважаемым пользователям, что в Mathematica крайне тормозная реализация функции Plot? Например, если вручную сделать таблицу точек, а затем нарисовать ее используя ListPlot, то получится в десятки раз быстрее, чем просто с Plot.

Ну да, и причины понять нетрудно. Например, построим график:
Plot[x, {x, 0, 10}]
А теперь посмотрим, как он выглядит "Изнутри":
%//InputForm
Нетрудно подсчитать, что прямая линия y=x построена как ломаная, состоящая из 77 отрезков!  
Точно такой же график можно построить и иначе, по двум точкам:
ListPlot[{{0, 0}, {10, 10}}, Joined -> True]
Результат визуально идентичен, вероятность каких-либо искажений при импорте в другие приложения или выводе на печать близка к нулю, в отличие от первого варианта!
 
Однако вышесказанное - ещё цветочки! В случае, если функция не является гладкой во многих местах, возможны заметные тормоза из-за того, что Plot[] будет пытаться "уточнить" форму функции в местах большой кривизны!  
 
Всё это - плата за универсальноть и, по сути, претензий к разработчикам по этому поводу у меня нет. Насколько я понимаю, Plot[] не пытается брать производные и на их основе выполнять анализ поведения функции. В общем-то, это наиболее простое и разумное поведение.  


Гораздо хуже то, что разработчики не спешат исправлять очевидные баги в таких базовых функциях, как Show[], Export[] и т.п. Написав о нескольких таких багах в официальную группу новостей, я понял, почему авторы одной статьи о системах символьной математики назвали отношение разработчиков Mathematica к аргументированной критике в свой адрес "болезненным"! Вот как они себя ведут: на сообщения о реальных багах просто не отвечают, оставляя их безо всякого внимания. Многие такие сообщения не пропускают модераторы. Авторов таких сообщений банят после 2-3 постов о багах или после даже одного поста с действительно обоснованной, аргументированной критикой в адрес компании. На сообщения о тупейших недоработках, тянущихся десятилетиями от версии к версии, они отвечают, что "это известное ограничение". И, судя по тому, что пишут в группе новосей, никому до этого дела нет! Многие пользователи занимают следующую позицию: "чтобы извлечь больше пользы от программы, не следует бороться с ней!". И при этом забывают, что для извлечения большей пользы надо уметь использовать программу наиболее гибким образом, а при таком использовании неизбежно натыкаешься на тупые баги! А сообщать о них нельзя - разработчикам неприятно...

Всего записей: 1833 | Зарегистр. 22-03-2003 | Отправлено: 12:21 21-05-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