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

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

Advanced Member		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Alex_B
Цитата:
Однако Mathematica 9 не дает в нем ничего изменить. Файл ведет себя как открытый только для чтения. Скопировал файл в свою папку. Результат тот же. Что за притча такая?

Надо нажать Ctrl+Shift+O,  в окне Options Inspector выбрать в списке Show option values редактируемый файл ("Default.nb"), в следующем выпадающем списке "As text", и затем вставить в текстовое поле ниже строки:

Код:
Editable->True,
Saveable->True,

и нажать Apply.
После этого файл прекрасно редактируется и сохраняется (проверено в Mathematica 9.0.1).
Всего записей: 1835 | Зарегистр. 22-03-2003 | Отправлено: 10:08 17-05-2013 | Исправлено: popkov, 10:10 17-05-2013
Alex_B



Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
popkov
Здорово, что у вас получилось.
Однако у меня (Mathematica 9.0.1) возникает ошибка:
 

Цитата:
The specified setting for the option PrivateNotebookOptions cannot be used.

Это когда я нажимаю Apply.
 
Пробовал с файлом из установленной папки и с копией файла в своей папке.
 
FrontEndVersion->"9.0 for Microsoft Windows (64-bit) (January 25, 2013)",
 
Добавил
Получилось! Проигнорировал сообщение об ошибке и отредактировал настройки.
Спасибо.
Всего записей: 1088 | Зарегистр. 10-01-2002 | Отправлено: 12:42 17-05-2013 | Исправлено: Alex_B, 13:01 17-05-2013
Andrew10

Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Добрый день всем!
 
Возникла такая проблема:
Есть разреженная матрица, нужно соорудить разреженную матрицу вдвое большего порядка, у которой исходная матрица была бы в правом верхнем углу.
Простой пример:  
 
(*Матрица A-единичная матрица порядка 4*)
A = SparseArray[{i_, i_} -> 1, {4, 4}];
(*Матрица B-разреженная матрица порядка 8,у которой подматрица 4x4 в верхнем левом углу-единичная*)
B = SparseArray[{i_, j_} /; 1 <= i <= 4 && 5 <= j <= 8 ->  
    A[[i, j - 4]], {8, 8}];
B // MatrixForm
 
Пример работает и создает матрицу B нужного вида, но при этом выдает сообщение красным:
 
Part::pspec: Part specification i is neither a machine-sized integer nor a list of machine-sized integers. >>
 
Может кто подскажет, что бы это значило, и как избавиться от этого сообщения?
А может есть более элегантный способ решения задачи?
Спасибо!
Всего записей: 780 | Зарегистр. 26-02-2005 | Отправлено: 23:12 18-06-2013
popkov

Advanced Member		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Andrew10
Цитата:
что бы это значило, и как избавиться от этого сообщения?  
SparseArray не имеет Hold*-атрибута, поэтому его аргументы выполняются перед выполнением самого SparseArray. Это означает, что
Код:
A[[i, j - 4]]
будет выполнено без локализации переменных i, j. Чтобы этого избежать, используйте RuleDelayed:

Код:
 
B = SparseArray[{i_, j_} /; 1 <= i <= 4 && 5 <= j <= 8 :>  
    A[[i, j - 4]], {8, 8}];
Всего записей: 1835 | Зарегистр. 22-03-2003 | Отправлено: 06:33 19-06-2013
Andrew10

Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
popkov
Спасибо большое!
Все время забываю про это самое RuleDelayed!
Ведь уже сталкивался с чем-то подобным  
 
Еще раз спасибо!
 
 
Всего записей: 780 | Зарегистр. 26-02-2005 | Отправлено: 14:24 19-06-2013
panda3

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

Код:
B = ArrayPad[A, {{0, 4}, {4, 0}}]

Или так, для наглядности:

Код:
B = KroneckerProduct[{{0, 1}, {0, 0}}, A]
Всего записей: 203 | Зарегистр. 06-02-2007 | Отправлено: 10:49 20-06-2013 | Исправлено: panda3, 10:55 20-06-2013
Andrew10

Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Добрый день всем!
 
Обращаюсь с очередной "головоломкой" для Mathеmatic-и:
 
Есть список типа Real, как найти номера элементов списка, принимающих локальный минимум (т.е. не больших своих соседей) без использования циклов типа Do, Table и т.д. ?
 
Спасибо!
Всего записей: 780 | Зарегистр. 26-02-2005 | Отправлено: 20:32 10-07-2013
panda3

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

