\begin{Schunk}
\begin{Sinput}
 attributes(den1)
\end{Sinput}
\begin{Soutput}
$names
[1] "x"         "y"         "bw"        "n"         "call"      "data.name" "has.na"   

$class
[1] "density"
\end{Soutput}
\end{Schunk}
