geom_function() is easy to remember and implement:

ggplot(d, aes(x, y)) + 
  geom_point() + 
  geom_function(fun = function(x) 100 - x, colour = "red") +
  scale_y_log10() + 
  scale_x_log10()