match.fun（FUN）中的错误：找不到对象'replace_contraction'
当我尝试执行此操作时，出现错误消息
data <- read.csv("project_Data_sample.csv")
data1 <- lapply(data,replace_contraction)
我安装了以下库：
library(tm)
library(syuzhet)
library(plyr)
library(dplyr)
library(data.table)
library(igraph)
library(stringr)
library(ggplot2)
library(wordcloud)
library(knitr)