r - ポイントの後に x の関数を変更する R コマンド?

Question

R でいくつかのデータをシミュレートし、x を Y (率) に対してプロットしています。x をある点まで直線的に増加させてから横ばいにしたいと考えています。つまり、Y は 0.1 から 5 の間の x の関数ですが、5.01 から 10 まで一定です。x を変化させる簡単なコマンドはありますか? 講師が教えてくれたのは確かですが、思い出せません... 助けや考えがあれば大歓迎です！

Answer 1

使用できますifelse：

> f <- function(x) ifelse(x < 5, x**2, 25)
> x <- seq(1, 10, .1)
> plot(x, f(x), type='l')