## Not run:
# con <- dbConnect(RSQLite::SQLite(), ":memory:")
#
# dbWriteTable(con, "iris", iris)
# iris_result <- dbSendQuery(con, "SELECT * FROM iris WHERE [Petal.Width] > ?")
# dbBind(iris_result, list(2.3))
# dbFetch(iris_result)
# dbBind(iris_result, list(3))
# dbFetch(iris_result)
#
# dbClearResult(iris_result)
# dbDisconnect(con)
# ## End(Not run)
Run the code above in your browser using DataLab