Help for this page

Select Code to Download

Select or download this

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

Select or download this

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