R/get_df_from_sqlite.R

In thierrycnam/igfuns: Analyzes of Ig sequencing data

#' get_df_from_sqlite
#'
#' @param input_filename input file
#' @param sql_query a query
#'
#' @return data frame
#' @export
#' @import dplyr RSQLite
#'
#' @examples
get_df_from_sqlite <- function(input_filename, sql_query) {
  sqlite <- dbDriver("SQLite")
  conndb <- dbConnect(sqlite, input_filename)
  df_1 <- dbGetQuery(conndb, sql_query)
  dbDisconnect(conndb)
  df_1
}