Click or drag to resize

IMcOMGlobalMcMissingSingle Method

A value of type Single that is recognized as marking a missing value in arrays

Namespace:  MediaCy.IQL.ObjectManager
Assembly:  MediaCy.IQL.ObjectManager (in MediaCy.IQL.ObjectManager.dll) Version: 10.0.6912.0
Syntax
VB
Function McMissingSingle As Single

Return Value

Type: Single
A Single missing scalar value.
Remarks
The Single (32-bit IEEE floating point) value used as missing is the positive Quiet NaN value of 7FC00000 hexadecimal. It can be tested for using the McIsMissingValue or the McOpEQ or McOpNE operators. In all unary or binary operations other than assignment (McObject.McOpSelfAssign), a missing value for either operand causes the result value to be the unchanged left hand value. The statistical methods McBasicStatistics and McRankedValues will skip missing values. A special missing value is defined only for Single and Double types. McOpCast will cast a missing value from Single to Double and vice versa. When printed, missing values display as 1.#NaN.
Examples
VB
Dim moT As McObject, modMiss As McObject, mofMiss As McObject
Set modMiss = McObjectTemp(McMissingDouble)
Set mofMiss = McObjectTemp(McMissingSingle)
Results.Text = "This is a missing Double: " & McMissingDouble & " Is Missing? " & McIsMissingValue(McMissingDouble) & vbCrlf & _
"This is a missing Single: " & McMissingSingle & " Is Missing? " & McIsMissingValue(mofMiss)
Set moT = McObjectTemp(Array(1#, 3#, 5#, 7#))
moT.SelectedValues(Array(1, 2)) = mofMiss 'set two values to missing
Results.Text = Results.Text & vbCrlf & "Vector w/missing: " & McToText(moT)
Results.Text = Results.Text & vbCrlf & "Is Missing: " & McToText(McOpEQ(moT, modMiss))
Results.Text = Results.Text & vbCrlf & "Is Not Missing: " & McToText(McOpNE(moT, modMiss))
Results.Text = Results.Text & vbCrlf & "Is GT: " & McToText(McOpGT(moT, modMiss))
Results.Text = Results.Text & vbCrlf & "Plus 10: " & McToText(McOpAdd(moT, 10))
Dim varVal As Variant, moT2 As McObject
varVal = moT.value
Set moT2 = McObjectTemp(varVal)
Results.Text = Results.Text & vbCrlf & "Round Trip: " & McToText(moT2)
Results.Text = Results.Text & vbCrlf & "Sum,Min,Max: " & McToText(McOpConcat(McSum(moT), McOpConcat(McMin(moT), McMax(moT))))
Results.Text = Results.Text & vbCrlf & "Sum all missing: " & McToText(McSum(mofMiss, modMiss))
See Also