Select Code to Download

reverseWords <- function(words) {
     return( sort( words, decreasing=TRUE))
}

reverseWords <- function(words) {
  return( paste( rev( unlist( strsplit( words, split=" "))), sep=" ", 
+collapse=" "))
}