#plot #wolfram-mathematica #missing-data #aliasing
#построение #wolfram-mathematica #отсутствуют данные
Вопрос:
Я хотел бы показать несколько импульсов с разными промежутками. У меня есть функции
g[y_] = Piecewise[{{-Sin[y], 0 < y < 2 Pi}, {0, y < 0}, {0,
y > 2 Pi}}]
объединено в
f[z_, t_] = g[z - t]
и
pulse[n_, t_, z_] = Sum[f[z, i t], {i, n}]
Иногда он отображает все импульсы, а иногда и нет. Пример, когда это работает:
Построить график[{импульс [5, 40, z — 100] / 4}, {z, 0, 1000}, диапазон построения -> {{0, 1000}, Все}]
Пример, когда это не удается: Построить[{импульс [5, 40, z — 200] /4}, {z, 0, 1000}, диапазон построения -> {{0, 1000}, Все}]
И впечатляющий сбой: Построить[{импульс [5, 30, z — 260] / 4}, {z, 0, 1000}, диапазон построения -> {{0, 1000}, Все}]
Есть ли способ исправить это, чтобы все импульсы отображались независимо от параметров?
Комментарии:
1. Не на моем компьютере. В последнем примере по-прежнему нет графика. Но я подробнее рассмотрю этот атрибут.
Ответ №1:
Давайте попробуем посмотреть, сможем ли мы получить то же самое.
Перейдите к
https://www.wolframcloud.com/objects/b3m2a1/LetMeMathematicaThatForYou.html
и терпеливо подождите, пока не появится надпись «Введите свой Wolfram …».
Один щелчок левой кнопкой мыши в большом пустом пространстве под этим.
Нажмите клавишу x и терпеливо ждите, пока она не появится.
Нажмите клавишу обратного пробела и терпеливо подождите, пока она не исчезнет.
Scrape-n-paste именно это
g[y_]:=Piecewise[{{-Sin[y],0<y<2Pi},{0,y<0},{0,y>2Pi}}];
f[z_,t_]:=g[z-t];
pulse[n_,t_,z_]:=Sum[f[z,i*t],{i,n}];
Plot[{pulse[5,30,z-260]/4},{z,0,1000},PlotRange->All]
в большое пустое пространство и терпеливо ждать, пока оно не появится.
Сдвиньте и введите и терпеливо ждите, пока не появится результат.
Я не получаю пиков.
Измените эту последнюю строку на
Plot[{pulse[5,30,z-260]/4},{z,0,1000},PlotRange->All,PlotPoints->160]
и сдвиньте и введите и терпеливо ждите, пока не появится результат.
Теперь я получаю 5 пиков.
Если вы сделаете именно это, вы получите точно такой же результат?
Вы можете изменить это значение 160 на 500 или даже 1000 и, похоже, оно очень мало влияет на отображаемый график и лишь немного замедляет работу.
Эта веб-страница представляет собой очень хороший бесплатный сервис с жесткими ограничениями на размер ввода и количество времени до его прерывания. Пожалуйста, не злоупотребляйте этим. Спасибо
Комментарии:
1. Я попробовал это на своем компьютере — и это сработало. Таким образом, это комбинация как «всех», так и точек построения. Я удалил часть PlotRange, когда раньше пробовал только PlotPoints. Спасибо! Я ценю это!
2. Я увеличил количество точек графика до 5000 и заставил его работать в Manipulate довольно хорошо. Я в основном получаю сплошной блок, когда импульсы очень близки друг к другу, чтобы при необходимости хорошо распределяться. Кажется, у меня больше проблем с задержкой, чем без, поэтому мне нужно лучше понять это. На данный момент я счастлив, потому что люди, которые будут двигать ручки, могут видеть вещи ясно.