[R-gregmisc-users] SF.net SVN: r-gregmisc:[1611] trunk/namespace/man/namespace.Rd

[<wa...@us...>]

Revision: 1611
          http://r-gregmisc.svn.sourceforge.net/r-gregmisc/?rev=1611&view=rev
Author:   warnes
Date:     2012-09-13 23:54:38 +0000 (Thu, 13 Sep 2012)
Log Message:
-----------
Add examples to man page

Modified Paths:
--------------
    trunk/namespace/man/namespace.Rd

Modified: trunk/namespace/man/namespace.Rd
===================================================================
--- trunk/namespace/man/namespace.Rd	2012-09-13 23:54:25 UTC (rev 1610)
+++ trunk/namespace/man/namespace.Rd	2012-09-13 23:54:38 UTC (rev 1611)
@@ -4,7 +4,7 @@
 \alias{makeNamespace}
 \alias{getRegisteredNamespace}
 \title{
-Functions to obtain, create, register, and unregister namespaces
+Create, register, obtain a reference to, and unregister namespaces
 }
 \description{
 User-level functions to manage namespaces not (yet) available in base R.
@@ -54,6 +54,30 @@
   \code{\link[base]{ns-internal}}
 }
 \examples{
-## Examples needed! ##
+
+## Get a reference to the namespace for the 'base' package
+getRegisteredNamespace("base")
+
+## Create a namespace, and stuff something into it.
+ns <- makeNamespace("myNamespace")
+assign("test",7, env=ns)
+ls(env=ns)
+
+## Now grab a reference to the namespace we just defined
+ns2 <- getNamespace("myNamespace")
+
+\dontshow{
+stopifnot(identical(ns, ns2))
 }
+
+## Now unregister the namespace
+unregisterNamespace("myNamespace")
+
+## Returns NULL if it is no longer defined
+getRegisteredNamespace("myNamespace")
+\dontshow{
+   stopifnot( is.null(getRegisteredNamespace("::no such package::")) )
+}
+
+}
 \keyword{programming}

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.