\begin{Schunk}
\begin{Sinput}
 bdraw()
 points(x, y)
 text(x = x, y = y, labels = labels, col = mycolors, cex = c(1.2, 1.7, 1.3, 1), pos = 1, offset = 0.7)
\end{Sinput}
\end{Schunk}
