# example included in FRONTIER 4.1
data( front41Data )
front41Data$logOutput <- log( front41Data$output )
front41Data$logCapital <- log( front41Data$capital )
front41Data$logLabour <- log( front41Data$labour )
sfa <- frontier( front41Data, "firm", "time", "logOutput",
c( "logCapital", "logLabour" ) )
coef( sfa, which = "ols" )
coef( sfa, which = "grid" )
coef( sfa )
Run the code above in your browser using DataLab