window title="Proportion Stimulator"

grid 1 4 sticky=W
  label text=View: font=bold
  button text=Docs func=openFile action=RanPropDoc.pdf
  button text="R Code" func=openFile action=RanProp.r
  button text=Window func=openFile action=RanPropWin.txt

null
grid 1 2 toptitle="Distributions" topfont="bold 14" sticky=W
   grid 3 1
      radio name=MDL value=1 text="M = Multinomial" sticky=W font=12
      radio name=MDL value=2 text="D = Dirichlet" sticky=W font=12
      radio name=MDL value=3 text="L = Logistic-normal" sticky=W font=12
   vector names="ns N sig" length=3 values="100 50 0.1" vertical=T \
     width=8 sticky=E labels="'# Simulations' 'Sample size (M,D)' \
     'Sigma (L)'" font=12

null
grid 1 3 sticky=W toptitle="Proportion Vector" topfont="bold 14"
   vector names=pvec length=6 values="0.2 0.3 0.5 0 0 0" width=10 \
     vertical=T font=12 sticky=N padx=10
   vector names=ym length=6 values="0.2 0.3 0.5 0 0 0" labels=mean \
     width=10 vertical=T font=12 sticky=N padx=10
   vector names=ys length=6 values="0 0 0 0 0 0" labels=SD \
     width=10 vertical=T font=12 sticky=N padx=10

button text="GO" function=getMod padx=30 pady=8 sticky=SE
