Sha256: 5721939d823f40b88c2cb90ce0fbb16c3a0144bf40aeab22474e0c9ece037192
Contents?: true
Size: 1.03 KB
Versions: 140
Compression:
Stored size: 1.03 KB
Contents
source("./isogram.R")
library(testthat)
test_that("empty string", {
word <- ""
expect_equal(is_isogram(word), TRUE)
})
test_that("isogram with only lower case characters", {
word <- "isogram"
expect_equal(is_isogram(word), TRUE)
})
test_that("word with one duplicated character", {
word <- "eleven"
expect_equal(is_isogram(word), FALSE)
})
test_that("longest reported english isogram", {
word <- "subdermatoglyphic"
expect_equal(is_isogram(word), TRUE)
})
test_that("word with duplicated character in mixed case", {
word <- "Alphabet"
expect_equal(is_isogram(word), FALSE)
})
test_that("hypothetical isogrammic word with hyphen", {
word <- "thumbscrew-japingly"
expect_equal(is_isogram(word), TRUE)
})
test_that("isogram with duplicated non letter character", {
word <- "Hjelmqvist-Gryb-Zock-Pfund-Wax"
expect_equal(is_isogram(word), TRUE)
})
test_that("made-up name that is an isogram", {
word <- "Emily Jung Schwartzkopf"
expect_equal(is_isogram(word), TRUE)
})
message("All tests passed for exercise: isogram")
Version data entries
140 entries across 140 versions & 1 rubygems