bibbers93

#dna to RNA
t <- "sequence given"
t1 <- strsplit(t, split = "") [[1]]
u <- character(length=0)
for(i in 1:length(t1)){
  if(t1[i]=="A"){
    u[i] <- c("A")
  }
  if(t1[i]=="T"){
    u[i] <- c("U")