## Not run:
# ### Run on supplied long data
#
# DEMO_Knots_Boundaries <- createKnotsBoundaries(sgpData_LONG)
#
# ### Run as part of prepareSGP
#
# ### First NULL out knots and boundaries embedded in SGPstateData
#
# SGPstateData[["DEMO"]][["Achievement"]][["Knots_Boundaries"]] <- NULL
# Demonstration_SGP <- prepareSGP(sgpData_LONG)
# ## End(Not run)
Run the code above in your browser using DataLab