вычислить функцию лимба с графиком в R

Question

Скажи, что есть лим (\lim_{x \to \infty}\left(\frac{x}{x - 1} - 2\right) )

это = -1. Как я могу получить участок с указанным значением? Чтобы быть более ясным, я хочу сюжет, как это

как это получить?

Answer 1

Вы можете сделать что-то вроде этого:

my_func <- function(x) x / (x - 1) - 2

library(ggplot2)
ggplot(data.frame(x = 0), aes(x)) +
    stat_function(fun = my_func, aes(colour = "Function")) +
    geom_hline(aes(yintercept = -1, colour = "Asymptote")) +
    scale_colour_manual(values = c("Asymptote" = "blue", "Function" = "orange")) + 
    xlim(-10, 10) +
    theme_minimal()