Displaying 1 result from an estimated 1 matches for "list_s4".
2008 Mar 30
1
package.skeleton.S4
...data_dir <- file.path(dir, "data")
if (!file.exists(dir)){
environment <- new.env()
assign("falseData-ToErase",NULL,environment)
package.skeleton(name=name,environment=environment,path=path,namespace=namespace)
}else{}
### Build up the list_S4
### If list_S4 is empty :
### If code_files_S4 is not empty, the file in code_file_S4 are
source.
### then list receive ls() after removing ".__C__" (either if
code_files is empty or not)
if (!is.character(code_files)){stop("'code_files S4' shoul...