gnu: r-duckdb: Move to duckdb.

* gnu/packages/cran.scm (r-duckdb): Move from here ...
* gnu/packages/duckdb.scm: ... to here.

Change-Id: Ic735854106fd0b0e693105183b7408d447de882c

1 files changed, 52 insertions, 1 deletions

diff --git a/gnu/packages/duckdb.scm b/gnu/packages/duckdb.scm
index de7c4e160e0..872f927c2e9 100644
--- a/gnu/packages/duckdb.scm
+++ b/gnu/packages/duckdb.scm
@@ -26,16 +26,20 @@
   #:use-module (guix build-system cmake)
   #:use-module (guix build-system pyproject)
   #:use-module ((guix build-system python) #:select (pypi-uri))
+  #:use-module (guix build-system r)
   #:use-module (guix download)
   #:use-module (guix gexp)
   #:use-module (guix git-download)
   #:use-module (guix packages)
   #:use-module (guix utils)
   #:use-module (gnu packages)
+  #:use-module (gnu packages base)
+  #:use-module (gnu packages cran)
   #:use-module (gnu packages databases)
   #:use-module (gnu packages python-build)
   #:use-module (gnu packages python-science)
-  #:use-module (gnu packages python-xyz))
+  #:use-module (gnu packages python-xyz)
+  #:use-module (gnu packages statistics))
 
 ;;; Commentary:
 ;;;
@@ -141,6 +145,53 @@ single-file databases with support for secondary indexes.")
 system.")
     (license license:expat)))
 
+(define-public r-duckdb
+  (package
+    (name "r-duckdb")
+    (version "1.2.2")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (cran-uri "duckdb" version))
+       (sha256
+        (base32 "161zxianyssvsrd2345v4bi1m2z7wj614z8343jb73vhlk6s9yyi"))
+       ;; This package bundles the duckdb sources and builds a custom variant
+       ;; of duckdb.  I'd be happy to link it with our duckdb library instead,
+       ;; but it does not seem possible to do that.
+       #;
+       (snippet
+        '(delete-file "src/duckdb.tar.xz"))))
+    (properties
+     '((upstream-name . "duckdb")
+       (updater-extra-native-inputs . ("tzdata-for-tests"))
+       ;; We don't seem to need this and I don't want to package it now.
+       (updater-ignored-native-inputs . ("r-dblog"))))
+    (build-system r-build-system)
+    (arguments (list #:tests? #false)) ;tests can time out on the build farm
+    (propagated-inputs (list r-dbi))
+    (native-inputs (list r-adbcdrivermanager
+                         r-arrow
+                         r-bit64
+                         r-callr
+                         r-clock
+                         r-dbitest
+                         r-dbplyr
+                         r-dplyr
+                         r-remotes
+                         r-rlang
+                         r-testthat
+                         r-tibble
+                         r-vctrs
+                         r-withr
+                         tzdata-for-tests))
+    (home-page "https://r.duckdb.org/")
+    (synopsis "DBI package for the DuckDB database management system")
+    (description
+     "The DuckDB project is an embedded analytical data management system with
+support for the Structured Query Language (SQL).  This package includes all of
+DuckDB and an R Database Interface (DBI) connector.")
+    (license license:expat)))
+
 ;;;
 ;;; Avoid adding new packages to the end of this file. To reduce the chances
 ;;; of a merge conflict, place them above in alphabetic order.