<html><head><meta http-equiv="Content-Type" content="text/html charset=utf-8"></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space;" class="">Hello<div class="">Thanks, thanks and thanks : Herbert is the greteast and PSTricks the most powerfull.</div><div class=""><br class=""></div><div class="">In fact this picture is in baccalauréat Asie 22 juin 2017 and I make this adaptation :</div><div class=""><br class=""></div><div class="">%%%%%%%%%</div><div class=""><div class="">\psset{unit=6cm,comma=true}</div><div class="">\begin{pspicture}(-0.1,-0.1)(1.1,1.2)</div><div class="">\psgrid[gridlabels=0pt,gridwidth=0.2pt,subgridwidth=0.15pt](0,0)(1,1)</div><div class="">\multido{\n=0.1+0.2}{5}{\psline[linewidth=0.2pt](0,\n)(1,\n)}</div><div class="">\psaxes[linewidth=1.25pt,Dx=0.2,Dy=0.2,labelFontSize=\scriptstyle](0,0)(0,0)(1,1)</div><div class=""><div class="">\psRandom[dotsize=4pt,dotstyle=o,fillstyle=solid,fillcolor=black,</div><div class=""> randomPoints=100](0,0)(1,1){%</div><div class=""> \pscustom[linestyle=none]{%</div><div class=""> \psline(0,1)</div><div class=""> \psplot[plotpoints=200]{0}{1}{1 x dup mul 1 add div }</div><div class=""> \psline(1,0)</div><div class="">}}</div><div class="">\psRandom[dotsize=4pt,dotstyle=o,fillcolor=white,</div><div class=""> randomPoints=100](0,0)(1,1){%</div><div class=""> \pscustom[linestyle=none]{%e</div><div class=""> \psline(0,1)(1,1)</div><div class=""> \psplot[plotpoints=200]{1}{0}{1 x dup mul 1 add div }</div><div class="">}}</div><div class="">\psplot[plotpoints=3000,linewidth=1.25pt,linecolor=cyan]{0}{1}{1 x dup mul 1 add div}</div><div class="">\rput(0.5,1.05){Illustration de la méthode avec $n = 100$}</div><div class="">\end{pspicture}</div></div><div class="">%%%%%%%%%</div><div class="">(Visible in : <u class=""><a href="http://www.apmep.fr/ecrire/?exec=articles&id_article=7481" class="">http://www.apmep.fr/ecrire/?exec=articles&id_article=7481</a></u>)</div><div class=""><br class=""></div><div class="">Have a nice Sunday.</div><div class=""><br class=""></div><div class="">Denis Vergès</div><div><blockquote type="cite" class=""><div class="">Le 24 juin 2017 à 12:00, <a href="mailto:pstricks-request@tug.org" class="">pstricks-request@tug.org</a> a écrit :</div><br class="Apple-interchange-newline"><div class=""><div class="">Send PSTricks mailing list submissions to<br class=""><span class="Apple-tab-span" style="white-space:pre"> </span><a href="mailto:pstricks@tug.org" class="">pstricks@tug.org</a><br class=""><br class="">To subscribe or unsubscribe via the World Wide Web, visit<br class=""><span class="Apple-tab-span" style="white-space:pre"> </span>http://tug.org/mailman/listinfo/pstricks<br class="">or, via email, send a message with subject or body 'help' to<br class=""><span class="Apple-tab-span" style="white-space:pre"> </span>pstricks-request@tug.org<br class=""><br class="">You can reach the person managing the list at<br class=""><span class="Apple-tab-span" style="white-space:pre"> </span>pstricks-owner@tug.org<br class=""><br class="">When replying, please edit your Subject line so it is more specific<br class="">than "Re: Contents of PSTricks digest..."<br class=""><br class=""><br class="">Today's Topics:<br class=""><br class=""> 1. random points (Denis Verg?s)<br class=""> 2. Re: random points (Herbert Voss)<br class=""><br class=""><br class="">----------------------------------------------------------------------<br class=""><br class="">Message: 1<br class="">Date: Fri, 23 Jun 2017 17:42:03 +0200<br class="">From: Denis Verg?s <denis.verges@wanadoo.fr><br class="">To: pstricks@tug.org<br class="">Subject: [pstricks] random points<br class="">Message-ID: <96338EA0-C55F-4228-9523-C9DA00974116@wanadoo.fr><br class="">Content-Type: text/plain; charset=utf-8<br class=""><br class="">Dear PSTricks list<br class=""><br class="">I had to plot 100 random points in a square 0 <= x < =1 and 0 <= y <= 1.<br class=""><br class="">In fact if the point is under the curve \psplot[plotpoints=3000,linewidth=1.25pt,linecolor=cyan]{0}{1}{1 x dup mul 1 add div}<br class="">the point is black ; if the point is above the point is white.<br class=""><br class="">How can I do ?<br class=""><br class="">Thanks for advance ; in the book of H. Voss I don?t find the solution.<br class=""><br class="">Denis Verg?s<br class=""><br class=""><br class=""><br class="">------------------------------<br class=""><br class="">Message: 2<br class="">Date: Fri, 23 Jun 2017 20:27:39 +0200<br class="">From: Herbert Voss <Herbert.Voss@FU-Berlin.DE><br class="">To: pstricks@tug.org<br class="">Subject: Re: [pstricks] random points<br class="">Message-ID: <4ee9df4c-9a7e-8592-21f5-e96f82757e8c@FU-Berlin.DE><br class="">Content-Type: text/plain; charset="utf-8"; Format="flowed"<br class=""><br class="">Am 23.06.2017 um 17:42 schrieb Denis Verg?s:<br class=""><br class=""><blockquote type="cite" class="">I had to plot 100 random points in a square 0 <= x < =1 and 0 <= y <= 1.<br class=""><br class="">In fact if the point is under the curve \psplot[plotpoints=3000,linewidth=1.25pt,linecolor=cyan]{0}{1}{1 x dup mul 1 add div}<br class="">the point is black ; if the point is above the point is white.<br class=""></blockquote><br class="">\documentclass{article}<br class="">\usepackage{pstricks-add}<br class=""><br class="">\begin{document}<br class="">\psset{unit=5cm}<br class="">\begin{pspicture}(-0.1,-0.1)(1.1,1.1)<br class="">\psRandom[dotsize=4pt,dotstyle=o,fillstyle=solid,fillcolor=black,<br class=""> randomPoints=100](0,0)(1,1){%<br class=""> \pscustom[linestyle=none]{%<br class=""> \psline(0,1)<br class=""> \psplot[plotpoints=200]{0}{1}{1 x dup mul 1 add div }<br class=""> \psline(1,0)<br class="">}}<br class="">\psplot[linecolor=red,linewidth=1.5pt]{0}{1}{1 x dup mul 1 add div }<br class="">\psaxes[dx=0.2,dy=0.2,Dx=0.2,Dy=0.2]{->}(0,0)(-0.1,-0.1)(1.1,1.1)<br class="">\end{pspicture}<br class=""><br class="">\end{document}<br class=""><br class="">Herbert<br class=""><br class=""><br class="">-------------- next part --------------<br class="">A non-text attachment was scrubbed...<br class="">Name: Bildschirmfoto vom 2017-06-23 20-26-50.png<br class="">Type: image/png<br class="">Size: 11969 bytes<br class="">Desc: not available<br class="">URL: <http://tug.org/pipermail/pstricks/attachments/20170623/ad9d0297/attachment-0001.png><br class=""><br class="">------------------------------<br class=""><br class="">Subject: Digest Footer<br class=""><br class="">_______________________________________________<br class="">PSTricks mailing list<br class="">PSTricks@tug.org<br class="">http://tug.org/mailman/listinfo/pstricks<br class=""><br class=""><br class="">------------------------------<br class=""><br class="">End of PSTricks Digest, Vol 172, Issue 4<br class="">****************************************<br class=""></div></div></blockquote></div><br class=""></div></body></html>