src/install.libs.R

### For etc
file <- "samtools2SIC"
if(file.exists(file)){
	etcarch <- if (nzchar(R_ARCH)) paste("etc", R_ARCH, sep='') else "etc"
	dest <- file.path(R_PACKAGE_DIR, etcarch)
	dir.create(dest, recursive = TRUE, showWarnings = FALSE)
	file.copy(file, dest, overwrite = TRUE)
}

Try the SICtools package in your browser

Any scripts or data that you put into this service are public.

SICtools documentation built on Nov. 8, 2020, 5:12 p.m.