xy ХУдератор Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Wolfram Mathematica 14 Загрузка и поиск "лекарств"в "Варезнике"   Здесь обсуждаем вопросы языка Mathematica и программы, которая ИМХО лучше других выполняет свою задачу и, кроме, того очень точно соответствует своему названию, хотя там не забыли и про физиков и химиков и всех остальных:) Всего записей: 10530 | Зарегистр. 28-05-2003 | Отправлено: 16:00 01-12-2003 | Исправлено: zAlAn711, 18:21 10-01-2024

Alex_B Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Цитата: Насколько я понимаю, под "выглядит вполне традиционно" ты понимаешь TraditionalForm К сожалению, не со всеми шрифтами TraditionalForm выглядит традиционно.   Цитата: вставляешь такую ячейку (для шрифта Arial) Не понял. Какой стиль нужно выбрать? Там нет стиля TraditionalForm. В этом и проблема. Каким-то образом добавить к стилю Text? Всего записей: 1098 | Зарегистр. 10-01-2002 | Отправлено: 16:22 19-09-2015 | Исправлено: Alex_B, 17:27 19-09-2015

Alex_B Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Цитата: Достаточно просто скопировать код Все гениальное просто. Получилось. Спасибо.   А есть ли возможность назначить размер шрифта индексов (Subscript) в стиле TraditionalForm? Всего записей: 1098 | Зарегистр. 10-01-2002 | Отправлено: 02:16 20-09-2015 | Исправлено: Alex_B, 03:02 20-09-2015

Alex_B Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Цитата: Можно. Отлично! Все сработало. Всего записей: 1098 | Зарегистр. 10-01-2002 | Отправлено: 21:04 20-09-2015

1lex1 Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Как получить 0 из выражения (-1)1/3 + (-1)2/3 ?         Mathematica 9.0.1.0. Win7 x64 SP1. Заранее спасибо за ответ. Всего записей: 289 | Зарегистр. 22-11-2013 | Отправлено: 15:26 12-10-2015

vengr Рафинированный Теоретик Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору 1lex1 in  N[(-1)^(1/3) + (-1)^(2/3),20] out 0.*10^-21 + 1.7320508075688772935 I Всего записей: 3579 | Зарегистр. 21-08-2001 | Отправлено: 17:00 12-10-2015

1lex1 Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору vengr, а нуля всё равно нет.   Кубический корень даёт 3 результата:           Следовательно (-1)1/3 + (-1)2/3 = (-1)1/3 + 11/3 даёт 3 (или 9) ответа: 0 i·sqrt(3) -i·sqrt(3)   Почему программа выбирает 3 ответ, а не более простой — первый? В результате она противоречит сама себе:   Как быть уверенным, что в более сложных расчётах не будет использован неподходящий корень. Всего записей: 289 | Зарегистр. 22-11-2013 | Отправлено: 18:19 12-10-2015

vengr Рафинированный Теоретик Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору 1lex1.   Математика пишет, что результатом является комплексное число (а не три ответа, девять ответов, ноль...) ноль это только действительная часть результата и он может быть получен отбрасыманием мнимой части:   in      Re[(-1)^(1/3) + (-1)^(2/3)]   out    0 Всего записей: 3579 | Зарегистр. 21-08-2001 | Отправлено: 18:59 12-10-2015

Alex_B Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Цитата: Кубический корень даёт 3 результата В Mathematica кубический корень x^(1/3) (как и другие степени) является функцией. А функция всегда имеет единственное значение. Поэтому указанный вами корень дает 1 результат 1/2 + (I Sqrt[3])/2 А вот уравнение x^3 = -1 дает три результата. Solve[x^3 == -1, x] {{x -> -1}, {x -> (-1)^(1/3)}, {x -> -(-1)^(2/3)}} Всего записей: 1098 | Зарегистр. 10-01-2002 | Отправлено: 21:53 12-10-2015

