private void mnuItemMissFilt_Click(object sender, EventArgs e)
{
var selectedNodeTag = (clsDatasetTreeNode)ctltreeView.SelectedNode.Tag;
if (!ValidateNodeIsSelected(selectedNodeTag))
{
return;
}
if (!ValidateExpressionsLoaded("filter data"))
{
return;
}
var dataset = selectedNodeTag.mstrRdatasetName;
var missingValueParams = new frmMissingFilter
{
DataSetName = selectedNodeTag.mstrDataText
};
if (missingValueParams.ShowDialog() != DialogResult.OK)
{
return;
}
var filterCutoff = missingValueParams.CutOff;
mintFilterTblNum++;
var filtTableName = "filteredData" + mintFilterTblNum.ToString();
var rcmd = filtTableName + "<- filterMissing(" + dataset + "," + filterCutoff + ")";
try
{
mRConnector.EvaluateNoReturn(rcmd);
if (!mRConnector.GetTableFromRmatrix(filtTableName))
{
return;
}
var dataTableFromR = mRConnector.DataTable.Copy();
dataTableFromR.TableName = filtTableName;
AddDataset2HashTable(dataTableFromR);
AddDataNode(mhtDatasets["Filtered Data" + mintFilterTblNum]);
}
catch (Exception ex)
{
MessageBox.Show("R.Net failed: " + ex.Message, "Error!");
}
}
private void mnuItemMissFilt_Click(object sender, EventArgs e)
{
var mclsSelected = (clsDatasetTreeNode)ctltreeView.SelectedNode.Tag;
if (!ValidateNodeIsSelected(mclsSelected))
{
return;
}
if (!ValidateExpressionsLoaded("filter data"))
{
return;
}
var dataset = mclsSelected.mstrRdatasetName;
var mfrmMissing = new frmMissingFilter
{
DataSetName = mclsSelected.mstrDataText
};
if (mfrmMissing.ShowDialog() != DialogResult.OK)
{
return;
}
var filterCutoff = mfrmMissing.CutOff;
mintFilterTblNum++;
var filtTableName = "filteredData" + mintFilterTblNum.ToString();
var rcmd = filtTableName + "<- filterMissing(" + dataset + "," + filterCutoff + ")";
try
{
mRConnector.EvaluateNoReturn(rcmd);
if (!mRConnector.GetTableFromRmatrix(filtTableName))
{
return;
}
var mDTmissFilt = mRConnector.DataTable.Copy();
mDTmissFilt.TableName = filtTableName;
AddDataset2HashTable(mDTmissFilt);
AddDataNode(mhtDatasets["Filtered Data" + mintFilterTblNum]);
}
catch (Exception ex)
{
MessageBox.Show("R.Net failed: " + ex.Message, "Error!");
}
}