galaaz 2.0.0 → 2.1.1

data/examples/islr/all.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 # load ISLR and MASS Libraries

data/examples/islr/ch2.spec.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 context "ISLR" do

data/examples/islr/ch3.spec.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 context "ISLR" do

data/examples/islr/ch3_boston.rb

@@ -21,6 +21,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 R.install_and_loads('ISLR', 'MASS')

data/examples/islr/ch3_multiple_regression.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 R.install_and_loads('ISLR', 'MASS')

data/examples/islr/ch6.spec.rb

@@ -23,6 +23,7 @@
 
 require 'galaaz'
 
+using Galaaz::SymbolDSL
 R.install_and_loads('ISLR', 'MASS')
 
 context "ISLR" do

data/examples/misc/ggplot.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 module LightBlueTheme
@@ -154,7 +155,7 @@ R.grid__newpage
  R.geom_point('')).print
 =end
 
-a = gets.chomp
+a = gets.chomp if $stdin.tty?
 
 
 =begin

data/examples/misc/moneyball.rb

@@ -2,6 +2,7 @@
 
 require 'galaaz'
 
+using Galaaz::SymbolDSL
 local_dir = File.expand_path File.dirname(__FILE__)
 
 # This dataset comes from Baseball-Reference.com.

data/examples/misc/subsetting.rb

@@ -2,6 +2,7 @@
 
 require 'galaaz'
 
+using Galaaz::SymbolDSL
 # This examples were extracted from "Advanced R", by Hadley Wickham, available on the
 # web at: http://adv-r.had.co.nz/Subsetting.html#applications
 

data/examples/multithread_shards_to_r/shards_to_r.rb

@@ -16,6 +16,7 @@
 
 require 'galaaz'
 
+using Galaaz::SymbolDSL
 SHARD_COUNT = 3
 ROWS_PER_SHARD = 200
 

data/examples/sthda_ggplot/all.rb

@@ -21,6 +21,7 @@
 
 require 'galaaz'
 
+using Galaaz::SymbolDSL
 # Package Hmisc does not yet install on graalvm because of
 # problems with package data.table
 # install.packages('Hmisc')

data/examples/sthda_ggplot/one_variable_continuous/density_gg.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 R.set__seed(1234)

data/examples/sthda_ggplot/one_variable_continuous/geom_area.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 R.set__seed(1234)

data/examples/sthda_ggplot/one_variable_continuous/geom_density.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 R.set__seed(1234)

data/examples/sthda_ggplot/one_variable_continuous/geom_dotplot.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 R.set__seed(1234)

data/examples/sthda_ggplot/one_variable_continuous/geom_freqpoly.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 R.set__seed(1234)

data/examples/sthda_ggplot/one_variable_continuous/geom_histogram.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 R.set__seed(1234)

data/examples/sthda_ggplot/one_variable_continuous/histogram_density.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 R.set__seed(1234)

data/examples/sthda_ggplot/one_variable_continuous/stat.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 R.set__seed(1234)

data/examples/sthda_ggplot/one_variable_discrete/bar.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 # puts ~:mpg

data/examples/sthda_ggplot/qplots/box_violin_dot.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 R.set__seed(1234)

data/examples/sthda_ggplot/qplots/scatter_plots.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 # Load the data

data/examples/sthda_ggplot/scatter_gg.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 R.awt

data/examples/sthda_ggplot/two_variables_cont_bivariate/geom_bin2d.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 diamonds = ~:diamonds

data/examples/sthda_ggplot/two_variables_cont_bivariate/geom_density2d.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 faithful = ~:faithful

data/examples/sthda_ggplot/two_variables_cont_bivariate/geom_hex.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 R.install_and_loads('hexbin')

data/examples/sthda_ggplot/two_variables_cont_cont/geom_point.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 mtcars = ~:mtcars

data/examples/sthda_ggplot/two_variables_cont_cont/geom_smooth.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 mtcars = ~:mtcars

data/examples/sthda_ggplot/two_variables_cont_cont/misc.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 R.install_and_loads('quantreg')

data/examples/sthda_ggplot/two_variables_cont_function/geom_area.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 economics = ~:economics

