private void mbtnPlot_Click(object sender, EventArgs e)
{
var protein = Protein2Plot;
var proteinRollupDisplay = new frmPlotDisplay();
if (protein != null)
{
var rcmd = plotCommand + "(" + RDataset + ", IPI=\"" + protein + "\",";
rcmd = rcmd + "Data=" + Dataset + "," + ShowDataLabels + @",file=""" + tempFile + @""")";
try
{
rConnector.EvaluateNoReturn(rcmd);
proteinRollupDisplay.Image = LoadImage(tempFile);
proteinRollupDisplay.EnableParameterMenu = false;
proteinRollupDisplay.MdiParent = m_frmDAnTEmdi;
proteinRollupDisplay.Title = protein;
proteinRollupDisplay.Show();
}
catch (Exception ex)
{
MessageBox.Show("Error in R command: " + rcmd + "\nError: " + ex.Message,
"Exception while talking to R");
}
}
else
{
MessageBox.Show("Select a protein first!", "Nothing selected", MessageBoxButtons.OK,
MessageBoxIcon.Warning);
}
}
private void ctxtMnuItemPlotRows_Click(object sender, EventArgs e)
{
var mclsSelected = (clsDatasetTreeNode)ctltreeView.SelectedNode.Tag;
if (!ValidateNodeIsSelected(mclsSelected))
{
return;
}
var mfrmPlotDisplay = new frmPlotDisplay();
var currGrid = ((ucDataGridView)this.ctltabPage.Controls[0]).TableGrid;
if (!ValidateIsPlottable(mclsSelected))
{
return;
}
var datasetNameInR = mclsSelected.mstrRdatasetName;
var selectedRowData = new StringBuilder();
selectedRowData.Append("c(");
var selectedRows = GetSelectedRows(currGrid);
if (selectedRows.Count < 1)
{
MessageBox.Show("No rows have been selected", "Nothing to plot");
return;
}
if (selectedRows.Count > 100)
{
MessageBox.Show("Cannot plot more than 100 rows; please select fewer rows then try again",
"Too many rows to plot",
MessageBoxButtons.OK, MessageBoxIcon.Exclamation);
return;
}
var addComma = false;
foreach (DataGridViewRow row in selectedRows)
{
if (addComma)
{
selectedRowData.Append(",");
}
selectedRowData.Append(@"""" + row.Cells[0].Value + @"""");
addComma = true;
}
selectedRowData.Append(")");
var rcmd = "PlotRows(" + datasetNameInR + "," + selectedRowData + @",file=""" + mRTempFilePath + @""")";
try
{
mRConnector.EvaluateNoReturn(rcmd);
mfrmPlotDisplay.Image = LoadImage(mRTempFilePath);
mfrmPlotDisplay.EnableParameterMenu = false;
mfrmPlotDisplay.MdiParent = m_frmDAnTEmdi;
mfrmPlotDisplay.Title = "Table Rows";
mfrmPlotDisplay.Show();
}
catch (Exception ex)
{
Console.WriteLine(ex.Message);
}
}
private void ctxtMnuItemPlotRows_Click(object sender, EventArgs e)
{
var mclsSelected = (clsDatasetTreeNode)ctltreeView.SelectedNode.Tag;
if (!ValidateNodeIsSelected(mclsSelected))
{
return;
}
var mfrmPlotDisplay = new frmPlotDisplay();
var currGrid = ((ucDataGridView)this.ctltabPage.Controls[0]).TableGrid;
if (!ValidateIsPlottable(mclsSelected))
{
return;
}
var datasetNameInR = mclsSelected.mstrRdatasetName;
var selectedRowData = new StringBuilder();
selectedRowData.Append("c(");
var selectedRows = GetSelectedRows(currGrid);
if (selectedRows.Count < 1)
{
MessageBox.Show("No rows have been selected", "Nothing to plot");
return;
}
if (selectedRows.Count > 100)
{
MessageBox.Show("Cannot plot more than 100 rows; please select fewer rows then try again",
"Too many rows to plot",
MessageBoxButtons.OK, MessageBoxIcon.Exclamation);
return;
}
var addComma = false;
foreach (DataGridViewRow row in selectedRows)
{
if (addComma)
selectedRowData.Append(",");
selectedRowData.Append(@"""" + row.Cells[0].Value + @"""");
addComma = true;
}
selectedRowData.Append(")");
var rcmd = "PlotRows(" + datasetNameInR + "," + selectedRowData + @",file=""" + mRTempFilePath + @""")";
try
{
mRConnector.EvaluateNoReturn(rcmd);
mfrmPlotDisplay.Image = LoadImage(mRTempFilePath);
mfrmPlotDisplay.EnableParameterMenu = false;
mfrmPlotDisplay.MdiParent = m_frmDAnTEmdi;
mfrmPlotDisplay.Title = "Table Rows";
mfrmPlotDisplay.Show();
}
catch (Exception ex)
{
Console.WriteLine(ex.Message);
}
}
