private string GetEffectModel()
{
//assemble the effect model
StringBuilder effectModel = new StringBuilder(Response + "~"); //add in the response
if (Covariates != null)
{
effectModel.Append(String.Join('+', Covariates) + '+');
}
if (OtherDesignFactors != null)
{
effectModel.Append(String.Join('+', OtherDesignFactors) + '+');
}
//complicated business of assembling the other part of the model from the interactions etc...
string[] splitter = { " * " };
List <string> interactionEffects = new List <string>(SelectedEffect.Split(splitter, StringSplitOptions.RemoveEmptyEntries));
foreach (string treat in Treatments)
{
if (!interactionEffects.Contains(treat))
{
effectModel.Append(treat.Trim() + "+");
}
}
return(effectModel + "mainEffect"); //where maineffect is the combined effect column of the selected effect in the dataset
}
public string GetEffectModel()
{
//assemble the effect model
StringBuilder effectModel = new StringBuilder(Response + "~"); //add in the response
if (Covariates != null)
{
effectModel.Append(String.Join('+', Covariates) + '+');
}
if (OtherDesignFactors != null)
{
effectModel.Append(String.Join('+', OtherDesignFactors) + '+');
}
//complicated business of assembling the other part of the model from the interactions etc...
string[] splitter = { " * " };
List <string> interactionEffects = new List <string>(SelectedEffect.Split(splitter, StringSplitOptions.RemoveEmptyEntries));
List <string> factors = new List <string>(Treatments);
factors.Add(RepeatedFactor); //add in time to the factors
foreach (string s in factors)
{
if (!interactionEffects.Contains(s)) //only add on effects if the "mainEffect"/selected effect does not already have it
{
effectModel.Append(s + "+");
}
}
return(effectModel + "mainEffect"); //where maineffect is the combined effect column of the selected effect in the dataset
}
public override string[] ExportData()
{
DataTable dtNew = DataTable.CopyForExport();
//Get the response, treatment and covariate columns by removing all other columns from the new datatable
foreach (string columnName in dtNew.GetVariableNames())
{
if (Response != columnName && !Treatments.Contains(columnName) && (OtherDesignFactors == null || !OtherDesignFactors.Contains(columnName)) && (Covariates == null || !Covariates.Contains(columnName)))
{
dtNew.Columns.Remove(columnName);
}
}
//if the response is blank then remove that row
dtNew.RemoveBlankRow(Response);
//Generate a "catfact" column from the CatFactors (used only in R)!
DataColumn catFactor = new DataColumn("catfact");
dtNew.Columns.Add(catFactor);
//Need to create a new column for the scatterplot data as we have to combine any interaction effects into one column
dtNew.CreateCombinedEffectColumn(Treatments, "scatterPlotColumn");
//If an interaction effect is selected then we need to combine values into single column
if (!String.IsNullOrEmpty(SelectedEffect))
{
//create a new column and add it to the table
if (SelectedEffect.Contains(" * ")) //then it is an interaction effect so we need to combine values from different columns
{
char[] splitChar = { '*' };
string[] effects = SelectedEffect.Split(splitChar, StringSplitOptions.RemoveEmptyEntries); //get the effect names that make up the interaction effect
dtNew.CreateCombinedEffectColumn(effects, "mainEffect");
}
else //just copy the column selected in the dropdown
{
DataColumn mainEffect = new DataColumn("mainEffect");
dtNew.Columns.Add(mainEffect);
foreach (DataRow r in dtNew.Rows)
{
r["mainEffect"] = r[SelectedEffect].ToString();
}
}
}
//Now do transformations...
dtNew.TransformColumn(Response, ResponseTransformation);
if (Covariates != null)
{
foreach (string covariate in Covariates)
{
dtNew.TransformColumn(covariate, CovariateTransformation);
}
}
//Finally, as numeric categorical variables get misinterpreted by r, we need to go through
//each column and put them in quotes...
foreach (string treat in Treatments)
{
if (dtNew.CheckIsNumeric(treat))
{
foreach (DataRow row in dtNew.Rows)
{
row[treat] = "'" + row[treat] + "'";
}
}
}
if (OtherDesignFactors != null)
{
foreach (string odf in OtherDesignFactors)
{
if (dtNew.CheckIsNumeric(odf))
{
foreach (DataRow row in dtNew.Rows)
{
row[odf] = "'" + row[odf] + "'";
}
}
}
}
string[] csvArray = dtNew.GetCSVArray();
//fix any columns with illegal chars here (at the end)
ArgumentFormatter argFormatter = new ArgumentFormatter();
csvArray[0] = argFormatter.ConvertIllegalCharacters(csvArray[0]);
return(csvArray);
}