For example, see the following reproducible example from the effectsize
package:
library(effectsize)
model1 <- lm(mpg ~ cyl + disp + hp, data = mtcars)
model2 <- lm(mpg ~ cyl, data = mtcars)
cohens_f_squared(model1, model2 = model2)
The output indicates the Cohen's f2 is .18 and the change in r2 is .04. I would think f-squared would be .04167 (.04/1 - .04).
Let me know where I'm missing something - thank you!