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