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