# NOT RUN {
conn <- lbsConnect("Bibliometrics.db");
## ...
listdoc <- lbsFindDuplicateTitles(conn,
ignoreTitles.like=c("\%In this issue\%", "\%Editorial", "\%Introduction",
"Letter to \%", "\%Preface"),
aggressiveness=2);
lbsDeleteDocuments(conn, listdoc);
dbCommit(conn);
## ...
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab