message: Export again
diff: @@ -47,6 +47,7 @@ expr_tostring <- rapi_expr_tostring
  expr_set_alias <- rapi_expr_set_alias
  +#' @export
  print.duckdb_expr <- function(x, ...) {
  message("DuckDB Expression: ", duckdb::expr_tostring(x))
  invisible(NULL)
  @@ -66,10 +67,12 @@ rel_from_df <- function(con, df, experimental=FALSE) {
  rapi_rel_from_df(con@conn_ref, as.data.frame(df), experimental)
  }
  +#' @export
  print.duckdb_relation <- function(x, ...) {
  message("DuckDB Relation: \n", rapi_rel_tostring(x))
  }
  +#' @export
  as.data.frame.duckdb_relation <- function(x, row.names=NULL, optional=NULL, ...) {
  if (!missing(row.names) || !missing(optional)) {
  stop("row.names and optional parameters not supported")
  @@ -79,10 +82,12 @@ as.data.frame.duckdb_relation <- function(x, row.names=NULL, optional=NULL, ...)
  df
  }
  +#' @export
  names.duckdb_relation <- function(x) {
  rapi_rel_names(x)
  }
  +#' @export
  head.duckdb_relation <- function(x, n=6L, ...) {
  rapi_rel_limit(x, n)
  }
  