Calling a R function from sql

Question

Hello there, can anyone help me on the following query ?
1) I have a data view called Q_X1_V stored in a database schema, which has a column called OBS03
2) I have logged in to the schema where the above mentioned view is defined using sqldeveloper
3) I have created the following R function and executed in sql developer
begin
   sys.rqScriptDrop('xbarr-qcc');
   sys.rqScriptCreate('xbarr-qcc', 'function() {
   library(ORE)
   ore.sync(table=Q_X1_V)
  ore.attach()
dataset <- ore.pull(Q_X1_V["OBS03"])
head(dataset)
end;
It has created the function successfully.
4)  and I am trying to execute the following sql query in sql developer
select *
from table(rqEval(NULL,'select 1 "OBS03" from dual','xbarr-qcc'));
and it results in the following error
ORA-20000: RQuery error
Error in .ore.schema(schema) : attempt to apply non-function
ORA-06512: at "RQSYS.RQEVALIMPL", line 104
ORA-06512: at "RQSYS.RQEVALIMPL", line 101
20000. 00000 -  "%s"
*Cause:    The stored procedure 'raise_application_error'
           was called which causes this error to be generated.
*Action:   Correct the problem as described in the error message or contact
           the application administrator or DBA for more information.
Not sure how to trouble shoot the issue
5) Above R function mentioned in the step:3 works fine on the R command prompt
and gives me the following output
OBS03
1 10.872
2 10.818
3 10.802
4 10.622
5 10.708
6 10.658
and how do I make the sql command mentioned in step:4 work in sqldeveloper command line.
Any help is appreciated.
thanks
Pradeep

Answer 1

Sherry,  thanks for the reply.
1) I have logged into the database user via sqldeveloper as "ruser"
    and executed the following script for creating the R function
begin
   sys.rqScriptDrop('xbarr-qcc');
   sys.rqScriptCreate('xbarr-qcc', 'function() {
   library(ORE)
# ore.connect(user="ruser" ....   )  -- commented this out as I have already logged into the "ruser" schema of database
   ore.sync(table="Q_X1_V")    
   dataset <- ore.pull(Q_X1_V["OBS03"])  # pulling the data from the column OBS03 of the table. Q_X1_V
   dataset           #  simply return the rows
end;
2)  Now when I execute the following sql select command
select *
  from table( rqEval(
        cursor(select 1 "ore.connect" from dual),      ## -- was hoping this will help me connect with the db schema.
        'select 1 "OBS03" from dual',
        'xbarr-qcc'));
but I end up getting this error :
ORA-20000: RQuery error
Error in ore.pull(Q_X1_V["OBS03"]) :
  error in evaluating the argument 'x' in selecting a method for function 'ore.pull': Error: object 'Q_X1_V' not found
ORA-06512: at "RQSYS.RQEVALIMPL", line 104
ORA-06512: at "RQSYS.RQEVALIMPL", line 101
20000. 00000 -  "%s"
*Cause:    The stored procedure 'raise_application_error'
           was called which causes this error to be generated.
*Action:   Correct the problem as described in the error message or contact
           the application administrator or DBA for more information.
So what am I missing,
1) I don't want to use ore.connect inside my R script because that will lead to security standards violations as the login credentials will be visible to all
2) Once connected to the ruser, I should be able to run R script seemlessly with out passing in login credentials explicitly.
which I thought  the sql script in step 2, with ore.connect in params should be helpful.   but for some reason it is erroring out.
Could you pl. help.
thanks