## Not run:
# # Example to generate anchored parameters
# newp <- GenerateAnchor()
# newp <- GenerateAnchor(temperatures=seq(from=20,
# to=35, length.out=7))
# newp <- GenerateAnchor(number.anchors=7)
# data(nest)
# formated <- FormatNests(nest, previous=NULL)
# newp <- GenerateAnchor(nests=formated)
# newp <- GenerateAnchor(nests=formated, number.anchors=10)
# data(resultNest_4p)
# newp <- GenerateAnchor(nests=resultNest_4p, number.anchors=7)
# newp <- GenerateAnchor(nests=resultNest_4p, temperatures=seq(from=20,
# to=35, length.out=10))
# newp <- GenerateAnchor(nests=resultNest_4p, number.anchors=7)
# newp <- c(newp, Scale=1)
# ## End(Not run)
Run the code above in your browser using DataLab