Sha256: 9dbf2c231a84abc675a2bfcb6c602a2fc00430d07704921de63e90744eef1215
Contents?: true
Size: 294 Bytes
Versions: 219
Compression:
Stored size: 294 Bytes
Contents
to_rna <- function(dna) {
dna_to_rna <- list(G = "C", C = "G", T = "A", A = "U")
func <- function(x) {
if (!(x %in% c("G", "C", "T", "A"))) {
stop("invalid dna strand")
}
dna_to_rna[[x]]
}
paste(lapply(strsplit(dna, "")[[1]], FUN = func), collapse = "")
}
Version data entries
219 entries across 219 versions & 1 rubygems