library(ggplot2)
x <- 1:100
y <- 1 / x
df <- data.frame(x = x, y = y)
ggplot(data = df, aes(x = x, y = y)) +
  geom_line() +
  labs(y = expression(paste("y = ", frac(1, x))))