错误$运算符未在R中针对此s4类定义（规范化）

Question

我正在尝试规范交易数据。

credit <- read.transactions("directory",sep=",", header="TRUE")
ind <- sample(2, nrow(credit), replace=TRUE, prob=c(0.7, 0.3))
trainData <- credit[ind==1, ]
testData <- credit[ind==2, ]
testData$amount<- ((testData$amount - min(testData$amount)) / (max(testData$amount) - 
min(testDat$amount)))

但是，返回以下错误。

Error in testData$amount : $ operator not defined for this S4 class

解决方案是什么？