function word=words()
   fileID=fopen('common_words.txt');
   a=fread(fileID);
   fclose(fileID);
   lines=find(a==10);
   char(a');
   word=cell(113,1);
   word(1)={char(a(5:lines(1)-2))'};
   for k=2:length(lines)
      word(k)={char(a(lines(k-1)+5:lines(k)-2))'};
   end
   return