data/examples/sthda_ggplot/two_variables_disc_cont/geom_bar.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 df = R.data__frame(dose: R.c("D0.5", "D1", "D2"),

data/examples/sthda_ggplot/two_variables_disc_cont/geom_boxplot.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 tooth_growth = ~:ToothGrowth

data/examples/sthda_ggplot/two_variables_disc_cont/geom_dotplot.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 R.install_and_loads('Hmisc')

data/examples/sthda_ggplot/two_variables_disc_cont/geom_jitter.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 R.install_and_loads('Hmisc')
 

data/examples/sthda_ggplot/two_variables_disc_cont/geom_line.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 df = R.data__frame(supp: R.rep(R.c("VC", "OJ"), each: 3),

data/examples/sthda_ggplot/two_variables_disc_cont/geom_violin.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 R.install_and_loads('Hmisc')
 

data/examples/sthda_ggplot/two_variables_disc_disc/geom_jitter.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 diamonds = ~:diamonds

data/examples/sthda_ggplot/two_variables_error/geom_crossbar.rb

@@ -22,6 +22,7 @@
 ##########################################################################################
 
 require 'galaaz'
+using Galaaz::SymbolDSL
 require 'ggplot'
 
 R.install_and_loads('Hmisc')

data/lib/R_interface/r_arrow.rb

@@ -63,6 +63,43 @@ module R
       R.arrow___as_arrow_table(r_df)
     end
 
+    # Open an Arrow IPC file (written by Galaaz::ArrowIpc or compatible) as an
+    # R-side Arrow Table. Materializes the table in R so the Ruby process may
+    # unlink the path immediately after this call returns (Stage B1 lifetime).
+    #
+    # This is IPC/mmap file handoff — not zero-copy shared heap with Ruby.
+    #
+    # @param path [String] filesystem path visible to the R process
+    # @return [R::Object] Arrow Table proxy
+    def self.open_ipc(path)
+      path = File.expand_path(path.to_s)
+      ok = R::Support.eval("requireNamespace('arrow', quietly=TRUE)")
+      unless ok == true
+        raise LoadError, "R package 'arrow' is required for R::Arrow.open_ipc"
+      end
+
+      R.arrow___read_ipc_file(path, as_data_frame: false)
+    end
+
+    # Write an R Arrow Table / data.frame to an Arrow IPC file Ruby can read
+    # with Galaaz::ArrowIpc.read (Stage B2). Only the path should cross NewBridge.
+    #
+    # @param r_obj [R::Object] Table, RecordBatch, or data.frame/tibble in R
+    # @param path [String, nil] destination; default a new scratch path
+    # @return [String] absolute path (fsync'd from Ruby after R returns)
+    def self.write_ipc(r_obj, path = nil)
+      ok = R::Support.eval("requireNamespace('arrow', quietly=TRUE)")
+      unless ok == true
+        raise LoadError, "R package 'arrow' is required for R::Arrow.write_ipc"
+      end
+
+      path = path.nil? || path.to_s.empty? ? Galaaz::ArrowIpc.allocate_path : File.expand_path(path.to_s)
+      # uncompressed so JRuby Arrow Java can read without arrow-compression JARs
+      R.arrow___write_ipc_file(r_obj, path, compression: 'uncompressed')
+      File.open(path, 'rb') { |f| f.fsync }
+      path
+    end
+
     # Open a Parquet/Feather directory or file as an Arrow Dataset
     # using arrow::open_dataset().
     #

data/lib/R_interface/rvector.rb

@@ -177,6 +177,21 @@ module R
       end
     end
 
+    # CRuby Enumerable#sum probes begin/end (range fast-path). R::Object#respond_to?
+    # always returns true, so that probe would hit method_missing and call R's begin.
+    # Implement sum in Ruby so MRI matches JRuby Enumerable behavior for blocks;
+    # without a block, forward to R's sum via method_missing.
+    def sum(*args, &block)
+      if block
+        ::Kernel.raise(::ArgumentError, "wrong number of arguments (given #{args.size}, expected 0..1)") if args.size > 1
+        acc = args.empty? ? 0 : args[0]
+        each { |el| acc = acc + block.call(el) }
+        acc
+      else
+        method_missing(:sum, *args)
+      end
+    end
+
     #--------------------------------------------------------------------------------------
     # Need to override each_with_index, as R indexing starts at 1
     #--------------------------------------------------------------------------------------