помещать диапазоны в переменную при определении функции

Question

Привет, я хочу иметь это:

fun <- function(t) { sin(2*pi*t) - 0.5*cos(2*pi*t)}

, но с учетом

a 0 < t < 10

Как я могу построить функцию с ограничением t?

Myкод

  fun <- function(t) { sin(2*pi*t) - 0.5*cos(2*pi*t)} 

  plot(fun, xlim = c(0,10))

Как я могу сделать это без xlim?Спасибо

Answer 1

Используйте from и to:

plot(fun,from=0,to=10,xlim=c(-10,20))

Или в качестве альтернативы в ggplot2, сначала настройте окно фиктивного графика,затем используйте stat_function с xlim и scale_x_continuous.Обратите внимание, что xlim работает здесь совсем не так, как в базовой R.

fun <- function(t) { sin(2*pi*t) - 0.5*cos(2*pi*t)} 
p <- ggplot(data=data.frame(x=0), mapping=aes(x=x))
p + stat_function(fun=fun, xlim=c(0,10)) + 
      scale_x_continuous(limits=c(-10,20))