Sha256: 3a0c931d65394d3d525361cb41fd5a01135d6123b8741a0bca8feb302a0354d2
Contents?: true
Size: 911 Bytes
Versions: 38
Compression:
Stored size: 911 Bytes
Contents
source('./rna-transcription.R')
library(testthat)
test_that("rna complement of cytosine is guanine", {
dna <- "C"
expect_equal(to_rna(dna), "G")
})
test_that("rna complement of guanine is cytosine", {
dna <- "G"
expect_equal(to_rna(dna), "C")
})
test_that("rna complement of thymine is adenine", {
dna <- "T"
expect_equal(to_rna(dna), "A")
})
test_that("rna complement of adenine is uracil", {
dna <- "A"
expect_equal(to_rna(dna), "U")
})
test_that("rna complement", {
dna <- "ACGTGGTCTTAA"
expect_equal(to_rna(dna), "UGCACCAGAAUU")
})
test_that("dna correctly handles invalid input", {
dna <- "U"
expect_error(to_rna(dna))
})
test_that("dna correctly handles completely invalid input", {
dna <- "XXX"
expect_error(to_rna(dna))
})
test_that("dna correctly handles partially invalid input", {
dna <- "ACGTXXXCTTAA"
expect_error(to_rna(dna))
})
print("All tests passed!")
Version data entries
38 entries across 38 versions & 1 rubygems