|
|
Overview
|
|
* Create 1,000 cases:
* Return normally distributed values with a mean of 100 and a standard deviation of 20:
* Return Poisson distributed values with a mean of 100.
* Return random value from a geometric distribution with a probability of .667:
NEW FILE.
INPUT PROGRAM.
LOOP #I=1 TO 1000.
COMPUTE Normal = RV.NORMAL(100,20).
COMPUTE Poisson = RV.POISSON(100).
COMPUTE Geometric = RV.GEOM(.667).
END CASE.
END LOOP.
END FILE.
END INPUT PROGRAM.
EXECUTE.
* Print out all three histograms but no tables.
FREQUENCIES VARIABLES = ALL
/HISTOGRAM
/FORMAT = NOTABLE.
This yields results randomly similar to those below:
NEW FILE.
INPUT PROGRAM.
VECTOR X(10).
LOOP #I = 1 TO 1000.
LOOP #J = 1 TO 10.
COMPUTE X(#J) = RV.POISSON(#J).
END LOOP.
END CASE.
END LOOP.
END FILE.
END INPUT PROGRAM.
EXECUTE.
DESCRIPTIVES X1 X2 X3 X4 X5.
* Chart Builder.
GGRAPH
/GRAPHDATASET NAME="graphdataset" VARIABLES=X1 MISSING=LISTWISE REPORTMISSING=NO
/GRAPHSPEC SOURCE=INLINE.
BEGIN GPL
SOURCE: s=userSource(id("graphdataset"))
DATA: X1=col(source(s), name("X1"))
GUIDE: axis(dim(1), label("X1"))
GUIDE: axis(dim(2), label("Frequency"))
ELEMENT: area(position(summary.count(bin.rect(X1))), missing.wings())
END GPL.
Here is the resulting output for the first Poisson variable (mean of 1):
COMPUTE ID=$CASENUM. EXECUTE.
For a blank data sheet, where you wish to have 100 cases, run this syntax:
NEW FILE.
INPUT PROGRAM.
LOOP #I=1 TO 100.
COMPUTE ID=$CASENUM.
END CASE.
END LOOP.
END FILE.
END INPUT PROGRAM.
EXECUTE.