Найдено 8 результатов

Airunreal
Пт май 07, 2010 8:29 pm
Форум: Mathematica
Тема: Номер строки кода
Ответы: 0
Просмотры: 1504

Номер строки кода

:oops: столкнулся тут с проблемой что у меня при открытие файла выходит ошибка - что мол в 1027 строке ошибка. я могу его открыть на нетбуке. только вопрос кто знает как включить отображения номера строки кода. вроде уже все пролез - найти не могу
спасибо сем за внимание =)
Airunreal
Ср фев 17, 2010 7:52 pm
Форум: Mathematica
Тема: Создание функции
Ответы: 3
Просмотры: 1917

У меня собственно такая задача создание функции которая бы брала координаты мышки (хp, yp) Это можно сделать функциями Slider2D или Locator: {Slider2D[Dynamic[r], {{-5, -5}, {5, 5}, {1/10000, 1/10000}}, ImageSize -> Large], Dynamic[r]} r1 = 3; c1 = ...
Airunreal
Вт фев 16, 2010 9:45 pm
Форум: Mathematica
Тема: Создание функции
Ответы: 3
Просмотры: 1917

Создание функции

У меня собственно такая задача создание функции которая бы брала координаты мышки (хp, yp) далее так как у нас есть первоначальный набор координат типа х1 у1 к ним привязанные какие то координаты r1 и с1 х2 у2 к ним r2 c2 и т.д так вот надо что бы функция брала последовательно координаты х1 у1 (и ко...
Airunreal
Вт янв 26, 2010 11:47 pm
Форум: Mathematica
Тема: Нетривиальная задача для mathematica
Ответы: 0
Просмотры: 1545

Нетривиальная задача для mathematica

Есть такая задача: Надо в математике нарисовать (не рукой нарисовать а просто линия что бы была изначально) примитив (линию) далее. перетащить эту линию мышкой в другую часть экрана. Надо для чего - очень хочу попробовать сделать задачу с перетаскиваниями спичек (ну что то вроде выложено 9+7=1 из сп...
Airunreal
Чт апр 16, 2009 5:42 pm
Форум: Mathematica
Тема: Протейший вопрос =)
Ответы: 6
Просмотры: 11678

F[mas_List, i_Integer, j_Integer, n_Integer, m_Integer] := Module[{count = 0}, If[i + 1 <= n, If[mas[[i + 1, j]] == 1, count++];]; If[(i + 1 <= n) && (j + 1 <= m), If[mas[[i + 1, j + 1]] == 1, count++];]; If[(i + 1 <= n) && (j - 1 >= 1), If[...
Airunreal
Вс апр 12, 2009 7:16 am
Форум: Mathematica
Тема: Протейший вопрос =)
Ответы: 6
Просмотры: 11678

X = Table[RandomInteger[{0, 10}]/10, {i, 16}] // N Do[If[X[[i]] != 0, Print[X[[i]]]], {i, 16}] Андрей - если не сложно прочитай тут код. Я постараюсь максимально объяснить что делается. F[mas_List, i_Integer, j_Integer, n_Integer, m_Integer] := Module[{count = 0}, If[i...
Airunreal
Сб апр 11, 2009 6:41 pm
Форум: Mathematica
Тема: Протейший вопрос =)
Ответы: 6
Просмотры: 11678

Andrey писал(а):

Код: Выделить всё

X = Table[RandomInteger[{0, 10}]/10, {i, 16}] // N
Do[If[X[[i]] != 0, Print[X[[i]]]], {i, 16}]


Сейчас чуток переделаем...
и попробую =)))
Airunreal
Пт апр 10, 2009 7:58 pm
Форум: Mathematica
Тема: Протейший вопрос =)
Ответы: 6
Просмотры: 11678

Протейший вопрос =)

Небольшое предисловие...
Есть некий массив из 0 и 1...
надо выбирать по очереди все элементы из массива. и проверять равен ли 0 или нет. если нет выполняется такое то условие.
Сам вопрос - кто нибудь подскажите способ выбирать по очереди элементы массива. :oops:

Если кому не сложно подскажите.