Displaying 1 result from an estimated 1 matches for "internalobjind".
Did you mean:
internalobjinds
2008 Mar 30
1
package.skeleton.S4
...uot;DESCRIPTION"), "a+b")
cat("\nDepends: methods\nLazyLoad: yes\nCollate: gives the order in
which file shall be sourced\n",append=TRUE,file = description,sep = "")
close(description)
### Remove elements starting with "." from the list
internalObjInds <- grep("^\\.", list)
internalObjs <- list[internalObjInds]
if (any(internalObjInds)){list <- list[-internalObjInds]}else{}
### Remplace strange char by "_" and check the name validity (but
only if code_file is user define)
if (!use_code_files){...