\begin{Schunk}
\begin{Sinput}
 dat <- read.table("/home/pauljohn/ps/SVN-repo/stat/DataSets/OregonTemps/ortann.csv", 
      header = T, sep = ",")
\end{Sinput}
\end{Schunk}
