> やはり黒丸の処理は面倒ですね(^_^;)

確かに。
乱数を使って手を抜く，というのもあります。

\documentclass{jarticle}
\usepackage{graphicx,color}
\usepackage{emathPs}
\usepackage[perl]{emathRn}

\begin{document}
\begin{pszahyou*}[ul=8mm](-6,4)(-4,4)
  \Put{(-3,4)}(0,0)[t]{母集団}
  \Put{(2,4)}(0,0)[t]{\EMparbox{大きさ$n$\\の標本}}
  \tenretu*<kuromaru>{A(-1.5,0);B(-1.6,1);C(-1.7,-1);
          AA(1.4,0);BB(1.5,1);CC(1.6,-1)}
% 乱数で黒丸 --------------------------------------------
  \ransuuretu*[seed=1234567890]{120}
  \begin{clipDaen}{(-3,0)}{1.8}{2.8}
  \Ifor\ival{0}{45}\Do{%
    \Ransuu{-3+4*(X-.5)}\xval
    \Ransuu{6*(X-.5)}\yval
    \Kuromaru{(\xval,\yval)}
  }
  \end{clipDaen}
  \begin{clipDaen}{(2,0)}{.8}{1.8}
  \Ifor\ival{0}{15}\Do{%
    \Ransuu{2+2*(X-.5)}\xval
    \Ransuu{4*(X-.5)}\yval
    \Kuromaru{(\xval,\yval)}
  }
  \end{clipDaen}
% ------------------------------------------------------
  \Daen{(-3,0)}{2}{3}
  \Daen{(2,0)}{1}{2}
  \linethickness{.3pt}
  \HenKo<yazirusi=r,putoption={[n]}>\BB\B{抽出}
  \Drawline<yazirusi=a>{\A\AA}
  \HenKo<yazirusi=a,putoption={[n]}>\C\CC{}
\end{pszahyou*}
\end{document}

▼関連発言
│
└◆1016:母集団と標本 [榎本] 10/09 14:55
　└◆1017:Re:母集団と標本 [tDB] 10/09 16:39
　　└◆1018:Re[2]:母集団と標本 [榎本] 10/10 10:12
　　　└◆1019:Re[3]:母集団と標本 [tDB] 10/10 13:30
　　　　└◆1020:Re[4]:母集団と標本 [榎本] 10/10 17:52<-last