tracks/r/exercises/isogram/example.R in trackler-2.1.0.21 vs tracks/r/exercises/isogram/example.R in trackler-2.1.0.22
- old
+ new
@@ -1,9 +1,9 @@
is_isogram <- function(word) {
-
+
func <- function(x) {
sum(x == unlist(strsplit(tolower(word), "")))
}
-
- all(lapply(letters, FUN = func)<=1)
-
+
+ all(lapply(letters, FUN = func) <= 1)
+
}