Zurückgeben einer Variablen beim Ausführen von R von SQL Server

Question

Ich versuche, ein Basis-R-Skript von SQL Server über eine gespeicherte Prozedur auszuführen. Ich gebe ein Dataset zurück und möchte auch eine Variable zurückgeben/ausgeben, bin aber nicht dazu in der Lage.

Im Folgenden finden Sie die gespeicherte Prozedur I

DROP PROC IF EXISTS get_iris_dataset; 
go 
CREATE PROC get_iris_dataset 
AS 
BEGIN 
declare @OutName float 
EXEC sp_execute_external_script 
    @language = N'R' 
, @script = N' 
    iris_data <- iris 
    out = 5.1;' 
, @input_data_1 = N'' 
, @output_data_1_name = N'iris_data' 
,@params= N'@out float OUTPUT' 
,@out = @OutName OUTPUT 

WITH RESULT SETS (("Sepal.Length" float not null, 
     "Sepal.Width" float not null, 
    "Petal.Length" float not null, 
    "Petal.Width" float not null, "Species" varchar(100))); 
END; 
return 0 
go 

Ich rufe das Verfahren, wie unten haben:

declare @OutputVar float 
exec @OutputVar = get_iris_dataset 
print @OutputVar 

Es tut Ausgang der Datensatz, aber ich bin nicht in der Lage, den Wert der zu speichern, Ausgabevariable

Ich kann den Wert von OutputVar nicht ausgeben, auch wenn ich das Dataset nicht ausgeben und nur versuchen, den Wert von OutputVar zu erfassen. Jede Hilfe wird geschätzt.

Vielen Dank im Voraus!

Answer 1

Was ich tun würde, ist die Verwendung der StoredProcedure-Funktion (Teil des sqlrutils-Pakets, das wiederum Teil von MS R Server 9.0.1 ist), um den R-Code in eine gespeicherte Prozedur zu wickeln. Dies unterscheidet sich geringfügig von Ihrem ursprünglichen Code, da die Rückgabewerte in eine Liste eingeschlossen sind. Aber die Idee ist immer noch dieselbe.

library(sqlrutils) 

testfunc <- function() 
{ 
    iris_dataset <- iris 
    out <- 5.1 
    list(iris_dataset=iris_dataset, out=out) 
} 

sp <- StoredProcedure(testfunc, "spTestFunc", 
    OutputData("iris_dataset"), 
    OutputParameter("out", "numeric"), 
    connectionString="<your_connection_string>") 

registerStoredProcedure(sp) 

das getan haben, können Sie mit der rechten Maustaste auf das proc in SSMS, wählen Sie "Stored Procedure Execute" und SSMS wird für Sie einen Code generieren. Der Code wird wie folgt aussehen:

USE [databasename] 
GO 

DECLARE @return_value int, 
     @out_outer float 

EXEC @return_value = [dbo].[spTestFunc] 
     @out_outer = @out_outer OUTPUT 

SELECT @out_outer as N'@out_outer' 

SELECT 'Return Value' = @return_value 

GO 

Und wenn Sie die Ausgangsnummer möchten, können Sie den Code unten zu diesem vereinfachen:

DECLARE @out_outer float 

EXEC [dbo].[spTestFunc] 
     @out_outer = @out_outer OUTPUT 

SELECT 'Return Value' = @out_outer 
GO