DEV Community

Daily Challenge #182 - Arrh, grabscrab!

dev.to staff on February 06, 2020

Setup Pirates are notoriously bad at pronunciation. For this challenge, implement a function that will accept a jumbled word and a dicti...
Read full post
Collapse
 
aminnairi profile image
Amin • • Edited

Elm

toSortedList : String -> List Char
toSortedList string =
    List.sort <| String.toList string


equal : String -> String -> Bool
equal first second =
    toSortedList first == toSortedList second


grabscrab : String -> List String -> List String
grabscrab string list =
    List.filter (equal string) list
Collapse
 
fitsum profile image
fitsum • • Edited

JavaScript

const grabscrab = (garble, dict) => {
  let results = [];
  dict.forEach(entry => {
    let points = 0; 
    entry.split('').forEach(letter => {
      if (garble.indexOf(letter) !== -1) {
        points++;
        if (points === entry.length) {
          results.push(entry);
          console.log(results)
        }
      }
    })
  })
  return results;
}
Collapse
 
bhaumin profile image
Bhaumin Shah •

JavaScript solution:

function grabscrab(word, dict) {
  const wordSorted = word.split("").sort().join("");
  const ans = [];

  for (let item of dict) {
    itemSorted = item.split("").sort().join("");
    if (itemSorted === wordSorted) {
      ans.push(item);
    }
  }

  return ans;
}
  1. Sort the input word just once outside the loop
  2. Just compare the full sorted words instead of each char to avoid false positives in comparing words like aabbbcc to aaabccc
Collapse
 
toanleviettiki profile image
Toan Le Viet •

Quick solution in my head with JS is sorting then comparing with each anagram:

Collapse
 
cipharius profile image
Valts Liepiņš •

Ruby

def grabscrab word, dict
    orig = word.chars.sort!
    dict.filter {|entry| entry.chars.sort.eql? orig }
end
Collapse
 
cipharius profile image
Valts Liepiņš •

Also was in mood for some Haskell.
This time Haskell solution came out neater than Ruby's

import Data.List (sort)

grabscrab :: String -> [String] -> [String]
grabscrab word = filter $ (patt ==) . sort
    where patt = sort word
Collapse
 
mellen profile image
Matt Ellen-Tsivintzeli •

What is the expected output of the tests?