imacat/stattool
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Changed the total proporation to the sum of each proportaion instead of dividing itself.

Browse Source
This commit is contained in:
依瑪貓 2016-09-06 15:02:17 +08:00
parent 897a4a11ae
commit 368f9a1263
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
_5Chi2GoF.vb
View File

@ -224,6 +224,7 @@ Sub subReportChi2GoodnessOfFit (oDoc As Object, oDataRange As Object)
sFormula = "=" & mCellNI (nI) & "/" & sCellN sFormula = "=" & mCellNI (nI) & "/" & sCellN
oCell.setFormula (sFormula) oCell.setFormula (sFormula)
oCell.setPropertyValue ("NumberFormat", nFormatPct) oCell.setPropertyValue ("NumberFormat", nFormatPct)
mCellPI (nI) = fnGetLocalRangeName (oCell)
Next nI Next nI
' Shows the total ' Shows the total
nRow = nRow + 2 nRow = nRow + 2
@ -239,7 +240,11 @@ Sub subReportChi2GoodnessOfFit (oDoc As Object, oDataRange As Object)
Next nJ Next nJ
oCell = oSheet.getCellByPosition (1 + nGroups, nRow) oCell = oSheet.getCellByPosition (1 + nGroups, nRow)
sCells = fnGetLocalRangeName (oSheet.getCellRangeByPosition (1, nRow, nGroups, nRow)) sCells = fnGetLocalRangeName (oSheet.getCellRangeByPosition (1, nRow, nGroups, nRow))
sFormula = "=" & sCellN & "/" & sCellN sFormula = ""
For nI = 0 To nEvents - 1
sFormula = sFormula & "+" & mCellPI (nI)
Next nI
sFormula = "=" & Right (sFormula, Len (sFormula) - 1)
oCell.setFormula (sFormula) oCell.setFormula (sFormula)
oCell.setPropertyValue ("NumberFormat", nFormatPct) oCell.setPropertyValue ("NumberFormat", nFormatPct)