%% 
%%  A DANTE-Edition example
%% 
%% 
%%  Copyright (C) 2011 Herbert Voss
%% 
%%  It may be distributed and/or modified under the conditions
%%  of the LaTeX Project Public License, either version 1.3
%%  of this license or (at your option) any later version.
%% 
%%  See http://www.latex-project.org/lppl.txt for details.
%% 
%% 
%% ==== 
% Show page(s) 1
%% 
\documentclass[]{article}
\pagestyle{empty}
\setlength\textwidth{177.70511pt}
\setlength\parindent{0pt}
\def\henon{
 1.00000000  1.00000000
 0.56000000  0.31000000
 0.85841600  0.17360000
 0.11249564  0.26610896
 1.24788537  0.03487365
-1.20752013  0.38684447
-0.71282656 -0.37433124
-0.10602649 -0.22097623
 0.76283584 -0.03286821
 0.12916912  0.23647911
 1.21245320  0.04004243
-1.07681914  0.37586049
-0.29387634 -0.33381393
 0.54182291 -0.09110166
 0.48615456  0.16796510
 0.82762650  0.15070791
 0.16435741  0.25656422
 1.21766498  0.05095080
-1.08414872  0.37747614
-0.31506881 -0.33608610
 0.52096746 -0.09767133
 0.51150245  0.16149991
 0.78474587  0.15856576
 0.27177620  0.24327122
 1.13690951  0.08425062
-0.77704042  0.35244195
 0.48298173 -0.24088253
 0.42320673  0.14972434
 0.89181467  0.13119409
-0.01408602  0.27646255
 1.27617683 -0.00436667
-1.34958997  0.39561482
-1.22719125 -0.41837289
-1.58701052 -0.38042929
}

\usepackage{pstricks,pst-plot}
\makeatletter
\pst@def{ScalePoints}<%
  45 rotate % rotate by 45 degrees
  /y ED /x ED
  counttomark dup dup cvi eq not {exch pop} if
  /m exch def /n m 2 div cvi def
  n {exch % swap x y
     y mul m 1 roll x mul m 1 roll
     /m m 2 sub
     def } repeat>
\makeatother

\begin{document}
\psset{yunit=1.5cm, xunit=3cm}
\begin{pspicture}(-0.5,-2)(1.25,2)
  \psaxes{->}(0,0)(-0.5,-2)(1.25,2)
  \listplot[showpoints=true,%
       plotstyle=curve]{\henon}
\end{pspicture}
\end{document}
