Как построить функцию с положительными константами и равенством для переменной x?

Question

Я смотрю, как построить график f (x) = (ax) / (k ^ 2 + x ^ 2).
У меня нет предпочтений в единицах измерения или больших значениях графика.

k и a являются положительными константами

x ≥ 0.

Очень элементарная попытка кода:

eq = function(x){((ax)/((k^2)+(x^2))}   
plot(eq(1:1000), type='l') 

Answer 1

Предполагая, что k и a являются положительными константами, я постараюсь переписать ваш код.Это может быть либо вы определяете свои k и a ранее, либо если вы говорите, что это будет просто одно число, вы можете также определить их в функции.

eq <- function(x){
  a = 2
  k = 3
  (a*x)/(k^2)+(x^2)
}

plot(eq(1:1000), type="l")

Если вы хотите определитьвсе ваши переменные, но все еще хотят a и k со значением по умолчанию 2 and 3 соответственно, вы можете записать его как:

eq <- function(x, a=2, k=3){
  (a*x)/(k^2)+(x^2)
}

plot(eq(1:1000), type="l")