# NOT RUN {
data(rksp.0)
ftable <- frequencytable(rksp.0, byCharacter=TRUE, normalize=TRUE)
rksp.0.tfidf <- tfidf(ftable)
mat <- matrix(c(0.10,0.2, 0,
0, 0.2, 0,
0.1, 0.2, 0.1,
0.8, 0.4, 0.9),
nrow=3,ncol=4)
mat2 <- tfidf(mat)
print(mat2)
# }
Run the code above in your browser using DataCamp Workspace