Skip to content

Commit

Permalink
Code Change
Browse files Browse the repository at this point in the history
  • Loading branch information
derekagorhom committed Dec 12, 2024
1 parent 42e161e commit fc270fd
Showing 1 changed file with 0 additions and 7 deletions.
7 changes: 0 additions & 7 deletions instat/dlgOneVariableSummarise.vb
Original file line number Diff line number Diff line change
Expand Up @@ -34,7 +34,6 @@ Public Class dlgOneVariableSummarise
Private clsPipeOperator, clsJoiningPipeOperator As New ROperator
Private clsGetGtTableFunction As New RFunction
Private clsGtTableROperator As New ROperator
Private clsSummaryOperator As New ROperator
Private bResetSubdialog As Boolean = False
Private bResetFormatSubdialog As Boolean = False
Public strDefaultDataFrame As String = ""
Expand Down Expand Up @@ -131,10 +130,8 @@ Public Class dlgOneVariableSummarise
clsGtFunction = New RFunction
clsDummyFunction = New RFunction
clsSkimrFunction = New RFunction
clsSummaryOperator = New ROperator
clsPivotWiderFunction = New RFunction


clsPipeOperator = New ROperator

clsGtTableROperator = New ROperator
Expand Down Expand Up @@ -175,10 +172,6 @@ Public Class dlgOneVariableSummarise
clsGtTableROperator.AddParameter("tableFun", clsRFunctionParameter:=clsSummaryTableFunction, iPosition:=0)
clsGtTableROperator.AddParameter(strParameterName:="gt_tbl", clsRFunctionParameter:=clsGtFunction, iPosition:=1, bIncludeArgumentName:=False)

clsSummaryOperator.SetOperation("%>%")
clsSummaryOperator.AddParameter("tableFun", clsRFunctionParameter:=clsSummaryTableFunction, iPosition:=0)
clsSummaryOperator.AddParameter("gttbl", clsRFunctionParameter:=clsGtFunction, iPosition:=2)

clsJoiningPipeOperator.SetOperation("%>%")
clsJoiningPipeOperator.AddParameter("mutable", clsROperatorParameter:=clsGtTableROperator, iPosition:=0)
clsJoiningPipeOperator.SetAssignToOutputObject(strRObjectToAssignTo:="last_table",
Expand Down

0 comments on commit fc270fd

Please sign in to comment.