# NOT RUN {
(M1 <- InfRobModel())
## The function is currently defined as
function(center = L2ParamFamily(), neighbor = ContNeighborhood()){
new("InfRobModel", center = center, neighbor = neighbor)
}
# }
Run the code above in your browser using DataLab