Код:
Flatten@Position[ListCorrelate[{1, 1, 1}, inputList, {1, -1}, Null,Times, #1 >= #2 <= #3 &], True]+1

или так:

Код:
Flatten@Position[Partition[inputList, 3, 1], {a_, b_, c_} /; a >= b <= c] + 1

или может:

Код:
Reap[MapIndexed[If[#1[[1]] >= #1[[2]] <= #1[[3]], Sow[#2[[1]] + 1]] &,Partition[inputList, 3, 1]]][[2, 1]]
Всего записей: 203 | Зарегистр. 06-02-2007 | Отправлено: 10:41 11-07-2013 | Исправлено: panda3, 11:13 11-07-2013
Andrew10

Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
panda3
 
Большое спасибо!
 
Попробовал все три варианта.  
Быстрее всего вариант 1, вариант 2 уступает совсем немного по времени, процентов 10, вариант 3 -более чем в два раза медленнее.
 
По простоте и понятности для меня вне конкуренции вариант 2. Так что выбираю его. Еще раз спасибо!
Всего записей: 780 | Зарегистр. 26-02-2005 | Отправлено: 12:38 12-07-2013
Annymann

Junior Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Подскажите, может ли математика преобразовывать выражения?
пример:
интеграл dx/x [от 0,1 до 0,5] = ln x [от 0,1 до 0,5] = ln 0,5/0,1 = ln 5
Всего записей: 118 | Зарегистр. 19-11-2005 | Отправлено: 15:13 02-09-2013 | Исправлено: Annymann, 15:16 02-09-2013
popkov

Advanced Member		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Annymann
Цитата:
 интеграл dx/x [от 0,1 до 0,5] = ln x [от 0,1 до 0,5] = ln 0,5/0,1 = ln 5
Может дать сразу конечный результат:
Код:
Integrate[1/x, {x, 1/10, 1/2}]
(* => Log[5]                       *)

Или же можно получить то же по шагам, стартуя самостоятельно от неопределенного интеграла:
Код:
antiderivative[x_] = Integrate[1/x, x]
antiderivative[1/2] - antiderivative[1/10]
% // Simplify
(* => Log[x]                        *)
(* => -Log[2] + Log[10]       *)
(* => Log[5]                        *)
Всего записей: 1835 | Зарегистр. 22-03-2003 | Отправлено: 15:43 02-09-2013 | Исправлено: popkov, 15:43 02-09-2013
Annymann

Junior Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
popkov, спасибо
Всего записей: 118 | Зарегистр. 19-11-2005 | Отправлено: 16:07 02-09-2013
Rom380

Newbie		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Здравствуйте!
 
Кто-нибудь использовал в математике9  remote kernel?  Встала задача по переносу длительных расчетов на небольшой но уже по-настоящему многопроцессорный комп, стал пробовать и пока что-то не получается.  
 
Ситуация на данный момент следующая:
1. Есть математика 9.0.1 на ноуте под вин8 и такая же 9.0.1 на сервере с дебианом.
2. Есть SSH доступ с ноута на сервер. Через Putty по ключу авторизуюсь без проблем, не вводя каждый раз пароль и могу запустить тот же MathKernel на сервере через консоль..
 
Теперь, собственно, проблема.
В математике на ноуте захожу в Kernel configuration options создаю новый Remote kernel, указываю айпишник сервера и имя пользователя для логина. Остальные параметры оставляю по-дефолту.
Создаю новый notebook и указываю, что исполнять его на вновь созданном удаленном ядре. Пишу в нем какую-нибудь команду математики, например, $MachineName и жму выполнить. Математика спрашивает пароль для SSH соединения, ее встроенный клиент пока не знает ключа..
В Путти я вижу, что на сервере возник процесс MathKernel, и даже отработал пару секунд процессорного времени. Т.е. математика имеет доступ к серверу, может запустить там что-то...
Но, вот, результаты удаленных вычислений в нотебуке не появились. Зато появилось окошко Messages и выдало мне, что есть ошибка матлинка, о которой в хелпах нет ничего..
 
Message:
Цитата:
 
The kernel ufo24 failed to connect to the front end. (Error = MLECONNECT). You should try running the kernel connection outside the front end.

 
Пробовал с выключенным Вин-Файрволлом - пофиг. Да, и понятно, SSH-то коннектится, значит проблема не в стенке..
 
Кто-нибудь может подсказать мне правильный путь, куда копать?
Всего записей: 5 | Зарегистр. 29-08-2013 | Отправлено: 16:49 01-10-2013
Rom380

Newbie		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Решил по-простому. Поставил gridMath на сервере, поднял грид и забыл об этой головной боли - все отлично работает удаленно  впараллель..
Всего записей: 5 | Зарегистр. 29-08-2013 | Отправлено: 16:44 14-10-2013
dramadeur

Newbie		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Никто не может мне помочь в написании кода для простой задачи? Т.е. достаточны базовые знания программы. Готов отблагодарить $
Всего записей: 1 | Зарегистр. 30-01-2012 | Отправлено: 15:21 23-10-2013
vikkiv



Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
dramadeur
По логике обычно сначала идёт постановка задачи, а потом вокруг обсуждение/решения, или ты особенный/я? Таких с котами в мешках и так стада вокруг ходят.
Всего записей: 747 | Зарегистр. 10-11-2005 | Отправлено: 05:13 24-10-2013
Rom380

Newbie		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Никто не заморачивался перенаправлением вывода в Математике? Нужно рассчитанную картинку отправлять на второй экран, подключенный к HDMI. Никто не в курсе, где можно более детальный хелп по OutputSream найти? Или тут в торону ВинAPI копать нуна?
Всего записей: 5 | Зарегистр. 29-08-2013 | Отправлено: 20:43 06-11-2013
popkov

Advanced Member		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Rom380
OutputSream позволяет перенаправить Output в произвольный файл или Pipe (не знаю, как это переводится). Рекомендую обратиться в сообщество  
http://mathematica.stackexchange.com  
с подобным вопросом, но более детально сформулированным: что, как и куда надо выводить?
Всего записей: 1835 | Зарегистр. 22-03-2003 | Отправлено: 02:51 07-11-2013
Rom380

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

Цитата:
с подобным вопросом, но более детально сформулированным: что, как и куда надо выводить?
 

Вот, вот, именно, параметры потока и интересуют! Ок, отпишусь там, спасибо!
 
Всего записей: 5 | Зарегистр. 29-08-2013 | Отправлено: 16:45 08-11-2013
karl_karlsson



Silver Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Ну вот тривиальные проблемы:
 
Не берется
Integrate[Abs[x], x]
 
Ошибки на место графика
Plot[Integrate[x, x], {x, -1, 1}]
 
Все это Maple делает как надо.
Почему так получается?
Всего записей: 2027 | Зарегистр. 14-03-2007 | Отправлено: 17:34 10-12-2013
Открыть новую тему     Написать ответ в эту тему

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