R Advanced Analytics Expression Not Working

WiscoSippi — Sat, 16 Nov 2024 00:58:20 GMT

See expression below. Any help is appreciated. I verified the R script does work directly in R. Do all the field types have to be numerical? Can I use my aggregation variables?

EDIT: I tried r.scriptevalex & specified the data types: R.ScriptEvalEx('SNNNNNNNNNNNNNNNNNNNNNNNNNNNN',
Still didn't work.

R.ScriptEval( 'lm(Act_Hrs~TOTALWEIGHT+Efficiency+NUMBERWINDINGSLIMB+Two_or_Five_winding_per_limb+BUILDXFMRINEHVPLANTYN+WESLTCPART_equal_to_VRC+WESLTCQTY+BOOSTER+SOUNDTEST+EITHER_DUAL+DUALDUAL+NUMBERFANS+WESTANKOPTWESREMOVABLEBUSHINGTURRETSQTY+AIRTERMINALCHAMBERQTY+Fifteen_MVA_or_under+PRODUCTCODE_equal_to_AUTO+PRODUCTCODE_equal_to_STATIONAUX+PRODUCTCODE_equal_to_GENERATOR+PRODUCTCODE_equal_to_ZIGZAG+HVBUSHINGMOUNT+FIBEROPTICPROBES+OVERLOADMVARATING+CTCMASS1+TINSTALLWESDRYSHIP+RMVCableQty+DETCYN+PAYN,q)$coef', [Project Number with Mask] as Project, $(vDirectLbr_ACTQ) as Act_Hours, [total installed weight_WESTOTALWEIGHT Code] as TOTALWEIGHT, ($(vDirectLbr_DESQ)/$(vDirectLbr_ACTQ)) as Efficiency, [number of windings per limb_WESNUMBERWINDINGSLIMB Code] as NUMBERWINDINGSLIMB, [2 OR 5 WINDINGS Code_CONVERTED] as Two_or_Five_winding_per_limb, [EHVPLANT Code_CONVERTED] as BUILDXFMRINEHVPLANTYN, [VRC Code_CONVERTED] as WESLTCPART_equal_to_VRC, [Qty_WESLTCQTY Code] as WESLTCQTY, [BOOSTER Code_CONVERTED] as BOOSTER, [SOUNDTEST Code_CONVERTED] as SOUNDTEST, [EITHER DUAL Code_CONVERTED] as EITHER_DUAL, [DUALDUAL Code_CONVERTED] as DUALDUAL, [total number of fans_WESNUMBERFANS Code] as NUMBERFANS, [TANK OPTIONS Code_CONVERTED] as WESTANKOPTWESREMOVABLEBUSHINGTURRETSQTY, [Air Terminal Chamber_CONVERTED] as AIRTERMINALCHAMBERQTY, [MVA<15 Code_CONVERTED] as Fifteen_MVA_or_under, [AUTO Code_CONVERTED] as PRODUCTCODE_equal_to_AUTO, [STATIONAUX Code_CONVERTED] as PRODUCTCODE_equal_to_STATIONAUX, [GENERATOR Code_CONVERTED] as PRODUCTCODE_equal_to_GENERATOR, [ZIGZAG Code_CONVERTED] as PRODUCTCODE_equal_to_ZIGZAG, [HVBUSHINGMOUNT Code_CONVERTED] as HVBUSHINGMOUNT, [FIBEROPTIC Code_CONVERTED] as FIBEROPTICPROBES, [OVERLOADMVARATING Code_CONVERTED] as OVERLOADMVARATING, [Total CTC Weight lbs_WESCTCMASS1 Code] as CTCMASS1, [DRYSHIP Code_CONVERTED] as TINSTALLWESDRYSHIP, [RMVCableQTYOPT_WESRMVCABLEQTYOPT Code] as RMVCableQty, [DETCYN Code_CONVERTED] as DETCYN, [PREVENTIVE AUTO Code_CONVERTED] as PAYN )

Re: R Advanced Analytics Expression Not Working

WiscoSippi — Thu, 10 Dec 2020 17:55:13 GMT

I needed to handle nulls in my data.frame and my response variable name was wrong. Final working code.

R.ScriptEvalEx('SNNNNNNNNNNNNNNNNNNNNNNNNNNNN', 'lm(Act_Hrs ~ TOTALWEIGHT+Efficiency+NUMBERWINDINGSLIMB+Two_or_Five_winding_per_limb+BUILDXFMRINEHVPLANTYN+WESLTCPART_equal_to_VRC+WESLTCQTY+BOOSTER+SOUNDTEST+EITHER_DUAL+DUALDUAL+NUMBERFANS+WESTANKOPTWESREMOVABLEBUSHINGTURRETSQTY+AIRTERMINALCHAMBERQTY+Fifteen_MVA_or_under+PRODUCTCODE_equal_to_AUTO+PRODUCTCODE_equal_to_STATIONAUX+PRODUCTCODE_equal_to_GENERATOR+PRODUCTCODE_equal_to_ZIGZAG+HVBUSHINGMOUNT+FIBEROPTICPROBES+OVERLOADMVARATING+CTCMASS1+TINSTALLWESDRYSHIP+RMVCableQty+DETCYN+PAYN,q)$coef', if(isnull([Project Number with Mask]),0,[Project Number with Mask]) as Project, if(isnull($(vDirectLbr_ACTQ)),0,$(vDirectLbr_ACTQ)) as Act_Hrs, if(isnull([total installed weight_WESTOTALWEIGHT Code]),0,[total installed weight_WESTOTALWEIGHT Code]) as TOTALWEIGHT, if(isnull($(vEfficiency)),0,$(vEfficiency)) as Efficiency, if(isnull([number of windings per limb_WESNUMBERWINDINGSLIMB Code]),0,[number of windings per limb_WESNUMBERWINDINGSLIMB Code]) as NUMBERWINDINGSLIMB, if(isnull([2 OR 5 WINDINGS Code_CONVERTED]),0,[2 OR 5 WINDINGS Code_CONVERTED]) as Two_or_Five_winding_per_limb, if(isnull([EHVPLANT Code_CONVERTED]),0,[EHVPLANT Code_CONVERTED]) as BUILDXFMRINEHVPLANTYN, if(isnull([VRC Code_CONVERTED]),0,[VRC Code_CONVERTED]) as WESLTCPART_equal_to_VRC, if(isnull([Qty_WESLTCQTY Code]),0,[Qty_WESLTCQTY Code]) as WESLTCQTY, if(isnull([BOOSTER Code_CONVERTED]),0,[BOOSTER Code_CONVERTED]) as BOOSTER, if(isnull([SOUNDTEST Code_CONVERTED]),0,[SOUNDTEST Code_CONVERTED]) as SOUNDTEST, if(isnull([EITHER DUAL Code_CONVERTED]),0,[EITHER DUAL Code_CONVERTED]) as EITHER_DUAL, if(isnull([DUALDUAL Code_CONVERTED]),0,[DUALDUAL Code_CONVERTED]) as DUALDUAL, if(isnull([total number of fans_WESNUMBERFANS Code]),0,[total number of fans_WESNUMBERFANS Code]) as NUMBERFANS, if(isnull([TANK OPTIONS Code_CONVERTED]),0,) as WESTANKOPTWESREMOVABLEBUSHINGTURRETSQTY, if(isnull([Air Terminal Chamber_CONVERTED]),0,[TANK OPTIONS Code_CONVERTED]) as AIRTERMINALCHAMBERQTY, if(isnull([MVA<15 Code_CONVERTED]),0,[MVA<15 Code_CONVERTED]) as Fifteen_MVA_or_under, if(isnull([AUTO Code_CONVERTED]),0,[AUTO Code_CONVERTED]) as PRODUCTCODE_equal_to_AUTO, if(isnull([STATIONAUX Code_CONVERTED]),0,[STATIONAUX Code_CONVERTED]) as PRODUCTCODE_equal_to_STATIONAUX, if(isnull([GENERATOR Code_CONVERTED]),0,[GENERATOR Code_CONVERTED]) as PRODUCTCODE_equal_to_GENERATOR, if(isnull([ZIGZAG Code_CONVERTED]),0,[ZIGZAG Code_CONVERTED]) as PRODUCTCODE_equal_to_ZIGZAG, if(isnull([HVBUSHINGMOUNT Code_CONVERTED]),0,[HVBUSHINGMOUNT Code_CONVERTED]) as HVBUSHINGMOUNT, if(isnull([FIBEROPTIC Code_CONVERTED]),0,[FIBEROPTIC Code_CONVERTED]) as FIBEROPTICPROBES, if(isnull([OVERLOADMVARATING Code_CONVERTED]),0,[OVERLOADMVARATING Code_CONVERTED]) as OVERLOADMVARATING, if(isnull([Total CTC Weight lbs_WESCTCMASS1 Code]),0,[Total CTC Weight lbs_WESCTCMASS1 Code]) as CTCMASS1, if(isnull([DRYSHIP Code_CONVERTED]),0,[DRYSHIP Code_CONVERTED]) as TINSTALLWESDRYSHIP, if(isnull([RMVCableQTYOPT_WESRMVCABLEQTYOPT Code]),0,[RMVCableQTYOPT_WESRMVCABLEQTYOPT Code]) as RMVCableQty, if(isnull([DETCYN Code_CONVERTED]),0,[DETCYN Code_CONVERTED]) as DETCYN, if(isnull([PREVENTIVE AUTO Code_CONVERTED]),0,[PREVENTIVE AUTO Code_CONVERTED]) as PAYN )

topic R Advanced Analytics Expression Not Working in App Development

R Advanced Analytics Expression Not Working

Re: R Advanced Analytics Expression Not Working