# NOT RUN {
# All dimensions should look similar
d <- 8
SG = CGGPcreate(d,201)
CGGPplothist(SG)
CGGPplothist(SG, ylog=FALSE)
# The first dimension is more active and will have greater depth
SG <- CGGPcreate(d=5, batchsize=10)
SG <- CGGPappend(CGGP=SG, batchsize=100)
CGGPplothist(SG)
# }
Run the code above in your browser using DataLab