private string getRStripchartString(GraphROptions gro, string fileName, Sides side)
{
string allData = convertDataToR(gro, side);
string xlabStr = "";
if(side == Sides.RIGHT) {
if(CurrentGraphData.LabelRight != "")
xlabStr = ", xlab='" + Util.RemoveTilde(CurrentGraphData.LabelRight) + "'";
}
else { //ALL or LEFT
if(CurrentGraphData.LabelLeft != "")
xlabStr = ", xlab='" + Util.RemoveTilde(CurrentGraphData.LabelLeft) + "'";
}
string rG = //rGraphString
"stripchart(as.data.frame(data), lwd="+ gro.LineWidth +", las=2" + xlabStr + ", ylab='', method='jitter', pch=3, jitter=.2)\n" +
"axis(2, 1:length(colnames(data)), colnames(data), las=2)\n"; //axis separated from boxplot because if data hsa one col, names are not displayed
//have an unique title for both graphs
string titStr = getTitle("Stripchart","");
if(hasTwoAxis()) {
if(side==Sides.RIGHT)
rG += "par(mfrow=c(1,1), new=TRUE)\n" +
"plot(-1, axes=FALSE, type='n', xlab='', ylab='')\n" +
titStr +
"par(mfrow=c(1,1), new=FALSE)\n";
} else
rG += titStr;
return allData + rG;
}