# NOT RUN {
# example included in FRONTIER 4.1 (cross-section data)
data( front41Data )
# Cobb-Douglas production frontier
cobbDouglas <- sfa( log( output ) ~ log( capital ) + log( labour ),
data = front41Data )
summary( cobbDouglas )
# Pseudo-Cook's distances for predicted values
cooks.distance( cobbDouglas )
# Pseudo-Cook's distances for efficiency estimates
cooks.distance( cobbDouglas, "efficiencies" )
# }
Run the code above in your browser using DataLab