<- R6::R6Class(
#'   "Agrofims",
#'   public = list(

, path and username.
#' @param group An integer. ID of the group to retrieve.
#' @param studyInfo A list. Stores

if ("DataSpaceStudy" %in% class(cavd)) {
con_names <- c(
".__enclos_env__",

if ("DataSpaceStudy" %in% class(cavd)) {
con_names <- c(
".__enclos_env__",

if ("DataSpaceStudy" %in% class(cavd)) {
con_names <- c(
".__enclos_env__",

, path and username.
#' @param group An integer. ID of the group to retrieve.
#' @param studyInfo A list. Stores

, path and username.
#' @param group An integer. ID of the group to retrieve.
#' @param studyInfo A list. Stores

if ("DataSpaceStudy" %in% class(cavd)) {
con_names <- c(
".__enclos_env__",

, path and username.
#' @param group An integer. ID of the group to retrieve.
#' @param studyInfo A list. Stores

, verbose = FALSE)
return(list(filenames = datafiles.ls,
studyInfo = KratzMeta.ls,

return(list(filenames = Sudfiles.ls,
meta = SudingAtt.df,
studyInfo = SudingStudy.ls,

= datafiles.ls$meta)
return(list(filenames = datafiles.ls,
studyInfo = ForrestStudy.ls,

to data the data files
return(list(filenames = datafiles2.ls,
meta = attribute2.df,

files
return(list(filenames = datafiles.ls,
meta = attribute.df,

data = Fourqurean2017.df,
studyInfo = FourqureanStudy2017.ls,
meta = FourqureanAttribute2017.df))

= datafiles.ls,
studyInfo = WallStudy.ls,
meta = Wall_attribute,

return(list(filenames = datafiles.ls,
data = Childers2018.df,
studyInfo = ChildersStudy2018.ls,

return(list(filenames = datafiles.ls,
studyInfo = HowardStudy.ls,
meta

= Fourqurean2019.df,
studyInfo = FourqureanStudy2019.ls,
meta = FourqureanAttribute2019.df))