This no longer works library(FLash) library(FLBRP) data("ple4") sr =fmle(as.FLSR(ple4,model="bevholt"),control=list(silent=TRUE)) eql =FLBRP(ple4,sr) ple4=fwd(ple4,f=fbar(ple4)[,2],sr=eql)
This no longer works
library(FLash)
library(FLBRP)
data("ple4")
sr =fmle(as.FLSR(ple4,model="bevholt"),control=list(silent=TRUE))
eql =FLBRP(ple4,sr)
ple4=fwd(ple4,f=fbar(ple4)[,2],sr=eql)