showClass("EBS") # shows the structure of the cpt class
data<-c(rpois(100,2),rpois(100,5))
# creates a new EBS object containing the segmentation of x
E<-EBSegmentation(data)
class(E) # verifies the class of E
getModel(E) # retrieves model of the segmentation
getLength(E) # retrieves the length of the signalRun the code above in your browser using DataLab