karl_karlsson Silver Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору 1lex1 Цитата: Как получить 0 из выражения (-1)1/3 + (-1)2/3 ? Зависит от того, какая у вас реальная задача. Получение нуля, это не задача - он получится если есть и не получится если нету.   Цитата: Почему программа выбирает 3 ответ, а не более простой — первый? Потому что корни вычисляются вот так. x = r * e^ia [(x)^(1/y)]_(k+1) = (r)^(1/y) * e^(ia/y) * (e^(2pi*i/y))^k, k=0...y-1   У нас имеется r = 1 a = pi y = 3   [(-1)^(1/3)]_(k+1) = e^(pi*i/3) * (e^(2pi*i/3)^k, k=0...2   Отсюда корни будут [(-1)^(1/3)]_1 = e^(i*pi/3) [(-1)^(1/3)]_2 = e^(i*pi) = -1 [(-1)^(1/3)]_3 = e^(i*5pi/3)   Поэтому сразу видно, что Mathematica делает не что иное, как берет первое попавшее значение.   Alex_B Цитата: В Mathematica кубический корень x^(1/3) (как и другие степени) является функцией Строго говоря, они (разработчики Mathematica) иногда (возможно и чаще) сами не понимают что и зачем вычисляют.   Цитата: А функция всегда имеет единственное значение. Только однозначные функции имеют единственное значение. А вот все корни неоднозначные. Всего записей: 2048 | Зарегистр. 14-03-2007 | Отправлено: 01:09 15-10-2015

Alex_B Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору karl_karlsson   Цитата: Только однозначные функции имеют единственное значение "Неоднозначные функции" это не функции, а отношения. Как вы представляет себе, от чего зависит результат действия "неоднозначной функции"? У нее есть свобода выбора? Всего записей: 1098 | Зарегистр. 10-01-2002 | Отправлено: 01:47 15-10-2015

karl_karlsson Silver Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Alex_B Свойство однозначности не инвариантно по отношению к замене системы координат. На примере окружности это будет вот так.   y = (+/-) sqrt(1-x^2) r = 1   Поэтому, если это представляет некую физическую задачу, то физический смысл неоднозначности не будет. Отсюда и   Цитата: Зависит от того, какая у вас реальная задача.   Такие вопросы на rutracker обсуждали, но уже Matematica удалили правообладатели. Потом и ЛС пропали, так как их ненадолго сохраняют. Еще графические калькуляторы обсуждали - график функции и есть инвариант, но не ее координатное представление внутри какой нибудь системы координат. Всего записей: 2048 | Зарегистр. 14-03-2007 | Отправлено: 10:47 15-10-2015

vikkiv Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Цитата: Такие вопросы на rutracker обсуждали, но уже Matematica удалили правообладатели.   немного ещё на exponenta больше программные обсуждения по этому пакету, варезные там нельзя.. Всего записей: 748 | Зарегистр. 10-11-2005 | Отправлено: 11:51 15-10-2015

Alex_B Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору karl_karlsson Цитата: = (+/-) sqrt Скажите пожалуйста,   1) это один, два или три символа? 2) что он или они обозначают? Всего записей: 1098 | Зарегистр. 10-01-2002 | Отправлено: 23:56 15-10-2015

karl_karlsson Silver Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Alex_B (+/-) sqrt(1-x^2) -> (sqrt(1-x^2)) U (-sqrt(1-x^2))   Окружность - Уравнения   Цитата: В декартовой системе координат окружность не является графиком (однозначной) функции, но она может быть описана как объединение графиков двух следующих (однозначных) функций: Всего записей: 2048 | Зарегистр. 14-03-2007 | Отправлено: 00:31 16-10-2015

Alex_B Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору karl_karlsson Цитата: (sqrt(1-x^2)) U (-sqrt(1-x^2)) Во-первых, то, что вы написали, является однозначной, а не "неоднозначной функций". Во-вторых, вы ввели функцию, значения которой выходят из области действительных и комплексных чисел. Это всё равно что, когда играешь в компьютерную игру, провалиться за текстуры, если не понятно. Всего записей: 1098 | Зарегистр. 10-01-2002 | Отправлено: 13:08 16-10-2015 | Исправлено: Alex_B, 04:40 24-10-2015

burewisnyk Newbie Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Добрый день всем! Скажите, возможно ли получить в Mathematica график с двумя осями ординат и разрывами по оси абцис с изменением масштаба одержанных промежутков и если да, то каким образом. График должен быть типа вот этого:     Если коротко, то есть два частотных спектра: перемещения и силы. На графике нужно провести их сравнение в диапазонах частот 0-1 Гц, 5-7 Гц, 20-40 Гц Всего записей: 3 | Зарегистр. 31-08-2013 | Отправлено: 10:28 26-10-2015

Страницы: 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 | Математика

Переход по форумам  Закладки   » Компьютеры Цифровое изображение Программы Microsoft Windows UNIX Другие OS Hardware В помощь сисадмину Прикладное программирование Игры Форумные игры   » Интернет Web-программирование В помощь вебмастеру Графика Хостинг Зацените-ка!   » Тематические Ikonboard v.2 Ikonboard v.3 Invision Board Другие форумы PHP-Nuke и другие порталы Мобила   » Общие Спорт Флейм Темы по региональным встречам Музыка и Кино Юмор Литература и Живопись   » Ru.Board Новости Помощь по форуму   » Андеграунд eBookz Варезник Раздачи и акции Мобильный варезник Андеграунд Игры и фильмы   » Специальные Тестирование