1
поэтому у меня есть функции журнала буксирных,Как найти пересечение двух функций
var1 <- 10 * x * log(x)^2
var2 <- 100 * x * log(x)
я могу построить из
library(ggplot2)
df <- data.frame(x = rep(x, times = 2), y = c(var1, var2), var = rep(c("10 * x * log(x)^2", "100 * x * log(x)", each = length(x)))
ggplot(df, aes(x = x, y = y, color = var)) + geom_line()
Есть ли вызов функции в R, чтобы помочь мне найти пересечение var1 и var2?