# NOT RUN {
myarea <- simOptions()$areaList[1]
data <- readAntaresAreas(myarea)
# Equivalent but more concise than:
data2 <- readAntares(myarea, links = getLinks(myarea), clusters = myarea)
all.equal(data, data2)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab