Способ сделать то, что вы хотите, это иметь соответствующую часть base
как NA
, и эти точки не будут построены.
Это данные и функции, как в вопросе.
x1 <- seq(-1, 0, 0.01)
x2 <- seq(0, 1, 0.01)
base <- seq(-4, 4, 0.01)
y1 <- function(x) {(1 + x)^3}
y2 <- function(x) {(1 - x)^2}
Теперь используйте функцию is.na<-
, чтобы все в base
между -1
и 1
было равно NA
.
is.na(base) <- -1 <= base & base <= 1
И запускать графические команды без изменений.
plot(base, 0*base, xlab = "x", ylab = "y")
points(x1, y1(x1))
points(x2, y2(x2))
