avoid formals(graphics:::persp.default). use formals(getS3method("persp", "default"))

git-svn-id: svn://svn.r-forge.r-project.org/svnroot/fdboost@92 edb9625f-4e0d-4859-8d74-9fd3b1da38cb