objref g1, g2, b
b = new VBox()
b.intercept(1)
g1 = new Graph()
g1.size(0,200,0,10)
g2 = new Graph()
g2.size(0,200,0,10)
b.intercept(0)
b.map("psth and mean freq")
//@code
VECSIZE = 200
MINSUM = 50
DT = 1000	// ms per bin of v1 (vsrchist)
TRIALS = 1

objref v1, v2
v1 = new Vector(VECSIZE)
  
objref r
r = new Random()
           
  
for (ii=0; ii<VECSIZE; ii+=1) {
	v1.x[ii] = int(r.uniform(0,10))
}
v1.plot(g1)

v2 = new Vector()
v2.psth(v1,DT,TRIALS,MINSUM)
v2.plot(g2)