Open RobinHankin opened 5 months ago
In the mvp
package, subs()
has this functionality:
suppressMessages(library("mvp"))
set.seed(0)
p <- rmvp()
p
#> mvp object algebraically equal to
#> 3 + 6 a + 3 a b e f^2 + 4 a d^2 e f^2 + 5 a^3 b^2 c + 4 b c^2 d e^2 + 6 b^3 d e
p |> subs(a=17)
#> mvp object algebraically equal to
#> 105 + 4 b c^2 d e^2 + 51 b e f^2 + 24565 b^2 c + 6 b^3 d e + 68 d^2 e f^2
Created on 2024-05-15 with reprex v2.1.0
Above, the first call to
setweight()
works fine. I would expect the second call to return the same value, but it fails.