r расширение netlogo, объект 'экономическая стоимость' не найден
Я работаю в netlogo над моделью, которая должна общаться с R во время пробега. Я делаю это, используя расширение r в netlogo (поэтому не Rnetlogo в R).
при настройке я загружаю свой скрипт с r:eval "source('C:/Users/keemi/OneDrive/Documenten/Thesis/heatpumps/scriptHeatpumpV1.R')"это работает нормально, так как я могу спросить, что я хочу получить от сценария с этим кодом. r:get "cpquery(fittedHeatpumpv1, event = (Reliability == 0.88), evidence = (Economic == 0.08))" это дает мне случайный процент события, учитывая доказательства.
Однако доказательства должны исходить от сети Netlogo, я делаю это с помощьюr:put "economicvalue" reliability это создает переменную в r -> economicvalue из значения надежности в netlogo (для примера 0,08). Затем я вставил следующий код r:get "cpquery(fittedHeatpumpv1, event = (Reliability == 0.88), evidence = (Economic == economicvalue))" чтобы получить тот же результат, однако нетлог дает ошибку
Extension exception: Error in R-Extension: Error in Get.
org.nlogo.api.ExtensionException: Error in eval(evidence, generated.data, parent.frame()) :
object 'economicvalue' not found
error while company 157 running R:GET
called by procedure INVEST
called by procedure GO
called by Button 'go-once'
это странно, так как если я делаю то же самое в самом r, он работает просто отлично. и сам сценарий также работает нормально, так как я могу загружать вещи из него. Я также проверил значение r: put, и это действительно было установлено в 0.08, если я перезвоню с помощью r:get "economicvalue"
Я также проверил это уже без переменной, исходящей от netlogo, но просто передавая команду непосредственно r, используя r:eval "economicvalue <- 0.08"но такая же ошибка происходит.
Я не могу понять, что я делаю здесь неправильно, так как код работает в самом r, если я помещаю те же строки кода, но не из netlogo, и netlogo также работает хорошо, так как я могу видеть, работают ли команды r с r:get и все это дает правильные значения.
кто-нибудь может мне помочь?