Description Usage Arguments See Also Examples
Create a query function inside an environment. The query is added to the specified environment as the given name.
1 | load_query(name, filename, env = parent.frame())
|
name |
Character string. Name to be given to the query. |
filename |
Character string. |
env |
Environment to load the queries into. Default is the calling environment. |
get_query
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 | # A package implementing DBI methods must be available.
require(RSQLite)
cat("SELECT * FROM fruit",
"WHERE name LIKE '%berry'",
file = "query.sql",
sep = "\n")
# Load into global environment.
load_query("get_berries", "query.sql")
unlink("query.sql")
conn <- dbConnect(SQLite(), ":memory:")
tbl <- data.frame(name = c("apple", "strawberry", "blackberry", "mango"),
color = c("green", "red", "black", "orange"))
success <- dbWriteTable(conn, "fruit", tbl)
get_berries(conn)
# name color
# 1 strawberry red
# 2 blackberry black
dbDisconnect(conn)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.