################################################### ### chunk number 1: dol eval=FALSE ################################################### ## #line 60 "vignettes/GGBase/inst/doc/makeSMLset.Rnw" ## load("C1.rda") ## names(C1) ## C1[[2]][1,] ################################################### ### chunk number 2: domo eval=FALSE ################################################### ## #line 124 "vignettes/GGBase/inst/doc/makeSMLset.Rnw" ## ofi = dir(patt="C.*rda") ## allsm = list() ## cn = rep(NA,24) ## for (i in 1:24) { ## cat(i) ## load(ofi[i]); fn = gsub(".rda", "", ofi[i]); allsm[[i]] = get(fn)[[1]] ## cn[i] = as.character(get(fn)[[2]][1,"Chromosome"]) ## print(fn) ## rm(fn) ## gc() ## }