added word_cor function