Error final value in for loop must be numeric or character

Код

restart:with(plots):Warning, the name changecoords has been redefined

> N:=64;

                               N := 64

> fs:=10000;

                             fs := 10000

> fl:=2300;

                              fl := 2300

> fh:=2700;

                              fh := 2700

> m:=10;

                               m := 10

> T:=2^m-1;
> 

                              T := 1023

> F1:=evalf(fl/fs);

                          F1 := 0.2300000000

> F2:=evalf(fh/fs);

                          F2 := 0.2700000000

> Dirac(0):=1;

                            Dirac(0) := 1

> 
> fp1:=2*Pi*F1; 
> fp2:=2*Pi*F2;

                        fp1 := 0.4600000000 Pi


                        fp2 := 0.5400000000 Pi

> g:=(sin(t*fp2)-sin(t*fp1))/(t*Pi);

              sin(0.5400000000 t Pi) - sin(0.4600000000 t Pi)
         g := -----------------------------------------------
                                   t Pi

> Ñ := (n) -> limit(g,t=n); h := aray(0..N); N2:=N/2;

                         Ñ := n ->  lim    g
                                   t -> n


                          h := aray(0 .. 64)


                               N2 := 32

> for n from 0 to N2 do h[N2-n]:= evalf(C(n)); h[N2+n]:=h[N2-n]; od:
> õ:=array[-N..Ò]: y:=array(0..T):
> for n from -N to -1 do x[n]:=0; od:
> for n from 0 to Ò do x[n]:=Dirac(n); od:
Error, final value in for loop must be numeric or character

> for n from 0 to Ò do y[n] := sum(h[k]*x[n-k], k=0..N); od:
Error, final value in for loop must be numeric or character

Nusha341

Сообщения: 5

Зарегистрирован: Ср мар 06, 2019 10:32 am

Markiyan Hirnyk

Сообщения: 1366

Зарегистрирован: Вс дек 04, 2011 11:07 pm

Nusha341

Сообщения: 5

Зарегистрирован: Ср мар 06, 2019 10:32 am

Nusha341

Сообщения: 5

Зарегистрирован: Ср мар 06, 2019 10:32 am

Markiyan Hirnyk

Сообщения: 1366

Зарегистрирован: Вс дек 04, 2011 11:07 pm

У меня есть эта простая процедура в Maple, которую я хочу построить.

test:=proc(n)
    local i,t;  
    for i from 1 to n do
        t:=1;
    od;
    return t;
    end:

Сама процедура работает нормально.

> test(19)
                               1

Когда я хочу построить график, я получаю следующую ошибку:

> plot(test(x),x=1..10)
Error, (in test) final value in for loop must be numeric or character

Пожалуйста помоги

Обычная модель оценки Maple заключается в том, что аргументы, передаваемые командам, оцениваются заранее, до вычислений, выполняемых в теле собственной процедуры команды.

Таким образом, если вы передадите test(x) команде plot, тогда Maple будет оценивать этот аргумент test(x) заранее, а x будет просто символическим именем.

Только позже при построении графика команда plot заменит это имя x фактическими числовыми значениями.

Таким образом, аргумент test(x) оценивается заранее. Но давайте посмотрим, что произойдет, когда мы попробуем такую ​​предварительную оценку test(x).

test:=proc(n)
  local i,t;  
  for i from 1 to n do
    t:=1;
  od;
  return t;
  end:

test(x);
Error, (in test) final value in for loop
must be numeric or character

Мы видим, что ваша процедура test не настроена на получение нечислового символического имени, такого как x, для собственного аргумента.

Другими словами, проблема заключается в том, что вы передаете команде plot.

Такую проблему иногда называют «преждевременной оценкой». Это распространенная ошибка использования Maple. Есть несколько способов избежать проблемы.

Один из способов — использовать так называемую «форму оператора» последовательности вызова команды plot.

plot(test, 1..10);

Другой способ — отложить оценку test(x). Последующее использование так называемых неоценочных кавычек (также известных как одиночные галочки справа, т. е. апострофы) задерживает оценку test(x). Это предотвращает оценку test(x) до тех пор, пока внутренние процедуры построения графиков не заменят символическое имя x фактическими числовыми значениями.

plot('test(x)', x=1..10);

Другой метод состоит в том, чтобы переписать test так, чтобы любой вызов возвращал невычисленное значение, если только его аргумент не является числовым.

test:=proc(n)
  local i,t;
  if not type(n,numeric) then
    return 'procname'(args);
  end if;
  for i from 1 to n do
    t:=1;
  od;
  return t;
end:

# no longer produces an error
test(x);

        test(x)

# the passed argument is numeric
test(19);

           1

plot(test(x), x=1..10);

Я не буду показывать здесь реальные графики, так как ваш пример дает только график константы 1 (один).

@acer уже говорил о технической проблеме, но в вашем случае может быть проблема математическая. Областью определения вашей функции являются натуральные числа, то есть множество положительных целых чисел {1, 2, 3, 4, 5, …}, а не множество действительных чисел! Как вы интерпретируете выполнение цикла for до реального числа, например, Pi или sqrt (2) до 5/2? Почему я говорю о реальных числах? Потому что в своей сюжетной линии вы использовали plot( text(x), x = 1..10 ). x=1..10 в plot обозначает x на действительном интервале (1, 10), а не целочисленном наборе {1, 2, …, 10}! Есть два способа сделать его осмысленным.

1. Вы имели в виду функцию с целым доменом? Тогда ваш сюжет должен представлять собой набор точек. В этом случае вам нужен точечный график, вы можете использовать plots:-pointplot или добавить параметр style=point в plot. Смотрите их справочные страницы для более подробной информации. Вот самое простое редактирование вашей сюжетной линии (сохранение части определения test такой же, как в вашем посте).

plot( [ seq( [n, test(n)], n = 1..10 ) ], style = point );

А сюжетный результат следующий.

1. В вашей функции вы хотите, чтобы цикл for выполнялся до тех пор, пока целое число не будет связано с действительным числом, например его полом? Это то, что делает цикл for в Maple по умолчанию. См. следующий пример.

t := 0:
for i from 1 by 1 to 5/2 do
    t := t + 1:
end do;

Как вы можете видеть, Maple делает два шага, один для i=1 и один для i=2, он обрабатывается буквально как for i from 1 by 1 to floor(5/2) do, и это поведение по умолчанию не для каждого действительного числа, если вы замените 5/2 от sqrt(2) или Pi, Maple вместо этого выдаст вам сообщение об ошибке. Но в любом случае исправление, которое @acer предоставил для вашего кода, отображает функцию «x -> test (floor (x))» в вашем случае, когда x исходит из рациональных чисел (и чисел с плавающей запятой ^_^). Если вы измените свой код вместо того, чтобы возвращать постоянное число, вы также увидите его на своем графике. Например, попробуем следующее.

test := proc(n)
  local i,t:
  if not type(n, numeric) then
    return 'procname'(args):
  end if:
  t := 0:
  for i from 1 to n do
    t := t + 1:
  end do:
  return(t):
end:
plot(test(x), x=1..10);

Вот сюжет.

Это действительно «x -> test(floor(x))».