2014 dxdy logo

Научный форум dxdy

Математика, Физика, Computer Science, Machine Learning, LaTeX, Механика и Техника, Химия,
Биология и Медицина, Экономика и Финансовая Математика, Гуманитарные науки




 
 Как нарисовать точку на графике в Mathematica?
Сообщение11.04.2011, 17:58 
Ситуация такая: нарисован трехмерный график и есть точка в виде тройки координат. Как отметить эту точку на графике, чтобы ее было видно? Весь хелп обрыл, нигде не нашел :-(

 
 
 
 Re: Как нарисовать точку на графике в Mathematica?
Сообщение11.04.2011, 18:09 
Пока что скажите, какая версия у вас, а я пока посмотрю.

-- Пн апр 11, 2011 21:45:20 --

Если у вас восьмая, должен целиком работать следующий пример:
Код:
Manipulate[
  Show[
    Plot3D[Sqrt[1 - x^2 - y^2], {x, -1, 1}, {y, -1, 1}],
    Graphics3D[{
      PointSize[.03],
      Point[1.1 {Cos[s] Cos[t], Cos[s] Sin[t], Sin[s]}]
    }]
  ],
  {s, 0, Pi/2, Pi/16}, {t, 0, 2 Pi, Pi/16}
]

Принцип работы: Show может принимать параметрами несколько форм Graphics (здесь Graphics3D), вот мы и объединяем ту, которая получается от выполнения Plot3D и свою, в которой строится точка размером 3% картинки в нужном месте (над полусферой в заданном направлении). Manipulate обёрнуто для красоты и тестирования.

 
 
 
 Re: Как нарисовать точку на графике в Mathematica?
Сообщение11.04.2011, 22:26 
О, работает! :-) Спасибо.

 
 
 [ Сообщений: 3 ] 


Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group