# [pstricks] Topologists Sine Curve

Hensh, Richard hensh at math.msu.edu
Sat Apr 3 09:56:55 CEST 2010

Other frequent contributors may have better ideas but this approach seems to work ok.

%%%%%%%%%%%%%%%%%%%%%%%%%%%
\documentclass[12pt,dvips]{minimal}
\usepackage{pst-func}
\begin{document}
\psset{plotpoints=10000}
\psset{unit=20mm,xunit=60mm}
\def\xmin{0}\def\xmax{1}
\def\ymin{-1.5}\def\ymax{1.5}
\begin{center}
\begin{pspicture}(\xmin,\ymin)(\xmax,\ymax)%
\pstVerb{%
/s at x {1 exch div rad2deg sin} def %
}
\psaxes[arrowscale=1.5,arrows=->](0,0)(\xmin,\ymin)(\xmax,\ymax)%
\SpecialCoor%
\psclip{\psframe[linecolor=white](\xmin,\ymin)(\xmax,\ymax)}
\psplot[linecolor=blue,linewidth=0.75pt]{0.001}{\xmax}{x s at x}%<mailto:s at x}%>
\endpsclip
\uput{8pt}[180](0,\ymax){$y$}
\uput{8pt}[-90](\xmax,0){$x$}
\uput{6pt}[90](!0.55 dup s at x){$y=\sin<mailto:s at x){$y=\sin> 1/x\$}
\NormalCoor
\end{pspicture}
\end{center}
\end{document}
%%%%%%%%%%%%%%%%%%%%%%%%%%

regards

rick

________________________________
From: pstricks-bounces at tug.org [pstricks-bounces at tug.org] On Behalf Of Chandrasekhar S [chandru.math at hotmail.com]
Sent: Thursday, April 01, 2010 3:03 PM
To: pstricks at tug.org
Subject: [pstricks] Topologists Sine Curve

Hi--

Chandrasekhar.
♫

-----------
"What lies behind us and what lies before us are tiny matters compared to what lies within us":- Ralph Waldo Emerson.

________________________________
The best dressed and the most admired Drag n’ drop<http://lifestyle.in.msn.com/>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://tug.org/pipermail/pstricks/attachments/20100403/671ae13e/attachment.html>