galaaz 0.4.10 → 2.0.0

data/examples/sthda_ggplot/RUN.md

@@ -0,0 +1,41 @@
+# Running sthda_ggplot examples
+
+Use the same JRuby and JVM options as the specs (required for Apache Arrow).
+
+## Run all sthda_ggplot examples
+
+From the project root:
+
+```bash
+jruby -I lib -J--add-opens=java.base/java.nio=org.apache.arrow.memory.core,ALL-UNNAMED examples/sthda_ggplot/all.rb
+```
+
+Or with the helper script (if present):
+
+```bash
+bin/run_example examples/sthda_ggplot/all.rb
+```
+
+## Run a single example
+
+```bash
+jruby -I lib -J--add-opens=java.base/java.nio=org.apache.arrow.memory.core,ALL-UNNAMED examples/sthda_ggplot/one_variable_continuous/geom_density.rb
+```
+
+Examples that open a display (e.g. `R.awt` / X11) will show a window; some examples use `sleep(2)` between plots.
+
+## Via Rake (default Ruby)
+
+The default task runs all sthda examples:
+
+```bash
+rake sthda:all
+```
+
+A single example (replace with the file path under `examples/sthda_ggplot/`):
+
+```bash
+rake "sthda:one_variable_continuous/geom_density"
+```
+
+Note: Rake uses `ruby --polyglot --jvm -Ilib/` (TruffleRuby-style). For JRuby + Shadow Bridge, use the `jruby` command above.

data/examples/sthda_ggplot/one_variable_continuous/geom_density.rb

@@ -38,6 +38,8 @@ a = wdata.ggplot(E.aes(x: :weight))
 # Aggregate the data by sex
 mu = R.aggregate(wdata.weight, by: R.list(wdata.sex), FUN: :mean)
 mu.names = R.c("sex", "grp_mean")
+puts "MU CLASS: #{R.bridge.eval_r("paste(class(#{mu.r_interop}), collapse=' ')")}"
+puts "MU NAMES: #{R.bridge.eval_r("names(#{mu.r_interop})")}"
 puts mu
 
 R.awt

data/examples/sthda_ggplot/two_variables_cont_function/geom_area.rb

@@ -46,9 +46,10 @@ R.grid__newpage
 # a subset of economics data set is used
 R.set__seed(1234)
 
-# Remember that nrow is an R::Vector.  To use it in a Ruby range we
-# need to 'pop' its value as Numeric
-ss = economics[R.sample((1..economics.nrow.pop), 20), :all]
+# nrow returns a numeric (or R vector); use it in a Ruby range for sampling row indices
+n = economics.nrow
+n = n.respond_to?(:pop) ? n.pop : n
+ss = economics[R.sample((1..n), 20), :all]
 
 print ss.ggplot(E.aes(x: :date, y: :unemploy)) + 
       R.geom_step

data/ext/new_bridge/Makefile

@@ -0,0 +1,46 @@
+# Makefile for Galaaz Gatekeeper shared library
+# Usage: make clean all
+
+# R configuration
+R_HOME := $(shell R RHOME)
+R_CPPFLAGS := $(shell $(R_HOME)/bin/R CMD config --cppflags)
+R_LIBS := $(shell $(R_HOME)/bin/R CMD config --ldflags)
+
+# Rcpp configuration
+RCPP_INCLUDE := $(shell $(R_HOME)/bin/Rscript -e "cat(system.file('include', package='Rcpp'))")
+RCPP_CPPFLAGS := -I$(RCPP_INCLUDE)
+
+# Compiler settings
+CXX := $(shell $(R_HOME)/bin/R CMD config CXX)
+CXXFLAGS := $(shell $(R_HOME)/bin/R CMD config CXXFLAGS)
+CPPFLAGS := $(R_CPPFLAGS) $(RCPP_CPPFLAGS) -I.
+# Core R library only (avoid system libs that may not be present)
+LDFLAGS := -L$(R_HOME)/lib -lR -Wl,-rpath,$(R_HOME)/lib
+
+# Target library
+TARGET := galaaz_gatekeeper.so
+SRC := galaaz_gatekeeper_phase1.cpp
+OBJ := $(SRC:.cpp=.o)
+
+.PHONY: all clean check
+
+all: $(TARGET)
+
+$(TARGET): $(OBJ)
+	$(CXX) -shared -o $@ $^ $(LDFLAGS)
+
+%.o: %.cpp
+	$(CXX) $(CXXFLAGS) $(CPPFLAGS) -fPIC -c $< -o $@
+
+check: $(TARGET)
+	@echo "Checking library..."
+	@$(R_HOME)/bin/Rscript -e "dyn.load('$(TARGET)'); cat('Library loads successfully\n')"
+
+clean:
+	rm -f $(OBJ) $(TARGET)
+
+# Development helpers
+install: $(TARGET)
+	@echo "Copying to galaaz lib directory..."
+	mkdir -p ../../lib/new_bridge
+	cp $(TARGET) ../../lib/new_bridge/

data/ext/new_bridge/galaaz_gatekeeper_phase0.cpp

@@ -0,0 +1,12 @@
+#include <Rcpp.h>
+
+// Phase 0 skeleton: compile via Rcpp::sourceCpp; no socket I/O yet.
+
+// [[Rcpp::export]]
+Rcpp::List galaaz_poll() {
+  return Rcpp::List::create();
+}
+
+// [[Rcpp::export]]
+void galaaz_shutdown() {
+}