docs: updated authorship

Author: timcadman

R/classDS.R

@@ -5,6 +5,7 @@
 #' @param x a string character, the name of an object
 #' @return the class of the input object
 #' @author Stuart Wheater, for DataSHIELD Development Team
+#' @author Tim Cadman, Genomics Coordination Centre, UMCG, Netherlands
 #' @export
 #'
 classDS <- function(x){

R/completeCasesDS.R

@@ -31,6 +31,7 @@
 #' without problems no studysideMessage will have been saved and ds.message("newobj")
 #' will return the message: "ALL OK: there are no studysideMessage(s) on this datasource".
 #' @author Paul Burton for DataSHIELD Development Team
+#' @author Tim Cadman, Genomics Coordination Centre, UMCG, Netherlands
 #' @export
 #' 
 completeCasesDS <- function(x1.transmit){

R/dimDS.R

@@ -6,6 +6,7 @@
 #' @return a list with two elements: \code{dim} (the dimension of the input object)
 #'   and \code{class} (the class of the input object, for client-side consistency checking)
 #' @author Demetris Avraam, for DataSHIELD Development Team
+#' @author Tim Cadman, Genomics Coordination Centre, UMCG, Netherlands
 #' @export
 #'
 dimDS <- function(x){

R/isNaDS.R

@@ -7,6 +7,7 @@
 #'   only NAs, FALSE otherwise) and \code{class} (the class of the input object,
 #'   for client-side consistency checking)
 #' @author Gaye, A.
+#' @author Tim Cadman, Genomics Coordination Centre, UMCG, Netherlands
 #' @export
 #'
 isNaDS <- function(x){

R/lengthDS.R

@@ -7,6 +7,7 @@
 #'   vector or list) and \code{class} (the class of the input object, for client-side
 #'   consistency checking)
 #' @author Demetris Avraam, for DataSHIELD Development Team
+#' @author Tim Cadman, Genomics Coordination Centre, UMCG, Netherlands
 #' @export
 #'
 lengthDS <- function(x){

R/levelsDS.R

@@ -7,6 +7,7 @@
 #'   in the vector) and \code{class} (the class of the input object, for
 #'   client-side consistency checking)
 #' @author Alex Westerberg, for DataSHIELD Development Team
+#' @author Tim Cadman, Genomics Coordination Centre, UMCG, Netherlands
 #' @export
 #'
 levelsDS <- function(x){

R/namesDS.R

@@ -16,6 +16,7 @@
 #' @return \code{namesDS} returns to the client-side the names
 #' of a list object stored on the server-side.
 #' @author Amadou Gaye, updated by Paul Burton 25/06/2020
+#' @author Tim Cadman, Genomics Coordination Centre, UMCG, Netherlands
 #' @export
 #'
 namesDS <- function(xname.transmit){

R/numNaDS.R

@@ -7,6 +7,7 @@
 #'   missing values) and \code{class} (the class of the input object, for
 #'   client-side consistency checking)
 #' @author Gaye, A.
+#' @author Tim Cadman, Genomics Coordination Centre, UMCG, Netherlands
 #' @export
 #'
 numNaDS <- function(x){

R/uniqueDS.R

@@ -6,6 +6,7 @@
 #' @return the object specified by the \code{newobj} argument
 #' which is written to the server-side.
 #' @author Stuart Wheater for DataSHIELD Development Team
+#' @author Tim Cadman, Genomics Coordination Centre, UMCG, Netherlands
 #' @export
 #'
 uniqueDS <- function(x.name.transmit = NULL){