Функция PL/R, принимающая две таблицы в качестве аргументов

Question

Я изо всех сил пытаюсь найти примеры функции PL/R, которая может принимать две таблицы postgres. PL/R docs не дает такого примера.
Чтобы иметь рабочие примеры, рассмотрим возможность использования слияния двух таблиц postgres на стороне R.

Имея две таблицы в Postgres

CREATE TABLE x (a numeric, b text); 
CREATE TABLE y (a numeric, d text); 
INSERT INTO x VALUES (1, 'a'),(2, 'b'); 
INSERT INTO y VALUES (2, 'b'),(3, 'c'); 

Я ищу заменить следующий запрос

SELECT * FROM x INNER JOIN y ON x.a=y.a; 

С помощью функции PL/R, определенной в R, как:

my_function = function(x, y){ 
    merge(x, y, by = "a") 
} 

Я смог вызвать функцию PL/R, которая принимает одну таблицу, но не две.

Answer 1

Я не думаю, что postgeql может принимать реальную таблицу в качестве параметров.

Но есть и другой способ сделать это. Вы можете передавать имена таблиц в качестве параметров.
Вот функция

CREATE OR REPLACE FUNCTION merge(t1 text, t2 text) 
returns setof x as 
    BEGIN 
    execute 'select * from ' || t1 ||' join ' || t2 || ' on t1.a=t2.a'; 
    END 

Выше функция для PostgreSQL, он может также записать в функции R.
Вот код для R

1. Мы должны хранить все значения таблицы х в переменную х. Смотрите коды ниже

   x <- dbGetQuery(con, "SELECT * from sandbox.x") --con является соединением, которое подключение к БД, песочница имя схемы, х имя таблицы

2. значения Магазина столовых у в переменном у

   y<-dbGetQuery(con, "SELECT * from sandbox.y")

3. объединить 2 таблицы

   total <- merge(x,y,by="a")

4. Вы также можете написать другую функцию обертку функции слияния, увидеть коды ниже

   myTotal <- function(x,y) { result <- merge(x,y,by="a") return(result) }

Я приложил скриншот шагов для справки