[Phylobase-commits] r436 - in pkg: R man

[noreply at r-forge.r-project.org]

Author: pdc
Date: 2009-04-26 19:26:22 +0200 (Sun, 26 Apr 2009)
New Revision: 436

Modified:
   pkg/R/pdata.R
   pkg/man/pdata-class.Rd
Log:
We've deprecated the @ to $ approach to accessing slots.  Removing these from pdata

Modified: pkg/R/pdata.R
===================================================================
--- pkg/R/pdata.R	2009-04-26 05:00:37 UTC (rev 435)
+++ pkg/R/pdata.R	2009-04-26 17:26:22 UTC (rev 436)
@@ -58,16 +58,6 @@
             "[[<-"(x at data,i,j,...,exact=exact,value)
           })
 
-setMethod("$","pdata",function(x,name) {
-  x at data[[name]]
-})
-
-
-setMethod("$<-","pdata",function(x,name,value) {
-  x at data[[name]] <- value
-  x
-})
-
 setMethod("plot",signature(x="pdata",y="missing"), function(x,...){
     return(plot(x at data, ...))
 }) # end plot phylo4

Modified: pkg/man/pdata-class.Rd
===================================================================
--- pkg/man/pdata-class.Rd	2009-04-26 05:00:37 UTC (rev 435)
+++ pkg/man/pdata-class.Rd	2009-04-26 17:26:22 UTC (rev 436)
@@ -9,8 +9,6 @@
 \alias{[[<-,pdata-method}
 \alias{[[,pdata,ANY,ANY-method}
 \alias{[[,pdata,ANY,missing-method}
-\alias{\$,pdata-method}
-\alias{\$<-,pdata-method}
 
 \title{Class "pdata"}
 \description{Data class for phylo4d objects}
@@ -31,8 +29,6 @@
   \describe{
     \item{[}{\code{signature(x = "pdata")}: access data rows, columns or elements}
     \item{[<-}{\code{signature(x = "pdata")}: set data rows, columns or elements}
-    \item{\$}{\code{signature(x = "pdata")}: access data rows, columns or elements}
-    \item{[\$<-}{\code{signature(x = "pdata")}: set data rows, columns or elements}
     \item{[[<-}{\code{signature(x = "pdata")}: set data columns or elements}
     \item{[[}{\code{signature(x = "pdata", i = "ANY", j = "ANY")}: access data columns or elements }
     \item{[[}{\code{signature(x = "pdata", i = "ANY", j = "missing")}: set data columns